Editar dados da DataGrid

[Faccruz 0]

Boa tarde,

 

Como posso fazer para que quando o usuário clicar em alguma linha da DataGrid a mesma preencha TextBox na mesma tela?

 

Os dados estão armazenados em um arquivo XML.

 

Visual Basic 6

[gabrieldb 5]

Bom em XML eu não sei mais eu utilizo assim pra puxar do BD

 

Private Sub DataGrid1_Click()
If rs.EOF Then
     MsgBox "Operação não permitida sem registros!", vbExclamation, "Sistema Integrado"
   Else
txtCodigo.Text = rs("codigo")
txtEmpresa.Text = Trim(rs("nome"))
txtEstab.Text = Trim(rs("estab"))
  End If
End Sub