My.Computer.Mouse (Propiedad)

Actualización: noviembre 2007

Obtiene un objeto que suministra las propiedades necesarias para obtener información sobre el formato y configuración del mouse (ratón) instalado en el equipo local.

' Usage
Dim value As Microsoft.VisualBasic.Devices.Mouse = My.Computer.Mouse
' Declaration
Public ReadOnly Property Mouse As Microsoft.VisualBasic.Devices.Mouse

Valor devuelto

Esta propiedad devuelve el objeto My.Computer.Mouse para el equipo.

Comentarios

Esta propiedad proporciona un fácil acceso al objeto My.Computer.Mouse. Para obtener más información, vea My.Computer.Mouse (Objeto).

Esta propiedad sólo está disponible para aplicaciones que no son de servidor.

Ejemplo

En este ejemplo se utilizan las propiedades My.Computer.Mouse.WheelExists y My.Computer.Mouse.WheelScrollLines para determinar si el mouse tiene una rueda de desplazamiento y cuánto se desplaza al girar.

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

Requisitos

Espacio de nombres:Microsoft.VisualBasic.Devices

Clase:Computer

Ensamblado: biblioteca en tiempo de ejecución de Visual Basic (en Microsoft.VisualBasic.dll)

Disponibilidad por tipo de proyecto

Permisos

No se requiere ningún permiso.

Vea también

Referencia

My.Computer (Objeto)

My.Computer.Mouse (Objeto)