请问在VB中如何屏蔽鼠标键盘（是否要用钩子？如果是则如何用？）？如何设置快捷键？

Question

分　　　　分　　　　　　　分　　　分
　　分　　　　分　　　　　　　分　　　分　　　　　　分分
分分分分　　分　分　　　　　分　　　　　分　　　　分分分分
　　分　　分　　　分　　　　分　　　　　分　　　　分分分分
　　分　分　　　　　分　　分　　　　　　　分　　　分分分分
　　分分　分分分分　　　分　分分分分分分分　分　　　分分
分分分　　分　　分　　　　　　　分　　　分　　　　　分分
　　分　　分　　分　　　　　　　分　　　分
　　分　　分　分分　分　　　　分　　　　分　　　　　分分
　　分　　分　　　　分　　　分　　　　　分　　　　　分分
分分分　　分分分分分分　分分　　　分分分

Answer 1

我只知道可以用ClipCursor使鼠标不能移动ClipCursor, ClipCursorBynum VB声明 
Declare Function ClipCursor& Lib "user32" (lpRect As RECT)
Declare Function ClipCursorBynum& Lib "user32" Alias "ClipCursor" (ByVal lpRect As Long) 
说明 
将指针限制到指定区域。ClipCursorBynum是一个别名，允许我们清除以前设置的指针剪切区域 
返回值 
Long，非零表示成功，零表示失败。会设置GetLastError 
参数表 
参数 类型及说明 
lpRect RECT，指定一个矩形，用像素屏幕坐标系统表示。鼠标指针必须在这个区域内运动。如使用函数的ClipCursorBynum形式，则可将参数设为Long值，用它传递一个0，禁止指针剪切，恢复常规运作状态 
注解 
指针剪切后，按Ctrl+Alt+Del可简单的清除剪切区域