VBGood网站全文搜索 Google

搜索VBGood全站网页(全文搜索)
首页 - 经验之谈 - 隐藏Mouse
发表评论(0)作者:不详, 平台:VB6.0+Win98, 阅读:8621, 日期:2001-09-16
隐藏Mouse


作者: cww 

Type POINTAPI
        x As Long
        y As Long
End Type
Declare Function GetCursorPos Lib "user32" Alias "GetCursorPos"  _
   (lpPoint As POINTAPI) As Long
注释:隐藏Mouse
Public Sub toHideCursor()
ShowCursor 0
End Sub

注释:显示Mouse
Public Sub toShowCursor()
ShowCursor 1
End Sub