kazewind的专栏

MsgHook，是一个专用于截取windows消息，并交由自定义过程处理的一个控件。 属性 1、HwndHook：MsgHook控件要截取消息的对象的句柄。如果你要为Form1截取消息，那么MsgHook1.HwndHook=Form1.hWnd 2、Message：这是一个逻辑型的数组，它的下标为你要控制的消息编号。如果你想处理WM_SYSCOMMAND消息、WM_CONTEXTMENU消息，那么可以这样定义： Msghook1.Message(WM_SYSCOMMAND) = True Msghook1.Message(WM_CONTEXTMENU) = True 事件 Msghook控件只有一个事件，定义如下： Sub Msghook1_Message(msg As Long, wp As Long, lp As Long, result As Long) msg参数为消息编号，如果你有多个消息要处理，可以用Select Case语句控制 方法 Msghook控件只有一个方法，定义如下： Long result = [form.][control.]InvokeWindowProc(msg As Long, wp As Long, lp As Long) 这个方法使你可以调用对象默认的处理过程处理消息