:rolleyes: ارجو مساعدتي في حل مشكلتي
والمشكلة هي عندي sub
وبداخله حلقة for ولكن يوجد ضمن الحلقة شرط if
فيجب ان تظهر رسالة للمستخدم تنبهه والرسالة هي من groupboxوفيها زران
تجاهل وزر الغاء الامر
فيجب عند ضغط زر تجاهل ان تذهب الرسالة ويتم البرنامج عمله واما زر الغاء الامر
فتلغى الرسالة فقط فكيف يمكنني فعل ذلك زر تجاهل ان يتم البرنامج عمله وعند ما وضعت بهذا الشرط exit sub فان البرنامج بهذه الحالة ظهرت الرسالة وتوقف ولم يعد يتم الحلقة فماذا يجب ان يكون الامر هنا
وشكرا سلفا ضروررررررري جدا
السلام عليكم
For i As Integer = 0 To 100
If MessageBox.Show("", "", MessageBoxButtons.RetryCancel, MessageBoxIcon.Asterisk) = DialogResult.Cancel Then
Exit For
End If
Next{وَاتَّقُواْ يَوْمًا تُرْجَعُونَ فِيهِ إِلَى اللّهِ ثُمَّ تُوَفَّى كُلُّ نَفْسٍ مَّا كَسَبَتْ وَهُمْ لاَ يُظْلَمُونَ} (281) سورة البقرة
dim a as string
a = msgbox ("MMMM",vbyesno)
if a = vbyes then
msgbox "OK pressed"
else
msgbox ("cancel pressed"
end ifتم تعديل هذه المشاركة بواسطة crazy-man في 23 مارس 2006 في 18:52
من مواضيعي :
تعلم كيف تفتح ملف ببرنامجك والبرنامج مو شغال
مجموعة كبيرة من خواص System.Management
تفعيل ستايل ويندوز أكس بي على الفيجوال 2003
تعلم أختراق أقوى كلمة سر في الكمبيوتر
درس لتعليم كيفية دمج الملفات في ملف حاضن
تعلم طريقة وضع صورة ونص في نفس الملف, درس رائع
وضع ملف داخل الملف التنفيذي وأستخراجه
----------------------------------------------------------------------------------------------------
))))))))))))))))))))))))))))))))))(((((((((((((((((((((((((((((((((
--------------------------
If You.LoveArabTeam = True
Msgbox ("Welcome")
Else
Msgbox ("YouAreLoser")
End ifهذا الموضوع مغلق.