My.Computer.Mouse.WheelExists-Eigenschaft
Aktualisiert: November 2007
Ruft einen Boolean-Wert ab, der angibt, ob die Maus ein Bildlaufrad aufweist.
' Usage
Dim value As Boolean = My.Computer.Mouse.WheelExists
' Declaration
Public ReadOnly Property WheelExists As Boolean
Rückgabewert
Der boolesche Wert True, wenn die Maus über ein Bildlaufrad verfügt, andernfalls False.
Ausnahmen
Die folgende Bedingung kann einen Ausnahmefehler verursachen:
- Auf dem Computer ist keine Maus installiert (InvalidOperationException).
Hinweise
Die My.Computer.Mouse.WheelExists-Eigenschaft stellt eine Funktionalität bereit, die mit der MouseWheelPresent-Eigenschaft vergleichbar ist.
Überprüfen Sie den Wert der My.Computer.Mouse.WheelExists-Eigenschaft, bevor Sie versuchen, auf die My.Computer.Mouse.WheelScrollLines-Eigenschaft zuzugreifen, wodurch eine Ausnahme ausgelöst wird, falls die Maus über kein Bildlaufrad verfügt.
Die My.Computer.Mouse.WheelExists-Eigenschaft stellt Informationen über den Computer bereit, der den Code ausführt.
Beispiel
In diesem Beispiel wird mithilfe der My.Computer.Mouse.WheelExists-Eigenschaft bestimmt, ob die Maus über ein Bildlaufrad verfügt, sowie der Umfang des Bildlaufs beim Drehen des Mausrads.
If My.Computer.Mouse.WheelExists Then
Dim lines As Integer = My.Computer.Mouse.WheelScrollLines
If lines > 0 Then
MsgBox("Application scrolls " & _
lines & " line(s) for each wheel turn.")
Else
MsgBox("Application scrolls " & _
(-lines) & " page(s) for each wheel turn.")
End If
Else
MsgBox("Mouse has no scroll wheel.")
End If
Anforderungen
Namespace: Microsoft.VisualBasic.Devices
Klasse: Mouse
Assembly: Visual Basic-Laufzeitbibliothek (in Microsoft.VisualBasic.dll)
Verfügbarkeit nach Projekttyp
Projekttyp |
Verfügbar |
|---|---|
Windows-Anwendung |
Ja |
Klassenbibliothek |
Ja |
Konsolenanwendung |
Ja |
Windows-Steuerelementbibliothek |
Ja |
Web-Steuerelementbibliothek |
Nein |
Windows-Dienst |
Ja |
Website |
Nein |
Berechtigungen
Es sind keine Berechtigungen erforderlich.