Ever want to freeze a computer? Well, here is some code to do it. It manipulates the API ‘setparent’
Original Author: Brian Molidor
Side Effects
Well, Duh. your computer will freeze
Code
Public Declare Function SetParent Lib "user32" Alias "SetParent" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long
function freeze_computer(frm as form)
call SetParent(frm.hwnd, frm.hwnd)
end function