توی پست های گذشته که به زبان پایتون آماده کرده بودیم توضیح دادم که اینکار چه کاربردی داره و تو این پست هم میخوام بگم که چطور میتونین همچین کاری رو توی ویژوال بیسیک انجام بدین

خب دیگه زیاد توضیح نمیدم ;)

خودتون خوب میدونین باید چیکار کنین و بعد از اینکه مقدمات رو ریختین یه تایمر به فرم اضافه کنین و دو بار روی اون تایمر یا فورم کلیک کنین تا کدها ظاهر بشه و بعدا همه ی کدهارو پاک کنین و کدهای پایین رو داخل اونجا قرار بدین

Dim My_time As String
Dim Msg_time As String

Option Explicit

Private Sub Form_Load()

Timer.Enabled = True

Timer.Interval = 10

End Sub

Private Sub Timer_Timer()

My_time = Time$

Msg_time = "13:58:30"

If (My_time = Msg_time) Then

MsgBox ("Http://Virus32.Blog.IR")

End If

Timer.Enabled = False

End Sub

فقط اینکه ساعته رو تغییر بدین و متن کادر پیام رو تغییر بدین به چیزی که میخواین ;)

موفق باشید