我有一个名为“text1,text2,text2 ...”的表单输入,我有一个字符串数组来填充输入...
我想要的是......
text1.Value = Invoice.input(1)
text2.Value = Invoice.input(2)
text3.Value = Invoice.input(3)
但这看起来很像我知道可以通过一个简单的for循环来完成。
for loop = 1 To loop = 50
text+i.Value = Invoice.input(i)
next loop
如何使用text + i来调用我实际上称为text1的var?
在进行Google搜索时,有些人说要使用Eval()函数,但这对我不起作用。
感谢。
答案 0 :(得分:5)
这应该这样做:(或至少是帮助)
Sub ControlName()
Dim i As Long
For i = 1 To 50
UserForm1.Controls("text" & i).Value = Invoice.input(i)
Next
End Sub