以编程方式在特定时间关闭计算机

时间:2011-12-12 09:24:18

标签: vb6

我需要一个应用程序,其功能是用户应该能够在visual basic 6中设置计算机自动关闭时间(关闭所有打开的应用程序)。

我只需要知道这是可行的吗?如果是,我应该搜索哪些具体主题?老实说,vb中的系统程序从未在数据库程序员中完成,这也是一种原始性质。 (所以大师,谢谢理解;)

1 个答案:

答案 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 

source

这可以按照您的要求完成工作。