VB Quicktakes - Hide the Cursor

This example shows you how to use a simple API call to hide and display the mouse cursor.

Private Declare Function ShowCursor Lib "user32" (ByVal fShow As Long) As Long

Private Sub Form_Load()
    ShowCursor (False)
End Sub

Private Sub Form_Unload(Cancel As Integer)
    ShowCursor (True)
End Sub