OK, you can enable/disable hibernation from your VB app by changing a value in the Registry

HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Session Manager\Power\Heuristics

Code:
Value is XX XX XX XX XX XX 00 XX XX XX ......... XX          00 = Hibernation disabled
Value is XX XX XX XX XX XX 01 XX XX XX ......... XX          01 = Hibernation enabled
Do not modify any of the other values XX; only the 7th value