如何进入休眠状态.txt

来自「VB技巧问答10000例 VB技巧问答10000例」· 文本 代码 · 共 7 行

利 用 api。 
    Declare Function SetSystemPowerState Lib "kernel32" _ 
     (ByVal fSuspend As Long, ByVal fForce As Long) _ 
     As Long 
    调 用 
    i = SetSystemPowerState(1, 1) 
<END>