Question

vb中用变量表示控件名

一个语句：labelx.caption=......其中想用x代表数字，实现对不同空间属性的更改。请问怎样做

Answer 1

是做不到的，只能使用控件数组 其实呢，是有办法实现的，但需要一个vba6.dll控件，然后声明EbExecuteLine函数，然后就可以使用 ExecuteLine 函数了，使用这语句 ExecuteLine Text1.Text 就可以运行在Text1里输入的代码。Private Declare Function EbExecuteLine Lib "vba6.dll" (ByVal pStringToExec As Long, ByVal Unknownn1 As Long, ByVal Unknownn2 As Long, ByVal fCheckOnly As Long) As Long

Answer 2

Dim i As Integer
For i = 1 To 10 '多少个你自己定
Load Label1(i)
Label1(i).Caption = i '属性自己定
Label1(i).Left = Label1(i - 1).Left + 2000 '属性自己定
Label1(i).Visible = True '设置为可视
Next i

Answer 3

这个用数组好做点dim label(10) as label