共用方式為


CallByName Function

This page is specific to the Visual Basic for Applications (VBA) Language Reference for Office 2010.

Executes a method of an object, or sets or returns a property of an object.

Syntax

CallByName(object*, procname, calltype,[args()]*)

The CallByName function syntax has these named arguments:

Part

Description

object

Required; Variant (Object). The name of the object on which the function will be executed.

procname

Required; Variant (String). A string expression containing the name of a property or method of the object.

calltype

Required; Constant. A constant of type vbCallType representing the type of procedure being called.

args()

Optional: Variant (Array).

Remarks

The CallByName function is used to get or set a property, or invoke a method at run time using a string name.

In the following example, the first line uses CallByName to set the MousePointer property of a text box, the second line gets the value of the MousePointer property, and the third line invokes the Move method to move the text box:

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

Example

This example uses the CallByName function to invoke the Move method of a Command button.

The example also uses a form (Form1) with a button (Command1), and a label (Label1). When the form is loaded, the Caption property of the label is set to "Move", the name of the method to invoke. When you click the button, the CallByName function invokes the method to change the location of the button.

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