DrawError模块附例程

置随机数种子 () ' 要取随机数一定要有这行代码
.如果真 (lMsg ＝ 5)
' 获取信息框坐标、尺寸
GetWindowRect (wParam, rectMsg)
' 让消息框在(a,b)处显示
a ＝ 取随机数 (0, 取屏幕宽度 () － (rectMsg.右边 － rectMsg.左边))
b ＝ 取随机数 (0, 取屏幕高度 () － (rectMsg.底边 － rectMsg.顶边))
SetWindowPos (wParam, 0, a, b, b, a, 21)
UnhookWindowsHookEx (hHook)