Controlar el tiempo de ejecución de una consulta.

02/07/2010 - 13:33 por isidorodos | Informe spam
Buenos días:

Tengo un botón que al hacer clic ejecuta en cascada 3 consultas.

Con MsgBox quiero poner un mensaje en el momento de hacer clic y que
se muestre hasta que se termine la acción de la última consulta pero
no se como hacerlo

Ejemplo

Private Sub cmdCalcular_Click()
Msgbox "Se está calculando lo que sea, espere un momento" 'Tiene que
pasar automáticamente a ejecutar las consultas.
DoCmd.OpenQuery "Consulta1", acViewNormal
DoCmd.OpenQuery "Consulta1", acViewNormal
DoCmd.OpenQuery "Consulta1", acViewNormal
'Cuando lleguemos aquí el mensaje tiene que desaparecer

Mas o menos es eso.

Un saludo y gracias.
 

Leer las respuestas

#1 Emilio
02/07/2010 - 13:43 | Informe spam
¡Importante!: Colabora con el grupo. Contesta a este mensaje
y dinos si te sirvió o no la respuesta dada. Muchas gracias
Hola!
un msgbox interrumpe el proceso hasta que se pulsa un botón, por lo que no
te sirve para lo que pretendes, habrás de abrir un formulario personalizado
al empezar el proceso y cerrarlo al terminar.

En mi web tienes un ejemplo.

Saludos a todos
Emilio [MS-MVP Access 2006/10]
miliuco56 ALGARROBA hotmail.com
http://www.mvp-access.com/foro
http://www.mvp-access.es/emilio

"isidorodos" escribió en el mensaje
news:
Buenos días:

Tengo un botón que al hacer clic ejecuta en cascada 3 consultas.

Con MsgBox quiero poner un mensaje en el momento de hacer clic y que
se muestre hasta que se termine la acción de la última consulta pero
no se como hacerlo

Ejemplo

Private Sub cmdCalcular_Click()
Msgbox "Se está calculando lo que sea, espere un momento" 'Tiene que
pasar automáticamente a ejecutar las consultas.
DoCmd.OpenQuery "Consulta1", acViewNormal
DoCmd.OpenQuery "Consulta1", acViewNormal
DoCmd.OpenQuery "Consulta1", acViewNormal
'Cuando lleguemos aquí el mensaje tiene que desaparecer

Mas o menos es eso.

Un saludo y gracias.

Preguntas similares