Gewusst wie: ändern den Standardcursor in Visual Basic 6

Wenn ein Benutzer über das Programm seine Maus bewegt, ist der Standardcursor Symbol der Zeiger. Visual Basic 6 können Sie die Standardeinstellung ändern, indem mithilfe der MousePointer-Eigenschaft für verschiedene Objekte in Ihrem Formular. Beispielsweise können Sie den Pfeilcursor ändern, um alles andere, wie ein Fadenkreuz, ein Faltwerkzeug, ein Pfeil mit einem Fragezeichen oder sogar einen benutzerdefinierten Cursor, die, den Sie in das Programm laden. Ändern Sie den Code in die MouseMove-Funktionen für die verschiedenen Steuerelemente auf dem Formular, oder sogar für das gesamte Formular selbst.

Anweisungen

1 Öffnen Sie Visual Basic-Programm. Rufen Sie das Codefenster.

2 Öffnen Sie die Form_MouseMove-Funktion und geben Sie Folgendes ein:

Form1.MousePointer = VbCrosshair

Wenn der Benutzer ihren Mauszeiger auf die Form zeigt, ändert sich der Standardcursor ein Fadenkreuz.

3 Öffnen Sie die Label1_MouseMove-Funktion und geben Sie Folgendes ein:

Label1.MousePointer = VbSizeNS

Wenn ein Benutzer über Label1 bewegt ändert sich (vorausgesetzt, dass dieses Steuerelement auf dem Formular vorhanden ist), der Standardcursor zu einem Pfeil, der Norden und Süden zeigt. Dies überschreibt den Fadenkreuzcursor, der auf den Rest des Formulars angezeigt wird.

4 Öffnen Sie die Label2_MouseMove-Funktion und geben Sie Folgendes ein:

Label2.MouseIcon = LoadPicture("C:\myCursor.cur")

Label2.MousePointer = VbCustom

Wenn der Benutzer über Label2 schwebt ändert (vorausgesetzt, dass dieses Steuerelement auf dem Formular vorhanden ist), der Standardcursor in einen benutzerdefinierten Cursor in der LoadPicture-Funktion bereitgestellt. Stellen Sie sicher den Pfad in der Parameter-Liste-Spiele, in dem Sie die Cursordatei gespeichert.