Propiedad Screen.MousePointer (Access)
Use la propiedad MousePointer junto con el objeto Screen para especificar o determinar el tipo de puntero del mouse que se muestra actualmente. Valor Entero de lectura y escritura.
Sintaxis
expresión. Mousepointer
Expresión Variable que representa un objeto Screen .
Comentarios
El valor de la propiedad MousePointer es un valor de tipo Integer que representa uno de los siguientes punteros.
| Configuración | Descripción |
|---|---|
| 0 | (Valor predeterminado) Microsoft Access determina la forma. |
| 1 | Selección normal (Flecha) |
| 3 | Selección de texto (Cursor en I) |
| 7 | Cambiar el tamaño vertical (Tamaño N, S) |
| 9 | Cambiar el tamaño horizontal (Tamaño E, O) |
| 11 | Ocupado (Reloj de arena) |
Nota:
Si establece la propiedad MousePointer en un valor entero distinto del que aparece en la tabla anterior, la propiedad se ajustará en 0.
La propiedad MousePointer afecta a la apariencia del puntero del mouse en toda la pantalla. Algunos controles personalizados tienen una propiedad MousePointer que, si se establece, especifica cómo se muestra el puntero del mouse cuando está situado sobre el control.
Puede usar la propiedad MousePointer para indicar que la aplicación está ocupada estableciendo la propiedad en 11 para mostrar un icono de reloj de arena. También puede leer la propiedad MousePointer para determinar qué se está mostrando. Esto podría ser útil si desea evitar que un usuario elija un botón de comando mientras el puntero del mouse muestra un icono de reloj de arena.
Establecer la propiedad MousePointer en 11 es lo mismo que pasar el argumento True (1) al método Hourglass del objeto DoCmd . A la inversa, pasando el argumento True al método Hourglass también se establece la propiedad MousePointer en 11.
Ejemplo:
El ejemplo siguiente cambia el puntero del mouse a un reloj de arena.
Screen.MousePointer = 11
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.