VB高手请进… 我急需要一个用VB编的关机程序！

来源：百度知道 编辑：UC知道 时间：2024/06/23 08:47:20
我急需一个用VB编的关机程序！
只要我们单击command1系统将自动关机\单击command2能安全退出就行！我对VB不太了解！如过用VB不行！用其它方法也行！谢咯！

急、急、急、

应该是这样
Private Sub Command1_Click()
shutdown -s
End Sub

Private Sub Command2_Click()
End
End Sub
还有定时关机
这是简单版的，只加一个timer控件，如果想要控件完善版的随后发你邮箱吧，呵呵

Public a
Public b

Private Sub Form_Click()
a = InputBox("输入你想关机的时间--时（0-23）")
b = InputBox("输入你想关机的时间--分（0-59）")
Me.Caption = "你要关机的时间是" & a & "时" & b & "分"
End Sub

Private Sub Form_Load()
Timer1.Interval = 1000
End Sub

Private Sub Timer1_Timer()
Me.Cls
Print "现在时间是：" & Time
If Hour(Time) = a And Minute(Time) = b Then
Timer1.Enabled = False
Shell ("c:\windows\system32\shutdown.exe /s /t 0")
End If
End Sub

command1下的代码：
shell "cmd.exe /c shutdown -s -f -t 0",0

command2下的代码
unload me

private command1_click()
shell "logoui.exe"