用VB MSFlexGrid控件 有行数限制没？导入excel表为啥出现内存溢出的情况解决办法

用VB MSFlexGrid控件 有行数限制没？导入excel表为啥出现内存溢出的情况
代码 With Me.MSFlexGrid1
  .Clear
  .Rows = 1
  i = iXlsRow
  '必须确保数据的第一列值不为空
  Do While xlSheet.Cells(i, 1) <> ""
  If i > iXlsRow Then .AddItem ""
  For j = 1 To iXlsCol
  .TextMatrix(i - iXlsRow, j - 1) = xlSheet.Cells(i, j)
  Next
  i = i + 1
  If i Mod 30 = 0 Then: DoEvents
  'Me.ccrpProgressBar1.Value = Me.ccrpProgressBar1 + 1
  Loop
  End With

我导入excel表 当excel表有1W行的时候不会出问题 不过 一旦超过11600行就会报错 说是内存溢出
那位高人指点下

------解决方案--------------------
没有数据绑定的话，往里写数据是会有这个现象~~~
你可以分页啊，每次写一页~~~