附註: 我們想要以您的語言,用最快的速度為您提供最新的說明內容。本頁面是經由自動翻譯而成,因此文中可能有文法錯誤或不準確之處。讓這些內容對您有所幫助是我們的目的。希望您能在本頁底部告訴我們這項資訊是否有幫助。此為英文文章出處,以供參考。
執行方法的物件,或設定或傳回物件的屬性。
語法
CallByName ( 物件 、 procname、 calltype [,引數()])
CallByName函數語法具有下列引數:
引數 | 描述 |
---|---|
物件 |
所需。variant(物件)。函數將會在其執行之物件的名稱。 |
procname |
所需。variant(字串)。字串運算式,其中包含的屬性名稱或物件的方法。 |
calltype |
所需。常數。輸入vbCallType代表類型的程序呼叫的常數。 |
引數 () |
選用。variant(陣列)。 |
註解
CallByName函數會使用取得或設定屬性時,或是叫用在執行階段使用字串名稱的方法。
在下列範例中,第一行使用CallByName文字方塊的MousePointer屬性設定第二行取得 [ MousePointer ] 屬性中的值,第三行叫用移動方法若要移動文字方塊:
CallByName Text1, "MousePointer", vbLet, vbCrosshair
Result = CallByName (Text1, "MousePointer", vbGet)
CallByName Text1, "Move", vbMethod, 100, 100
範例
附註: 下列範例示範如何在 Visual Basic for Applications (VBA) 模組中使用此函數。 如需使用 VBA 的詳細資訊,請在 [搜尋] 旁的下拉式清單中選取 [開發人員參考],並在 [搜尋] 方塊中輸入一個或多個字詞。
此範例使用CallByName函數叫用的命令按鈕的 [移動] 方法。
範例也會使用的按鈕 (Command1) 與標籤 (Label1) 的表單 (Form1)。載入表單時,標籤的 [標題] 屬性設定叫用的方法名稱在此情況下,[移]。當您按一下按鈕時, 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