Computer.Mouse Свойство

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

Объект My.Computer.Mouse для компьютера.

В этом примере свойства и My.Computer.Mouse.WheelScrollLines используются My.Computer.Mouse.WheelExists для определения того, имеет ли мышь колесико прокрутки и сколько следует прокручивать при повороте.

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

Это свойство обеспечивает простой доступ к объекту My.Computer.Mouse . Дополнительные сведения см. в разделе Mouse object.

Это свойство доступно только для несерверных приложений.

• Mouse
• Объекты (Visual Basic)