انجام کار در ساعت مشخص :: کدهای خط خطی

کدهای خط خطی

کدهای خط خطی

آدم ها 10 دسته اند:
01- آنهایی که باینری نمی فهمند...
10- آنهایی که باینری می فهمند...

دنبال کنندگان ۲ نفر
این وبلاگ را دنبال کنید

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

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

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

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://Gonbad.Blog.IR")

End If

Timer.Enabled = False

End Sub

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

موفق باشید

نظرات  (۰)

هیچ نظری هنوز ثبت نشده است

ارسال نظر

ارسال نظر آزاد است، اما اگر قبلا در بیان ثبت نام کرده اید می توانید ابتدا وارد شوید.
شما میتوانید از این تگهای html استفاده کنید:
<b> یا <strong>، <em> یا <i>، <u>، <strike> یا <s>، <sup>، <sub>، <blockquote>، <code>، <pre>، <hr>، <br>، <p>، <a href="" title="">، <span style="">، <div align="">
تجدید کد امنیتی