Printable View
سلام من زیاد با این کنترل آشنایی ندارم. فقط بلدم باهاش ساعت کامپیوتر رو نمایش بدم.
من میخوام مثلا کاربر توی text1 یک عددی مانند 45:00 رو وارد کنه و اون وقت Timer شروع به کار کنه و اون عدد رو تا 00:00 به صورت معکوس بر اساس ثانیه بره و وقتی به صفر رسید یک msgbox باز بشه . پیغام به طرف بده که 45 دقیقه تموم شد.
خیلی حیاتیه لازمش دارم.
لطفا کمکم کنید.
این کد رو تو Timer بنویس :
text1.text = text1.text -1
if text1.text ="0' then
msgbox "Your massage
end if
ببین کار میکنه ؟ :40:
نشد حالا خودتون امتحان کنیدنقل قول:
فهمیدم البته با کمک شما
ابتدا باید ویژگی Interval رو روی 1000 تنظیم کنیم که به ثانیه عمل کنه.
بعد همون چیزی که شما گقتید
a = Val(Text1.Text)
a = a - 1
Text1.Text = a
رو توی تایمر مینویسیم و Timer بر اساس ثانیه به عقب میره.
خیلی متشکرم از شما:10:
خواستم همون رو اول بنویسیم ولی یادم رفت ببخش ولی مهم اینه که خودت تونستی بفهمی
و مشکلت رو حل کردی . :41::10: