在给vsflexgrid 报表的第2行第2列赋值1-100时出现：无效属性数组索引，应怎样修改，谢谢！

Private Sub Command3_Click()
Dim k As Integer
For k = 1 To 100
VSFlexGrid1.TextMatrix(k + 1, 2) = k

Next
End Sub

VSFlexGrid1是VSFlexGrid1， MSFlexGrid1是MSFlexGrid1

问题已解决！