Programalama > VISUAL BASIC

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

Private Sub Command1_Click()
ShowCursor (False)
End Sub

Private Sub Command2_Click()
ShowCursor (True)
End Sub

Private Sub Form_Load()
MsgBox "Bu Proğramın özelliği sadece form üzerindedir", vbCritical + vbOKOnly, "Uyarı"
End Sub