关于一组具有相同命名方式的控件赋值的问题,谢谢!

[raver]

例如:
有一变量为:val_1 表示某窗体上列表框名,名称都是val_1 & i(i=1,2...10)
另一变量为:val_2 表示某窗体上文本框名,名称都是val_2 & i(i=1,2...10)

我现在想用一个循环,将列表框的值赋给文本框
for i=1 to 10
val_2 & i =val_1 $ i
next i
但显然存在问题,请各位指正

还有请问指向变量的变量在vb中是如何使用的,在vba中是否也相同,如能举个通俗易懂的例子更好.

谢谢!

[rainstormmaster]

dim s1 as string,s2 as string
for i=1 to 10
s1="val_2"+cstr(i)
s2="val_1"+cstr(i)
controls(s1).text=controls(s2).text
next i

[rainstormmaster]

顺便说一句，vba不支持控件数组

你只能用我上面说的方法实现

[raver]

谢谢大家的帮助,我结贴了! :-)

[totti0115]

dim totti(10) as integer
10个变量的数组

[饮水需思源]

将控件定义成控件数组即可用循环

[simanh]

你可以把同类控件定义成控件数据，比较容易处理
或许你把这些变量定义成数据来处理

[simanh]

变量的变量？好象不可以的吧，违反变量命名规定吧，为什么不用数组呢

[raver]

to leftie & simanh()

请问"控件数组"如何定义,我刚刚接触VB,请你在说明的同时能举个例子最好,:) 谢谢!

[raver]

比如说,如何定义一组text类型的控件数组

[wumy_ld]

首先在窗体上放一个控件，比如Text1，在该控件上单击右键，选择“复制”，然后在窗体上其它区域单击右键，选择“粘贴”，vb会提示“已经存在一个控件Text1，要创建控件数组吗？”，单击“是”，以后再复制该控件就不会提示了。多复制几个，呵呵，直到够用为止，这些控件的名字都是一样的，注意一下，index属性不同，这样在程序里可以区分开。
要用第一个控件，可以这样strTemp=Text1(0).Text，索引是从零开始的。

[raver]

thanks kissoflife

但是这样的方法好像在VBA环境下无法跳出提示,并且请问VBA支持"控件数组"吗?