Private Declare Function ShowCursor Lib "user32" (ByVal bShow As Long) As Long
Private Sub Form_LoadShowCursor (False)Form1.Visible = FalseEnd Sub