Feedback

VB - Prüfen ob Maus vorhanden ist

Veröffentlicht von am 11/29/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!