我在网上找到一个关机的程序，但运行后只有注销选项起作用，其它的关机、重启执行进没反映，不知错在哪，代码：
EWX_LOGOFF=0
EWX_REBOOT=2
EWX_SHUTDOWN=1
DECLARE INTEGER ExitWindowsEx in User32 integer,integer
DO CASE
CASE THISFORM.Combo1.VALUE="重启" &&重新启动计算机
=ExitWindowsEx(EWX_REBOOT,0)
CASE THISFORM.combo1.VALUE="关机" &&关闭计算机
=ExitWindowsEx(EWX_SHUTDOWN,0)
CASE THISFORM.combo1.VALUE="注销" &&注销用户
=ExitWindowsEx(EWX_LOGOFF,0)
ENDCASE