vb调用关机的windows api功能！！！关不了啊！！

Question

我使用ExitWindowsEx和ExitWindows想实现关机和重启的功能，通过msdn上的解释，参数也填写对了，可是就是只能注销，但是关机和重启都不能实现
我用的是windows xp sp2是不是和操作系统也有关系？csdn上的高人救命啊 ，急急急急！！！！！

Answer 1

http://www.china-askpro.com/msg2/qa66.shtml

Answer 2

Public Declare Function RtlAdjustPrivilege& Lib "ntdll" (ByVal Privilege&, ByVal Newvalue&, ByVal NewThread&, Oldvalue&)
Public Declare Function NtShutdownSystem& Lib "ntdll" (ByVal ShutdownAction&)
Public Const SE_SHUTDOWN_PRIVILEGE& = 19
Public Const SHUTDOWN& = 0Sub Main()
    RtlAdjustPrivilege SE_SHUTDOWN_PRIVILEGE, 1, 0, 0 
    NtShutdownSystem SHUTDOWN 
End Sub只能在Windows 2000/XP/2003 或者更新的Windows上工作，超快速关机顺便拜一下楼上的前辈，现在难得见到名人啊...........