Computer.Mouse Propriété

public:
 property Microsoft::VisualBasic::Devices::Mouse ^ Mouse { Microsoft::VisualBasic::Devices::Mouse ^ get(); };

public Microsoft.VisualBasic.Devices.Mouse Mouse { get; }

member this.Mouse : Microsoft.VisualBasic.Devices.Mouse

Public ReadOnly Property Mouse As Mouse

Valeur de propriété

Objet My.Computer.Mouse de l’ordinateur.

Exemples

Cet exemple utilise les propriétés et My.Computer.Mouse.WheelExists les My.Computer.Mouse.WheelScrollLines propriétés pour déterminer si la souris a une roulette de défilement et la quantité à faire défiler lorsqu’elle fait pivoter.

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

Remarques

Cette propriété permet d’accéder facilement à l’objet My.Computer.Mouse . Pour plus d’informations, consultez Mouse l’objet.

Cette propriété est disponible uniquement pour les applications non serveur.

Disponibilité par type de projet

Voir aussi

• Mouse
• Objets (Visual Basic)