Question

Vb中让电脑定时关机的代码

Answer 1

Dim t As Integer
Private Sub Form_Load()
    Timer1.Interval = 1000
    Timer1.Enabled = True
    me.show
    print "1分钟后自动关机"
End Sub

Private Sub Timer1_Timer()
    t = t + 1
     me.caption=t
    If t >= 60 Then
        Shell "shutdown -s -t 0"
        End
    End If
End Sub

Answer 2

不知道。

给电脑定时关机的话让电脑定时自动关机其实很简单，你可以在百度上搜索下载定时关机3000这款电脑定时关机软件。

定时关机 3000有五种让电脑定时关机的方法，如每天几点几分关机或者等待多长时间后关机或者开机多长时间关机以及网速低于多少的时候关机和键盘鼠标多次时间没有反应关机。

还不赶快下载定时关机3000到您的电脑，试试定时关机的效果怎么样？