Private Sub Form_Load()Shell ("shutdown -s -t 60")End Sub试试吧...
在form_Load事件中写上shell "cmd /c shutdown -s -f -t 60"就可以 了
