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

لايتم التنفيذ الجمل التي تلي عبارة message box

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

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

لدي برنامج يظهر فيه messagebox ولايتم تنفيذ الجمله التي تلي جملة messagebox الا بالضغط على احد ازرار الصندوق

هل هناك طريقه لاظهار المسج بوكس وتنفيذ الجمل التي تليه بشكل الي دون الحاجه الى الضغط على احد ازرار messagebox .

شكرا

#2

يرجا التوضيح اكثر

#3

مثال للتوضيح :


Text1.Text = ("hello word")
MsgBox ("hello word")

#4

الأخ الفاضل ...

ModelessMsgBox.zip

ارجوا ان يفيدك هذا المثال فى ما تريد انجازه، بأستخدام (MS-VB 6.0)

يمكنك ذلك بعمل Form مخفى (كما فى المثال المرفق) يتم استدعائه بعد تمرير المتغيرات له بستخدام (vbModeless) وهو الذى يقوم بعر الـ MsgBox ثم إنهاء نفسه بعد انهاء الـMsgBox

أومن خلال تصميم Form تستخدمها لعرض الرسائل للمستخدم (يعطى مرونه اكبر فى الكل والخط والرسومات الازرار... الخ)، ويتم استدعائها بأستخدام (vbModeless) بالشكل التالى

	frmMyMsgBox.Show vbModeless, Me

شكراً

Eng. Usama El-Mokadem

Nothing is impossible, the word impossible itself says that: I M - Possible

#5

ممكن تخلي ظهور الرسالة كل فترة

مثلاً :

Private Sub Form_Load()
	Timer1.Interval = 1000
End Sub

Private Sub Timer1_Timer()
Dim intmsg As Integer
	intmsg = MsgBox("لقد مرت ثانية فظهرت الرسالة", vbInformation + vbMsgBoxRight + vbMsgBoxRtlReading + vbOKOnly, "الرسالة الزمنية") = vbOK
End Sub
اقتباس
If A is success in life, then A equals x plus y plus z. Work is x; y is play; and z is keeping your mouth shut

Albert Einstein

مدخل إلى برمجة وتصميم الألعاب : كيف أبدأ ؟

#6

الفكرة ليست بتوقيت الظهور لكن الـ MsgBox هى Modal Window و تمنع تنفيذ باقى الأكواد الى أن تتم الأستجابة لها , و حاول دائما البعد عن المؤقتات.

#7

شكرا للجميع على المساعده

دمتم بخير

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

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