MSFlexGrid问题

Question

在这段代码前
要先把MSFlexGrid1的行数和列数设置为10以上.

Answer 1

应设为11以上，msflexgrid的下标是从0开始的。

Answer 2

MSFlexgrid1.rows=10
MSFlexgrid1.cols=10
Dim i,j As integer
for i=0 to MSFLexGrid1.rows-1
     for j=0 to MSFlexgrid1.Cols-1
          MSFlexGrid1.TextMatrix(i, j) = i
     next j
next i
如果有不可移动列，改成
MSFlexgrid1.row=i
MSFlexgrid1.col=j
MSFlexGrid1.Text(i, j) = i

Answer 3

For i = 1 To 10
    For j = 1 To 10
        MSFlexGrid1.col=j
        MSFlexGrid1.row=i
        MSFlexGrid1.TextMatrix(MSFlexGrid1.col,MSFlexGrid1.row) = i
    Next
Next