＋设为首页 ＋添加到收藏夹
先在第一个窗体用MSHFlexGrid控件显示报表,再创件一个窗体,叫他又text显示表的一行全部内容,一个TEXT一个内容
我想在MSHFlexGrid里面双击第一字段的任意一个内容,就能在TEXT里面显示出来,请问怎么写呢?
没看懂
Private Sub MSHFlexGrid1_Click()
Dim R As Integer, C As Integer R为行，C为列
R = MSHFlexGrid1.Row R设置为所点击的行
For C = 0 To MSHFlexGrid1.Cols - 1
text(C) = MSHFlexGrid1.TextMatrix(R, C) 把这一行的内容赋值给TEXT控件数组
Next C
End Sub
text.text=mshflexgrid1.textmatrix(row,col)
Private Sub MSHFlexGrid1_DblClick()
With Me.MSHFlexGrid1
Form1.Text1 = .TextMatrix(.Row, 1) 第1列给Text1，以下同...
Form1.Text2 = .TextMatrix(.Row, 2)
Form1.Text3 = .TextMatrix(.Row, 3)
End With
End Sub
