CallByName 函数

执行对象的方法,或者设置或返回对象 对象 。

语法

CallByName (对象 procname,calltype [, args () ])

CallByName函数语法具有以下参数:

参数

说明

对象

必需。 变体 (对象) 。 要执行函数的对象的名称。

procname

必需。 变量 (字符串) 。 包含对象的属性或方法名称的字符串表达式。

calltype

必需。 常量vbCallType类型的常量,表示要调用的过程的类型。

args ()

可选。 Array (变量) 。


备注

CallByName函数用于获取或设置属性,或运行时使用字符串名称调用方法。

在下面的示例中,第一行使用 CallByName 设置文本框的 MousePointer 属性,第二行获取 MousePointer 属性的值,第三行调用 Move 方法来移动文本框:

CallByName Text1, "MousePointer", vbLet, vbCrosshair
Result = CallByName (Text1, "MousePointer", vbGet)
CallByName Text1, "Move", vbMethod, 100, 100

示例

注意: 以下示例演示了在 VBA Visual Basic for Applications (模块) 函数。 有关使用 VBA 的信息,请在"搜索"旁边的下拉列表中选择"开发人员参考",在搜索框中输入一个或多个术语。

此示例使用 CallByName 函数调用命令按钮的 Move 方法。

该示例还使用带有按钮 (Form1) 和 (Command1) 标签的窗体 (Label1) 。 加载窗体时,标签的 Caption 属性设置为要调用的方法的名称,在这种情况下为"Move"。 单击该按钮时 ,CallByName 函数将调用方法来更改按钮的位置。

Option Explicit
Private Sub Form_Load()
Label1.Caption = "Move"' Name of Move method.
End Sub
Private Sub Command1_Click()
If Command1.Left <> 0 Then
CallByName Command1, Label1.Caption, vbMethod, 0, 0
Else
CallByName Command1, Label1.Caption, vbMethod, 500, 500
End If

需要更多帮助?

扩展你的 Office 技能
了解培训
抢先获得新功能
加入 Office 预览体验计划

此信息是否有帮助?

谢谢您的反馈!

谢谢你的反馈! 可能需要转接到 Office 支持专员。

×