让窗口拒绝接受键盘和鼠标事件
2009-1-5 21:14:19 来源:互联网让窗口拒绝接受键盘和鼠标事件
声明:
Private Declare Function EnableWindow Lib "user32" (ByVal hwnd As Long, ByVal fEnable As Long) As Long
使用:
'拒绝接受键盘和鼠标事件
Call EnableWindow(Form.hwnd, 0)
'允许接受键盘和鼠标事件
Call EnableWindow(Form.hwnd, 1)
[1]
