Tengo dos Data porque uno lo uso para sql y el otro para insertar registros
Uso Microsoft Data Bound Grid Control 5.0 (SP3)
Esto es para insertar registros
TXTnombre Datafield Nombre
TXTnumero Datafield Numero
CMDinsertar (boton)
Los dos estan con el datasource en data1
Esto es para el SQL
TXTbuscar Datafield Nombre
Datasource Data2
CMDbuscar (boton)
Les paso el codigo.
Private Sub CMDbuscar_Click()
busqueda = TXTbuscar.Text
SQL = "SELECT * FROM Tabla WHERE Nombre like '" & busqueda & "*'"
Data2.RecordSource = SQL
Data2.Refresh
End Sub
Private Sub CMDinsertar_Click()
Data1.Refresh
Data1.Recordset.AddNew
End Sub
Private Sub Data1_Validate(Action As Integer, Save As Integer)
End Sub
Private Sub Data2_Validate(Action As Integer, Save As Integer)
End Sub
Private Sub Form_Load()
End Sub
Private Sub TXTbuscar_Change()
End Sub
Private Sub TXTnombre_Change()
End Sub
Private Sub TXTnumero_Change()
End Sub
Espero haberme expresado bien, disculpen mi nivel tan bajo
