Programando formulario continuo en access
Hola todoexpertos:
Algo nuevo para mi es trabajar con formularios continuos, quisiera por favor su apoyo, primero que quiero que al dar "enter" al terminar una fila (registro), siga al siguiente renglón, no se como hacerlo. Lo otro es que al pulsar el botón consultar pueda maquillar el mismo formulario para consultar según el código del libro.
Me explico: El formulario en mención es para ingresar registros a una tabla llamada INDICE TEMATICO esta tiene un campo clave numérico para cada tema, Tema en sí, y el código del libro al que pertenecen. Bien es decir estoy en una tabla distinta a Libros. Lo que tengo sin resultados es lo siguiente
Private Sub Form_Current()
Me.ComCodLIndConsulta.Visible = False
Me.CombCodLInd.SetFocus
'Numeración correlativa
On Error GoTo ErrFormCurrent
If [CodTema] > 1 Then
Me.CodTema.Value = Nz(DMax("CodTema", "03INDICE_TEMATICO"), 0) + 1
End If
ExitFormCurrent:
Exit Sub
ErrFormCurrent:
If Err = 94 Then 'Uso no válido de Null
Resume Next
Else
MsgBox Error$
Resume ExitFormCurrent
End If 'Aquí termina la rutina de numeración correlativa
End Sub
Private Sub CombCodLInd_Click()
Me.Temarios.SetFocus
End Sub
Private Sub Temarios_Enter()
Me.CodTema.Value = Nz(DMax("CodTema", "03INDICE_TEMATICO"), 0) + 1
Me.Temarios.SetFocus
End Sub
Private Sub CmdConEdiBor_Click()
DoCmd.Close acForm, Me.Name
DoCmd.OpenForm "ÍNDICE TEMÁTICO", , , , acFormEdit
Forms! "ÍNDICE TEMÁTICO", Filtro.AllowAdditions = False 'Pretendo impedir que puedan dar de alta nuevos registros.
Me.CombCodLInd.Visible = False
Me.ComCodLIndConsulta.Visible = True
End SubLes agradezco un montón de antemano!!!
