如何实现选中datagrid里的内容，text就可以显示
比如
编码
1 11 111 1111
2 22 222 2222
我选中第一条那么text(编码)就会自动显示1
谢谢各位的指点

Text1.Text = Adodc1.Recordset.Fields(0)
Text2.Text = Adodc1.Recordset.Fields(1)
这样写可不可以？

Private Sub Data1_Click()
If Data1.Row = 5 Then
MsgBox "asdf"
End If

End Sub