SoloCodigo

Buenas noches a todos. Estoy haciendo una aplicación en V.B. 6.0 y tengo el siguiente problema: tengo dos formularios, desde el form1 pulso un botón para mostrar el form2, en este form2 utilizo "Me.Show DoEvents" para mostrar un mensaje mientras se compacta una base de datos; después de compactar la base de datos presento en pantalla un mensaje con MsgBox, pero cuando se presenta este mensaje el formulario form2 se "queda por detrás" del form1 y yo lo que quiero es que se "quede por delante" del form1. Además, cuando pulso Aceptar en el mensaje me da el siguiente error: "Error '400' en tiempo de ejecución: el formulario ya está visible. No se puede mostrar en forma modal" Este error me da en la llamada que hago con el método Show desde el form1. No tengo ni idea de lo que estoy haciendo mal. Os mando el ejemplo para que podais comprobar lo que he comentado. Muchas gracias a todos por vuestra ayuda.

Gracias Juanolo, todavia no he probado lo que me has dicho, pero si quieres ejecutar mi código tienes que irte al Menu Proyecto --> Preferencias y aquí elegir "Microsoft Jet and Replication Objects 2.5 Library". Muchas gracias

Gracias tio, he probado lo que me has dicho y he arreglado los dos problemas de un plumazo. Muchas gracias colega