PROGRAMA HISTORIA CLINICA DE PACIENTES - SEGUNDO INFORMATICA

Private Sub Command1_Click()
AdoDatos.Recordset.AddNew
End Sub

Private Sub Command2_Click()
AdoDatos.Recordset.Update
End Sub

Private Sub Command3_Click()
AdoDatos.Recordset.Delete
End Sub

Private Sub Command4_Click()
AdoDatos.Recordset.MoveFirst
End Sub

Private Sub Command5_Click()
AdoDatos.Recordset.MoveLast
End Sub

Private Sub Command6_Click()
AdoDatos.Recordset.MoveNext
End Sub