怎么读取MSFlexGrid1的值到文本框

Question

怎么读取MSFlexGrid1的值到文本框?

Answer 1

MSHFlexGrid和MSFlexGrid控件用法大部分都一样    Text1.Text = MSHFlexGrid1.TextMatrix(x, y)   'x,y定位单元格

Answer 2

还有一种方法就是先指定好行和列再用.TEXT属性获取内容:GRID1.ROW=2
GRID1.COL=3
TEXT1.TEXT=GRID1.TEXT

Answer 3

注意将Text1的Multiline属性设为True
Private Sub Command1_Click()
S = ""
MSFlexGrid1.Cols = 10
MSFlexGrid1.Rows = 10
For i = 0 To 9
For j = 0 To 9
S = S & MSFlexGrid1.TextMatrix(i, j) & "   "
Next
Next
Text1.Text = S
End SubPrivate Sub Form_Load()MSFlexGrid1.Cols = 10
MSFlexGrid1.Rows = 10
For i = 0 To 9
For j = 0 To 9
MSFlexGrid1.TextMatrix(i, j) = i & j
Next
Next
End Sub

Answer 4

Private Sub MSHFlexGrid1_Click()
   Text1.Text = MSHFlexGrid1.TextMatrix(MSHFlexGrid1.RowSel, MSHFlexGrid1.ColSel)
End Sub