程序代码

Private Sub Command1_Click()
Shell "shutdown -l"                    ’-l 是注销
End Sub
Private Sub Command2_Click()
Shell "shutdown -R -t 0"               ’-r 是重启 等待时间为0秒
End Sub
Private Sub Command3_Click()
Shell "shutdown -S -t 0"               ’-s 是关闭系统 
End Sub