✔ 最佳答案
button 屬性 (properties) Event 用 On Click [Event Procedure]
Visual Basic code view 內打 code
只有用 Windows API才可以做到,shut down 外還可以 reboot 或 logoff user。
Option Compare Database 下面加以下程式
' shut down and restart computer
' declare at form module level
Const EWX_LOGOFF = 0
Const EWX_SHUTDOWN = 1
Const EWX_REBOOT = 2
Const EWX_FORCE = 4
Declare Function ExitWindowsEx Lib "user32" _
Alias "ExitWindowsEx" _
(ByVal uFlags As Long, ByVal dwReserved As Long) As Long
Private Sub Command1_Click()
ExitWindowsEx EWX_SHUTDOWN, 0
End Sub