控件动态名称,请教代码要如何写?

控件动态名称,请问代码要怎么写???
本帖最后由 bcrun 于 2013-05-27 14:11:02 编辑
问一下各位兄弟,我把一个控件数组名称放在数据库的字段里,
如:Text1(1) 存入数据库KJMC字段 格式: Text1_1

下面是取回:
dim txt as Object
dim KJ as Variant

kj=split(rs!kjmc,"_")

set txt=me.Container(kj(0))'错误提示:必须为对象数组指定索引,用下面这个也不行
txt(kj(1)).text="AAAA" 


set txt=me.Container(kj(0)(kj(1)))'错误提示;类型不匹配
txt.text="AAAA" 

请大家指点一二
------解决方案--------------------
先创建控件数组,然后只留下(0)的那个,根据程序需要再加载

大概思路是这样,能理解吗?