Julián González Cabarcos

Por si te sirve, vale que es en Acess, pero... Al abrirlo Y en código En este caso se lo digo en el evento Después de actualizar del cuadro de texto Texto45 Private Sub Texto45_AfterUpdate() Texto47 = CDate(Format([Texto45], "dd/mm/yyyy")) End Sub

Si quieres usar la variable Estado allá tú, pero no es necesario, si la quieres usar ponla como Din estado as byte estado=dcount("*","tablaregistroempresa)=0 then docmd.openform.... else docmd.openelotroform end if Pero efectivamente puedes ponerlo...

Me surgen un montón de preguntas 1º ¿Es necesario declarar las variables como doble?,¿No vale con simple? 2º Si, por lo que se vé en lo que has puesto, no vas a utilizar la variable Divisor para nada, porqué la declaras 3º Las funciones hay que...

¿Has probado a mirar en el editor de VB- Herramientas-Referencias si en alguna pone Falta? Es lo único que se me ocurre.

Es sencillo. No hace falta que lo pongas como emergente( que además no le veo ninguna utilidad), basta con poner, en el evento Al hacer clic del botón, crear un procedimiento de evento y poner Docmd. Openform"clientes",,,,, acDialog Con eso abrirás...

¿Desde el formulario Contactos abres el de lista de contactos?. Si ese es el caso, y suponiendo que en el formulario contactos tengas un cuadro de texto llamado, por ejemplo, Direccion y en el formulario Lista de contactos tengas uno llamado, por...

Por lo que pones, me da la impresión de que has convertido la macro a VB. Si es ese el caso, puedes poner el código como If nz(dcount("*","consulta1"))=0 then exit sub else docmd........ end if Me explico, cuando se va a ejecutar ese evento, primero...

Tal como tienes construidas las tablas me da la impresión de que el cuadro de texto IdTablaA del formulario es independiente. Con lo que lo que te ponga en un registro te los pondrá en todos. Te digo lo que haría y evitas complicaciones. Le añadiría...

Pero la diferencia en que, ¿días?,¿Horas? ¿Las horas con minutos? ¿Las horas con decimales de hora? Mira, ningún ordenador del mundo trabaja con fecha o horas, trabajan con números y las horas son decimales de día. Cuando tu escribes una fecha, en...

Pero sobrescriben porque tu se lo permites. Si en el evento Al activar registro del formulario pones Private Sub Form_Current() If Not Me.NewRecord Then Me.AllowEdits = False End If End Sub No pueden cambiar nada que haya escrito. Es decir, si no es...