¿VB 6.0 Como cargar datos de un datagrid en textbox a través de un combobox?

Cree una base de datos desde visual basic 6.0, la enlace con el datagrid.

Ahora, con un Combobox selecciono uno de los campos de la tabla, y necesito que envíe el resto de los datos a 2 textbox... Tengo estos códigos...

Private Sub Form_Load()
Adodc1.Refresh
With Adodc1.Recordset
Do Until .EOF
Combo1.AddItem ![Seleccion]
.MoveNext
Loop
End With
End Sub

Private Sub Combo1_Click()
If Combo1.Text <> "" Then
Adodc1.RecordSource = "Select * from OpticoACL200 where Seleccion='" & Combo1 & "'"
Adodc1.Refresh
DataGrid1.Refresh
End If
End Sub

No se como podría enlazar los text con el combo y el datagrid...