我只知道一个控件的名字，怎样对该控件进行属性设计？

Question

我只知道一个控件的名字，怎样对该控件进行属性设计？

Answer 1

比如我说我输入一个数字5，和5对应的是Button5，我怎么让程序自动的去改动button5的属性？

Answer 2

哦 这个东西要用callbyname函数或者是集合~

Answer 3

CallByName 函数      执行一个对象的方法，或者设置或返回一个对象的属性。语法CallByName(object, procedurename, calltype,[arguments()])CallByName 函数的语法有以下部分：部分 描述 
object 必需的；变体型（对象）。函数将要执行的对象的名称。 
procedurename 必需的；变体型（字符串）。一个包含该对象的属性名称或者方法名称的字符串表达式。 
calltype 必需的；常数。一个 vbCallType 类型的常数，代表正在被调用的过程的类型。 
arguments() 可选的：变体型（数组）。 
说明CallByName 函数用于获取或者设置一个属性，或者在运行时使用一个字符串名称来调用一个方法。在下面的例子中，第一行使用 CallByName 来设置一个文本框的 MousePointer 属性，第二行得到 MousePointer 属性的值，第三行调用 Move 方法来移动文本框：CallByName Text1, "MousePointer", vbLet, vbCrosshair
Result = CallByName (Text1, "MousePointer", vbGet)
CallByName Text1, "Move", vbMethod, 100, 100
还可以这么办
me.Controls("Label" & CStr(J + 114)).Caption = “AAAA”

Answer 4

没那么复杂，Form.Controls 集合可以通过名称取成员的。
Option ExplicitPrivate Function GetButton(ByVal n As Long) As CommandButton
    Set GetButton = Me.Controls("Button" & n)
End FunctionPrivate Sub Command1_Click()
    Dim btn As CommandButton
    
    Set btn = GetButton(5)
    btn.Caption = "hello"
End Sub