"El valor de BOF o EOF es true, o el actual registro se elimino, la operación solicitada requiere un registro actual." ERROR
hola mi error esta en el boton de altas, aca esta el codigo
seleccionar = MsgBox("Desea agregar un nuevo registro?", vbYesNo, "CH")
If seleccionar = vbYes Then
seleccionar1 = True
adoagenda.Recordset.AddNew
btnGuardar.Enabled = True
btnCancelar.Enabled = True
btnNuevo.Enabled = False
btnModificar.Enabled = False
btnSalir.Enabled = False
txtevento.Locked = False
txtfde.Locked = False
txthde.Locked = False
txtevento.Text = ""
txtfde.Text = ""
txthde.Text = ""
txtevento.SetFocus
adoagenda.Enabled = False
End If
