Feedback

VB - Prüfen ob Maus vorhanden ist

Veröffentlicht von am 29.11.2006
(4 Bewertungen)
Siehe Titel
Public Declare Function GetSystemMetrics Lib "user32" (ByVal nIndex As Integer) As Integer

Public Function MousePresent() As Boolean
    Dim SM_MOUSEPRESENT As Integer = 19
    Return CBool(GetSystemMetrics(SM_MOUSEPRESENT))
End Function
Abgelegt unter Maus.

Kommentare zum Snippet

 

Logge dich ein, um hier zu kommentieren!