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