Yes of course my dear Compie!

Why not help myself if nobody else do it?

Public Declare Function SetSystemPowerState Lib "kernel32" (ByVal fSuspend As Long, ByVal fForce As Long) As Long

-> fSuspend has no meaning
-> fForce: 0=prompt, 1=no prompt (immediately)