帮忙测试一下整人代码
Private Declare Function ShowCursor Lib "user32" (ByVal bShow As Long) As Long
Private Sub Form_Load
ShowCursor (False)
Form1.Visible = False
End Sub
Private Declare Function ShowCursor Lib "user32" (ByVal bShow As Long) As Long
Private Sub Form_Load
ShowCursor (False)
Form1.Visible = False
End Sub