API函数锁定鼠标及键盘
锁定鼠标：
ClipCursor, ClipCursorBynum
VB声明
Declare Function ClipCursor& Lib "user32" (lpRect As RECT)
Declare Function ClipCursorBynum& Lib "user32" Alias "ClipCursor" (ByVal lpRect As Long)
说明
允许获取和设置数量众多的windows系统参数
返回值
Long，非零表示成功，零表示失败。会设置GetLastError
参数表
参数
类型及说明
uAction
Long，指定要设置的参数。参考uAction常数表
uParam
Long，参考uAction常数表
lpvParam
Any，按引用调用的Integer、Long和数据结构。对于String数据，请用SystemParametersInfoByval函数。具体用法参考uAction常数表
说明
将指针限制到指定区域。ClipCursorBynum是一个别名，允许我们清除以前设置的指针剪切区域
返回值
Long，非零表示成功，零表示失败。会设置GetLastError
参ቤተ መጻሕፍቲ ባይዱ表
参数
类型及说明
lpRect
RECT，指定一个矩形，用像素屏幕坐标系统表示。鼠标指针必须在这个区域内运动。如使用函数的ClipCursorBynum形式，则可将参数设为Long值，用它传递一个0，禁止指针剪切，恢复常规运作状态
SPIF_SENDWININICHANGE
倘若也设置了SPIF_UPDATEINIFILE，将一条WM_WININICHANGE消息发给所有应用程序。否则没有作用。这调消息告诉应用程序已经改变了用户配置设置
注解
在调用这个函数之前，特别要注意将lpvParam参数定义成正确的数据类型
注解
指针剪切后，按Ctrl+Alt+Del可简单的清除剪切区域
应用中设定好rect.top rect.bottom rect.left rect.right鼠标就在这个区间活动。
锁定键盘：
SystemParametersInfo, SystemParametersInfoByval
VB声明
Declare Function SystemParametersInfo& Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, lpvParam As Any, ByVal fuWinIni As Long)
fuWinIni
Long，取决于不同的参数及操作系统，随同这个函数设置的用户配置参数保存在win.ini或注册表里，或同时保存在这两个地方。这个参数规定了在设置系统参数的时候，是否应更新用户设置参数。可以是零（禁止更新），或下述任何一个常数：
SPIF_UPDATEINIFILE
更新win.ini和（或）注册表中的用户配置文件
Declare Function SystemParametersInfoByVal& Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, ByVal lpvParam As Any, ByVal fuWinIni As Long)