把鼠标的指针给隐藏了,代码很简单。
Declare Function ShowCursor Lib "user32" (ByVal bShow As Long) As Long
RetFunct = ShowCursor(False) '隐藏指针 RetFunct = ShowCursor(True) '显示指针
请点击下载附件