我需要一个应用程序,其功能是用户应该能够在visual basic 6中设置计算机自动关闭时间(关闭所有打开的应用程序)。
我只需要知道这是可行的吗?如果是,我应该搜索哪些具体主题?老实说,vb中的系统程序从未在数据库程序员中完成,这也是一种原始性质。 (所以大师,谢谢理解;)
答案 0 :(得分:0)
Option Explicit
Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
Public Const EWX_FORCE = 4
Public Const EWX_LOGOFF = 0
Public Const EWX_REBOOT = 2
Public Const EWX_SHUTDOWN = 1
Public Sub Main()
Dim Res As Long
MsgBox ("Your System Will Now Shutdown")
Res = ExitWindowsEx(EWX_SHUTDOWN, 0)
End Sub
这可以按照您的要求完成工作。