如何进入休眠状态.txt

VB技巧问答10000例 VB技巧问答10000例

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