我弄了16个文本框
要用FOR语句把文本框的内容赋值给数组text(1 to 16)
但不行哦
大家帮我看看该怎么解决啊
谢谢!
代码如下:
for i=1 to 16
text(i)="text"+i+".text"
next
for i=1 to 16
print text(i)
next
输出的是字符窜
text1.text
---------
text16.text
而不是我在文本框中输入的内容。

解决方案 »

  1.   

    改一下:
    text(i)=me("text" & i).text
    不过,建议你用控件数组来处理。还有啊,你那两个for循环,可以并成一个for循环。
      

  2.   

    Me("ControlName As String") = Me.ControlName设计时在窗体上放置一个控件,然后将设置Index属性为某个数。这样所有Name相同,而Index属性不同的属性组成一个控件数组。它们共同使用相同的事件过程。你也可以在运行过程中使用Load增加控件,使用Unload删除控件。http://www.xhstudio.net/show.asp?id=2058