Cuestión : Reloj de arena que no trabaja cuando está utilizado en el acontecimiento de Onclick de la imagen en el acceso 2007

Estoy utilizando el acceso 2007. No sé si el problema existe en otras versiones o no.  Al iniciar el comando del reloj de arena en un botón de comando, los cambios del cursor a un reloj de arena como él se suponen a. Al iniciar el mismo código en el acontecimiento de OnClick de una imagen, el cursor no cambia a un reloj de arena.  Como ejemplo, pegar las líneas de código siguientes detrás del comando de Onclick de un botón de comando, y pegar el código detrás del acontecimiento del onclick de la imagen y después comparar los resultados.  ¿Cualquiera tiene una solución a esto? despegue del

Dim como Date
DoCmd.Hourglass True
dt = DateAdd (“s”, 6, ahora ())el
Do hasta despegue < Now
DoEvents
Loop
DoCmd.Hourglass False
MsgBox “acabó " class= del

Respuesta : Reloj de arena que no trabaja cuando está utilizado en el acontecimiento de Onclick de la imagen en el acceso 2007

Intenté en el acceso 2003 y acabo de observo la misma cosa. No es un problema con la pantalla restaura (esto habría sido dirigida por DoEvents de todos modos) porque la determinación de Me.Caption algo en la tapa del tratante es inmediatamente visible.

Por una parte, al caminar con el código, el reloj de arena funciona, solamente el redactor de VB es activo en aquel momento. Puedo conjeturar solamente que las imágenes tienen un diverso ratón el manejar de esquema que controles regulares: igual sucede para los controles de la imagen y los marcos desatados del objeto.

Utilizar la sugerencia de los conagraman o poner la imagen directo en el botón (si usted quiere esa clase de mirada). No encontré una manera de hacer que el reloj de arena aparece, incluso cambiando el foco y otros trucos similares, sino que no he intentado las llamadas de WinAPI - estoy seguro es posible si usted lo necesita realmente.

(°v°)