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

解决方案 »

  1.   

    只会帖 MSDN 。没出息!
      

  2.   

    用 CREATEOBJECT 创建EXCEL对象,再具体我也不清楚啦!我不喜欢这个!当TEXT 获得焦点时检测有无STRING,无则用 SENDKEY 发送一个 TAB 用LABEL 数组不就可以了吗!!!
      

  3.   

    Private Sub Text1_GotFocus()
        if (len(text1.text)=0) then sendkeys(vbTab)
    End SubPrivate Sub Form_Load()
        dim a 
        for each a in me.controls
            if left(ucase(a.name),5)="LABEL" then a.caption=right(a.name,len(a.name)-5)
        next
    End Sub
      

  4.   

    欢迎你去www.myvc.net编程技术论坛  
    你可以在那里交流编程技术  
    注册用户请去以下帖子领分  
    http://www.csdn.net/expert/topic/682/682036.xml?temp=.5972101  
    http://www.csdn.net/expert/topic/681/681917.xml?temp=.5434992  
    http://www.csdn.net/expert/topic/676/676074.xml?temp=.9520075  
    http://www.csdn.net/expert/topic/641/641938.xml?temp=5.826968E-02
      

  5.   

    阿飞:你理解错我的意思了,我是举个例子,具体是如何实现LABEL1.CAPTION=a1、LABEL2.CAPTION=a2、LABEL3.CAPTION=a3、LABEL4.CAPTION=a4……a1、a2、a3、a4……指EXCEL中的单元格
      

  6.   

    用Data控件或DataGrib控件更省事!