VB-Homepage Tipp 018

Mauszeiger ausblenden

Mit unter ist es sinnvoll, den Mauszeiger einfach auszublenden,
(Z.Bsp.: Screensaver oder bei bestimmten Aktivitäten)
dann kommt man mit nachfolgender Prozedur zum Ziel.

Öffnen Sie ein neues Projekt mit einer Form und fügen Sie zwei Commandbutton ein. Fügen Sei nun nachfolgenden Code in den jeweiligen Abschnitt.

General/Declarations '(der Form)
Declare Function ShowCursor Lib "User" (ByVal bShow As Integer) As Integer

Command1/Click
result = ShowCursor(False) 'Ausblenden des Mauscursors

Command2/Click
result = ShowCursor(True) 'Einblenden des Mauscursors

Tipp-Download

Quelle :

Zurück zur Übersichtsseite