怎么读取MSFlexGrid1的值到文本框

[sum]

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

[sum]

不好意思,,是MSHFlexGrid1

[xrongzhen]

MSHFlexGrid和MSFlexGrid控件用法大部分都一样

    Text1.Text = MSHFlexGrid1.TextMatrix(x, y)   'x,y定位单元格

[hyp429]

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

[熊孩子开学喽]

[Quote=引用 2 楼 xrongzhen 的回复:]
MSHFlexGrid和MSFlexGrid控件用法大部分都一样

VB code
Text1.Text = MSHFlexGrid1.TextMatrix(x, y) 'x,y定位单元格
[/Quote]

还有一种方法就是先指定好行和列再用.TEXT属性获取内容:

GRID1.ROW=2
GRID1.COL=3
TEXT1.TEXT=GRID1.TEXT

[sum]

怎么定位??比如要读取一行的值??

[sum]

如果读几行呢又怎么做??????

[SYSSZ]

注意将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 Sub

Private 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