用VB编写一个软件用到API函数实现一键关机怎么编?!

[复制链接]
查看11 | 回复1 | 2008-6-14 23:23:42 | 显示全部楼层 |阅读模式
Private Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As LongConst EWX_SHUTDOWN = 1Const EWX_LOGOFF = 0Const EWX_REBOOT = 2 Const EWX_FORCE = 4Private Sub Command1_Click()Dim ewxewx = ExitWindowsEx(EWX_LOGOFF or EWX_FORCE or EWX_SHUTDOWN, 0)End Sub其实不用API也可以实现:
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行