Condividi tramite


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

Libreria di classi

Applicazione di console

Libreria di controlli Windows

Libreria di controlli Web

No

Servizio Windows

Sito Web

No

Autorizzazioni

Non sono richieste autorizzazioni.

Vedere anche

Riferimenti

Oggetto My.Computer

Oggetto My.Computer.Mouse