Codigo Básico para Base de Datos en Visual Basic

Botones para Control-ADO, Recuerden Configurar el ADO, y luego el DataSource y el Data Field de cada caja de Texto o Combo....!!!

Listas Básicas

Boton Nuevo

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

Boton Guardar
Private Sub Command2_Click()
Adodc1.Recordset.Update
Adodc1.Refresh

MsgBox "Registro Guardado" 
End Sub

Boton Modificar
Private Sub Command4_Click()
Adodc1.Recordset.Update
Adodc1.Refresh
MsgBox "Registro Modificado"
End Sub

Boton Eliminar

Private Sub Command6_Click()
Adodc1.Recordset.Delete

MsgBox "Registro Eliminado" 
End Sub



Publicar un comentario

0 Comentarios