讓VisualBasic實現隱藏Mouse

我們經常在影像播放器和系統進入螢幕保護裝置時看不到滑鼠，這是因為系統刻意將滑鼠隱藏起來的原因。這種“隱藏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

是不是很簡單？大家快來試試吧！