Lo que hace mi codigo es al selecionar una fila del datagrid1 me muestra los registros de esa fila en las cajas de texto y utilizo los botones modificar y eliminar hasta ahi todo ok aqui les dejo el codigo para poder hacer mi pregunta
Código:
Ahora lo que quiero hacer es que el datagrid1 tiene que estar en un form1 y al hacer click o dobleclick en una fila llame a un form2 donde deberan estar cargados en las cajas de texto los registros de la fila que se seleciono en el datagrid del form1 y recien ahi poder modificarlos.Es posible lograr hacer eso con vb6 espero su ayuda, saludos Dim BD As ADODB.Connection Dim RG_EMPLEADOS As ADODB.Recordset Private Sub Form_Load() Set BD = New ADODB.Connection Set RG_EMPLEADOS = New ADODB.Recordset RG_EMPLEADOS.CursorLocation = adUseClient BD.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\MODIFICARDATOS.mdb;Persist Security Info=False" RG_EMPLEADOS.Open "SELECT * FROM EMPLEADOS", BD, adOpenStatic, adLockOptimistic 'cargamos el datagrid Set DataGrid1.DataSource = RG_EMPLEADOS End Sub Private Sub PRESENTAR() With RG_EMPLEADOS Text1 = !CODIGO Text2 = !APELLIDOS Text3 = !NOMBRES End With End Sub Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer) PRESENTAR End Sub Private Sub CMDMODIFICAR_Click() With RG_EMPLEADOS !CODIGO = Text1 !APELLIDOS = Text2 !NOMBRES = Text3 .Update End With 'CMDELIMINAR.Enabled = False 'CMDMODIFICAR.Enabled = False MsgBox "Se modifico el registro" End Sub Private Sub CMDELIMINAR_Click() With RG_EMPLEADOS .Delete End With 'CMDELIMINAR.Enabled = False 'CMDMODIFICAR.Enabled = False MsgBox "Se elimino el registro" CMDNUEVO_Click End Sub