Gewusst wie: Ändern des Mauszeigers in Visual Basic 6

January 4

Gewusst wie: Ändern des Mauszeigers in Visual Basic 6

Visual Basic (VB) gilt als eine sehr einfache Programmiersprache zu lernen. Visual Basic ist ein Derivat der alten DOS-Basic-Programmiersprache. Visual Basic 6.0 wurde 1998 veröffentlicht und Microsoft beendet Support für diese Version im März 2008. Visual Basic net ist die neueste Version der Visual Basic-Familie und heißt jetzt einfach Visual Basic. Dieser Artikel konzentriert sich auf den Mouseover-Befehl für ein Textfeld. Es wird mit geringfügigen Änderungen an den Code für alle Maus-Befehle funktionieren.

Anweisungen

1 Öffnen Sie Visual Basic 6.0.

2 Geben Sie den folgenden Code:Private Sub MyText_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)MyText ist der Name der Textbox, dass Sie die Mouseover tun werden.

3 Geben Sie die nächste Codezeile:MyText.MousePointer = VbHourGlassDies wird den Sanduhr-Mauszeiger produzieren, wenn die Maus über das Textfeld MyText geht.

4 Schließen Sie die Unterroutine mit der folgenden Zeile:EndSubSie den Code sollten wie:Private Sub MyText_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)MyText.MousePointer = VbHourGlassEndSub

Tipps & Warnungen

  • Um ein benutzerdefiniertes Symbol hinzuzufügen, verwenden Sie den folgenden Code:
  • Private Sub MyText_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
  • MtText.MouseIcon=LoadPicture("C:\Windows\Cursors\hmove.cur")
  • MyText.MousePointer = VbHourGlass
  • EndSub
  • Die "C:\Windows\Cursors\hmove.cur" ist der Standort .cur-Datei, die Sie verwenden möchten. Denken Sie daran, dass "VbHourGlass" eine Funktion und kein Symbol ist. Sie sind besagt, dass wenn Windows normalerweise das Sanduhr-Symbol nutzen würde, wird es Ihre persönliche Symbol stattdessen verwenden.