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.WheelExists 和 My.Computer.Mouse.WheelScrollLines 属性来确定鼠标是否具有滚轮以及旋转时滚动的滚动量。

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 对象。

此属性仅适用于非服务器应用程序。

可用性（按项目类型）

适用于

另请参阅

• Mouse
• 对象 (Visual Basic)