你的目的是用保存的字符串来指向已有的对象?这样:Dim myControl As ControlFor Each myControl In Me.Controls
If myControl.Name = "Label1" Then
MsgBox myControl.Name
Exit For
End If
Next

解决方案 »

  1.   

    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
      

  2.   

    zyl910(910:分儿,我来了!) 
    大虾,你搞错了!
    我要的是一个能够把一个字符串 识别为一个对象的函数,以后我对该字符串的引用(其实他是通过函数转化过的)就是等于对该对象的引用,因为我有好多的对象,而我要写一个通用的函数。
    CallByNane函数只是通过他来设置对象的属性或方法。另外,我搞不懂,通过这个函数来设置对象的属性,和通过代码直接设置对象或引用对象的方法有什么区别呢?好像不见得有什么好处,只是多了一种方法而已!你说呢!
    赫赫!
      

  3.   

    CreateObject 函数,具体用法自己查MSDNCreateObject(class,[servername])class 参数使用 appname.objecttype 这种语法就是应用程序名称.类名称