How do I turn the computer to suspend mode with vb-code?

Thanks in advance
Worf