22-07-22, 10:47 PM
(19-07-22, 12:32 PM)mohamedallams كتب :السلام عليكمأتسائل عن كيفيه وضع مؤقت يظهر msgBox بعد 10 دقائق او اي وقت احدده
مثلا بعد الضغط علي الزر رقم 1 يقوم البرنامج بحساب 10 دقائق ومن ثم يقوم بتنفيذ امرينالاول الضغط علي زر اخروالثاني msgBox تحذيريوشكرا
و عليكم السلام و رحمة الله و بركاته
هذا مثال بسيط لذلك
PHP كود :
Public Class Form1
Dim second As Integer
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
second = second + 1
If second >= 60 Then ' تمثيل الزمن بالثواني هنا سيتم تنفيذ الاحدات بعد دقيقة
Timer1.Stop() 'ايقاف المؤقت
MsgBox("لقد توقف المؤقت عن العمل....")
Button2_Click(sender, e)
second = 0 'ارجاع العد للقيمة صفر للبدء من جديد ان اقتضت الضرورة
End If
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Timer1.Interval = 1000
Timer1.Start() 'بدء المؤقت
End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
MsgBox("لقد تم الضغط على الزر الثاني")
End Sub
End Class

