我們經常在影像播放器和系統進入屏幕保護時看不到鼠標,這是因為系統刻意將鼠標隱藏起來的原因。這種“隱藏Mouse”的功能其實並不難,我們利用Visual Basic的API函數ShowCursor即可輕松實現,只需要編寫程序如下代碼即可:
Public Declare Function ShowCursor Lib "user32" (ByVal bShow As Long) As Long
Public Sub toHideCursor ()
ShowCursor 0 '隱藏Mouse
End Sub
Public Sub toShowCursor ()
ShowCursor 1 '顯示Mouse
End Sub
是不是很簡單?大家快來試試吧!