Access – otro método para mostrar ayuda en pantalla

Otro método que complementa la ayuda en pantalla para un formulario consiste en utilizar una etiqueta de texto y que al pasar el cursor del mouse por encima de los distintos objetos de nuestro formulario, en la etiqueta, se nos vaya informando de su utilidad automáticamente.

El procedimiento es bien sencillo. Teniendo un formulario cualquiera, por ejemplo como este:

Ayuda en Pantalla-01

 

Utilizaremos la etiqueta de la derecha, a la que le hemos dado el nombre de “Dime” para mostrar en ella la información de lo que hace cada uno de los botones.

Nota: La etiqueta queremos que no contenga nada hasta que pasemos el mouse por encima de los botones pero Access no nos permite colocar una etiqueta vacía, sin texto, de hecho, si lo intentamos automáticamente se borrará. Un truco que hemos usado en este tutorial es ponerle como título un punto “.” de forma que apenas se nota cuando abrimos el formulario.

El código lo vamos a aplicar en cada botón en su evento “Al mover el mouse” que se produce cuando pasamos el ratón sobre el objeto sin necesidad de hacer click sobre él.

Ayuda en Pantalla-02

 

Pulsamos sobre el botón “…” de la derecha del evento para entrar en el editor de VBA y, entre las dos líneas de código que Access cumplimenta automáticamente nosotros vamos a introducir nuestra línea:

Private Sub Listar_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.Dime.Caption = "Si pulsamos aquí podremos seleccionar automáticamente " _
& "la Tabla con los Datos que necesitemos ver o trabajar en ese momento."
End Sub

Como se puede observar lo que hacemos es modificar el título de la etiqueta por lo que nosotros queramos.

Opcionalmente, si queremos que al quitar el mouse del botón desaparezca la ayuda de la etiqueta podemos utilizar el mismo evento “Al mover el mouse” del detalle del formulario para convertir nuevamente el texto a un “.”

Private Sub Detalle_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.Dime.Caption = "."
End Sub

Un comentario

Responder a GUSTAVO OROZCO CHARRIS Cancelar respuesta

Este sitio usa Akismet para reducir el spam. Aprende cómo se procesan los datos de tus comentarios.