代码如下：
Private Declare Function exitwindowsex Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
-----------
Private Sub Form_Load()
Dim X As Long

Const EWX_SHUTDOWN = 1
Const ewx_logoff = 0
Const ewx_reboot = 2
Const ewx_force = 4
Const ewx_poweroff = 8

X = exitwindowsex(EWX_SHUTDOWN, dwReserved)

End Sub
--------------------------------------
为什么我运行时提示：实时错误‘453’：
找不到DLL入口点exitwindowsex in user32

这句话X = exitwindowsex(EWX_SHUTDOWN, dwReserved)报错
---------------------------------
请各位高手指点迷津！

Private Declare Function exitwindowsex Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
Private Sub Form_Load()
Dim X As Long

Const EWX_SHUTDOWN = 1
Const EWX_LOGOFF = 0
Const EWX_REBOOT = 2
Const EWX_FORCE = 4
Const EWX_POWEROFF = 8
Const EWX_RESET = EWX_LOGOFF + EWX_FORCE + EWX_REBOOT
X = exitwindowsex(EWX_REXET, dwReserved)

End Sub

没有用啊，依然是那个错误

噢，犯了个低级错误。。。
exitwindowsex应该为ExitWindowsEx

但为什么只能注销，而不是重启？？？

什么叫“直接调用系统的，关机程序”？？？？？

作为菜鸟的我彻底晕了，版主就是
牛！