الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

ظهور صفحة انترنت عند غلق البرنامج

مغلق
بدأه رزان في 13 سبتمبر 2005 · 6 رد · 647 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

أريد عندما تظهر لي رسالة فيها أوكي

عندما أضغط على أوكي تظهر لي صفحة ويب بعنوان الذي احدده

بارك الله فيكم

#2

السلام عليكم ورحمة الله وبركاته

اذا كانت الرسالة تحتوى على زر واحد فقط وهو OK فاكتبى هذا الكود

MsgBox "This is a test"
Shell "Explorer "

اما اذا كانت الرسالة بها اكثر من زر وليكن Ok و Cancel فهذا هو الكود

Dim M$
M = MsgBox ("This is a test", vbOkCancel)
If M = vbOk Then
Shell "Explorer "
End If

إن قلت قال الله قال رسولـه همزوك همز المنكر المتعالي
أو قلت قد قال الصحابة والألـى تبعاً لهم بالقول والأعمال
أو قلت قـال الشافعي وأحمد و أبو حنيفة والإمام الغالي
صدوا عن وحي الإله ودينـه واحتالوا على حرام الله بالإحلال
يا أمةً لعبت بدين نبيها كتلاعب الصبيان في الأوحال
حاشا رسول الله يحكم بالهوى تلك إذاً حكومة الضلال

feed.1.gif

#4

السم عليكم ورحمة الله و بركاته

ارجو ان يكون المثال المرفق مفيد

4U.zip

29_09_05_02_32_59_1128029579_4_13_3[_].gif

صور gif شفافة لتجميل واجة البرنامج

الخط العثماني للمهتمين ببرمجة برامج تلاوة القرآن

كيف يمكن عمل سكرول بالماوس, scroling by mouse wheel

كبفية استعراض ملف PDF في تكست

06_02_06_08_01_06_1139241666down-logo_1.gif

هل نكذب علي الله ام نكذب علي انفسنا

البـر لا يبلي ، و الذنب لا ينسـي ، و الديـان لا يمـوت ، افعـل مـا شئت كما تـديـن تـدان

ليس كل من تعمم مفتيا ، بل ان الدين الاسلامي ليس قيه كهانه و بالتالي ليس فيه ما يعرف ب رجال الدين – احمد رجب

                                  مع خالص تحيـــــــــــــــــــــــــــــــــاتي

                                                   GAF58 

#5

يمكنك استخدام هذا الكود عند الضغط على الزر لفتح صفحة انترنت

[ ShellExecute hWnd, "open", "http://www.yahoo.com", vbNullString, vbNullString, conSwNormal]

خيركم من تعلم العلم وعلمه

#6

او من قائمة project --- > reference

أختار الأداة microosft internet control

واستخدم بعدها الكود ده

Dim Ie As New InternetExplorer

Ie.Visible = True

Ie.Navigate "http://pchelplive.com/ip.php"

خيركم من تعلم العلم وعلمه

#7

اشكركم جميع الحلول وافيه وكافيه

بارك الله فيكم

هذا الموضوع مغلق.

مواضيع مشابهة