Question

vb中怎么用"&"来链接一个控件名称？

比如：
一个label控件的名称为 a1
然后b=1
‘那么我要用b来表示a1：
form1.a & b.caption = "你好" '这里的 a&b 指代的是a1控件（因为b=1），但是这个语句行不通，请问怎么修改？

Answer 1

这个就好象以前的FoxBase里的叫做宏代换，可是在VB里不行。

方法一：就是楼上说的用控件数组
方法二：
Dim MyLabel(3) As Label
Set MyLabel(1) = Label1
Set MyLabel(2) = Label2
Set MyLabel(3) = Label3

Dim b As Integer
b = 1
MyLabel(b).Caption = "你好！"

方法三：
Dim MyContr As Control
Dim b As Integer
b = 1
For Each MyContr In Form1.Controls
If Left(MyContr.Name, 5) = "Label" And Right(MyContr.Name, 1) = CStr(b) Then
MyContr.Caption = "你好！"
Exit For
End If
Next

Answer 2

用控件数组。

追问

？怎么用？

追答

自己百度：vb6 控件数组

追问

靠 我来提问不是要你来叫我搜索的
你不会复制粘贴啊

追答

那就等其他人给你粘吧。