برنامه ای که بعد از مدتی بصورت خودکار کامپیوتر رو خاموش کنه؟

Visual Basic 6

توسط somi در 6 سال پیش
0 22k 1 6 سال پیش
somi theknight
0

سلام روز بخیر من به کدی نیاز دارم که یه تایم بهش بدی وقتی که تایم صفر شد کامپیوتر رو خاموش کنه یک برنامه گرفتم ولی بصورت exe بود من سورس میخوام اگر امکان داره کمک کنید.

0

سلام interval تایمر رو روی 1000 تنظیم کنید

Private Sub Command1_Click()
If Command1.Caption = "Start" Then
    Timer1.Enabled = True
    Command1.Caption = "Stop"
Else
    Command1.Caption = "Start"
    Timer1.Enabled = False
End If
End Sub

Private Sub Timer1_Timer()
Text1.Text = Text1.Text - 1
If Text1.Text <= 0 Then Shell ("Shutdown -s -f -t 0")
End Sub

خوش آمدید

برای طرح سوال، ایجاد بحث و فعالیت در سایت نیاز است ابتدا وارد حساب کاربری خود شوید. در صورتی که هنوز عضو سایت نیستید میتوانید در عرض تنها چند ثانیه ثبت نام کنید.

لطفا ابتدا لاگین کنید