07-03-20, 02:21 PM
07-03-20, 02:55 PM
كود :
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
Label1.Text = DateString
If TimeOfDay = "02:00:00 PM" And DateString = "07-03-2020" Then
MsgBox("الرساله هنا")
End If07-03-20, 03:42 PM
(07-03-20, 02:55 PM)modywassemmody كتب : [ -> ]اتفضل ولو في مشكله كلمنيكود :
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
Label1.Text = DateString
If TimeOfDay = "02:00:00 PM" And DateString = "07-03-2020" Then
MsgBox("الرساله هنا")
End If
ممكن ترسلي رقمك أكلمك واتس أفضل
لأني مش عارف الحجات الي تتغير عشان يشتغل لو سمحت اخي
(07-03-20, 02:55 PM)modywassemmody كتب : [ -> ]اتفضل ولو في مشكله كلمنيكود :
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
Label1.Text = DateString
If TimeOfDay = "02:00:00 PM" And DateString = "07-03-2020" Then
MsgBox("الرساله هنا")
End If
مشتغلش
07-03-20, 05:08 PM
كلمني فيسبوك :
PHP كود :
https://www.facebook.com/Ahmedwassem650
08-03-20, 12:18 PM
كود :
Label1.Text = DateString
If Label1.Text = "2020-03-05" Then
MsgBox("أنتهى التاريخ ")
End If