juanpabl0

Tienes todo bien, solamente debes colocar ese mismo código en el evento "MDIForm_QueryUnload" en vez de "MDIForm_Unload" ya que el primero se activa antes del Unload y permite cancelarlo, en cambio el último ya "descargó" todo y sólo le resta...

Pues creo que sí te estás complicando un poco, yo he hecho lo que necesitas anteriormente y lo he realizado de otra forma, a ver qué te parece: 1.- Agregar las referencias correspondientes [Menú: Proyecto > Referencias, activar las siguientes...

Se me ocurre una idea de resolver tu pregunta: 1.- Crear un formulario por cada "página" que quieres [FrmPagina1, FrmPagina2, etc.]. 2.- Escribir cada una de las preguntas utilizando una etiqueta [Label]. 3.- Para cada respuesta posible colocar un...

Intenta cambiando la cadena de conexión por esta otra: base.Open "provider=microsoft.jet.oledb.4.0;data source=" & App.Path & "\DATA\ALMACEN.mdb" Saludos desde México. Juan Pablo E.P.

Teóricamente: Yo te recomiendo que realices la comparación cade vez que se actualice el inventario, es decir, cada que se use alimento, esto en base a un nivel de STOCK que hayas establecido (no tengo ni idea pero podría ser por KILOGRAMOS, por...

Disculpa el retraso, he estado algo ocupado y no he tenido mucho tiempo para atenderte. Hace mucho tiempo intenté lo que ahora solicitas pero la verdad ya no lo recordaba y no lo he llevado más que una sola vez a la práctica: <pre>Hay que hacer una...

El siguiente código realizas lo que necesitas: Private Sub MSFlexGrid1_DblClick() With MSFlexGrid1 Form2.MSFlexGrid2.AddItem .TextMatrix(.RowSel, 1) & vbTab & .TextMatrix(.RowSel, 2) & vbTab & .TextMatrix(.RowSel, 3) & vbTab & .TextMatrix(.RowSel, 4)...

Te doy 3 opciones: 1.- Establecer la propiedad "Value" a "True" de un Option de forma predeterminada, así no tendrías que validar nada. 2.- Si forzosamente debes tener todos los Option en "False", te sugiero que crees una matriz con tus 5 Option y la...

Es muy sencillo, sólo debes agregar algunos caracteres para recortarlo, supongamos lo siguiente: strSql = "SELECT Nombre, CURP, Direccion, Telefono, CorreoElectronico FROM Personas WHERE Nombre = '"& Text1.Text &"'" La sentencia anterior se puede...

Lo que necesitas es muy sencillo, a continuación te explico: Necesitas agregar una referencia a Word, [Menú: Proyecto > Referencias, y activar la casilla "Microsoft Word Object Library" (el "11" puede variar dependiendo de la versión de Office que...