VB_如何使MSHFlexgrid的内容显示到文本框中?

我用MSHFlexgrid显示查询得出的若干条数据。（MSHFlexgrid有固定行1行，没有固定列！）

请问怎样使当我在点击其中的某条数据的时候，该条数据的内容分别显示到Form中对应的文本框当中。


例如,当点击MSHFlexgrid的第4行时：
                     
                      第4行第3列显示到Text1，

                          第4行第6列显示到Text2,

                      第4行第9列显示到Text3.
                 

---

Private Sub MSHFlexGrid1_Click()
    For i = 0 To MSHFlexGrid1.Cols - 1
        Text1(i).Text = MSHFlexGrid1.TextMatrix(.Row, i)
    Next
End Sub

Leftie起得好早呀

---

private sub mshflexgrid_click()
    with mshflexgrid
        text1.text=.textmatrix(.row,2)
        text2.text=.textmatrix(.row,5)
        text3.text=.textmatrix(.row,8)
    end with
end sub
举左手,要为人民币服务!

---

关注！

---

text1.text=msflexgrid1.textmatrix(msflexgrid1.row,2)
text2.text=msflexgrid1.textmatrix(msflexgrid1.row,5)