关于控件存储数据的请教（动态二维数组）

Question

各位大虾：
    我编了一个控件，现在需要将数据库表里的内容读出来分析，思路是在控件里做一个动态的二维数组，但一直没有成功。
    1。表里的数据是动态提取的（共11列，条数是动态的）
    2。在控件中做一个过程（SUB），一条一条读取
  请教各位了！

Answer 1

Option Explicit
Dim MyData() As StringPublic sub AddData(ByVal tName as string , ByVal fAge as String)
Dim I as inter
I= UBound(Mydata,2)+1 ----下标越界  
ReDim Preserve MyData(11, I)
Mydata(0,I)= tName
Mydata(1,I)= tAgeend sub以上代码出错!

Answer 2

总归一个目的: Mydata() 数组是公共定义,计2列若干行(取决于数据库表中的几条记录,无最大限制),控件中几个过程均会使用到.