Proprietà My.Computer.Mouse
Aggiornamento: novembre 2007
Ottiene un oggetto che fornisce le proprietà per il recupero di informazioni sul formato e la configurazione del mouse installato sul computer.
' Usage
Dim value As Microsoft.VisualBasic.Devices.Mouse = My.Computer.Mouse
' Declaration
Public ReadOnly Property Mouse As Microsoft.VisualBasic.Devices.Mouse
Valore restituito
Questa proprietà restituisce l'oggetto My.Computer.Mouse per il computer.
Note
Questa proprietà consente di accedere facilmente all'oggetto My.Computer.Mouse. Per ulteriori informazioni, vedere Oggetto My.Computer.Mouse.
La proprietà non è disponibile per le applicazioni server.
Esempio
Nell'esempio riportato di seguito vengono utilizzate le proprietà My.Computer.Mouse.WheelExists e My.Computer.Mouse.WheelScrollLines per stabilire se nel mouse è presente una rotella di scorrimento e a quanto corrisponde l'intervallo di scorrimento.
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
Requisiti
Spazio dei nomi:Microsoft.VisualBasic.Devices
Classe:Computer
Assembly: Visual Basic Runtime Library (in Microsoft.VisualBasic.dll)
Disponibilità per tipo di progetto
Tipo di progetto |
Disponibile |
---|---|
Applicazione Windows |
Sì |
Libreria di classi |
Sì |
Applicazione di console |
Sì |
Libreria di controlli Windows |
Sì |
Libreria di controlli Web |
No |
Servizio Windows |
Sì |
Sito Web |
No |
Autorizzazioni
Non sono richieste autorizzazioni.