请教！如何用vba代码关闭计算机？

sxgaobo · 发表于 2004-1-3 17:11:00

如题，请注意是关闭计算机！

sxgaobo · 发表于 2004-1-3 20:05:00

谢谢cg1！
您告我的方法看了，可我不会用，总报错！！！
能麻烦您给做个简单的例子吗？就是单击一按钮即关闭计算机。

sxgaobo · 发表于 2004-1-4 03:00:00

cg1 谢谢您的关注！
我看了，也试过了，可就是不行（太菜啊）！！！
我的系统是WINDOWS2000，ACCESS是XP
麻烦您给做个例子好吗？

sxgaobo · 发表于 2004-1-4 19:00:00

帮忙啊！！！

sxgaobo · 发表于 2004-1-5 02:30:00

有明白的朋友吗？

sxgaobo · 发表于 2004-1-5 17:58:00

能给个明确的答案吗？

sxgaobo · 发表于 2004-1-6 00:35:00

Private Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
Const EWX_SHUTDOWN = 1
Const EWX_LOGOFF = 0
Const EWX_REBOOT = 2
Const EWX_FORCE = 4
Private Sub Command0_Click()
Dim a
a = ExitWindowsEx(EWX_LOGOFF Or EWX_FORCE Or EWX_SHUTDOWN, 0)
End Sub
请高手帮忙啊！使用上述的方法计算机没反映，我的系统是2000。

sxgaobo · 发表于 2004-1-6 01:20:00

一样的代码，WIN2000+OFFICE XP没反应！？！？！？！？

sxgaobo · 发表于 2004-1-6 23:05:00

WIN2000该如何做啊？

sxgaobo · 发表于 2004-1-8 21:37:00

？？？

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[其它] 请教！如何用vba代码关闭计算机？

群介绍
主题无相 (随机显示版	同地区群块其他地区)