CallByName 函數

重要:  本文係由機器翻譯而成,請參閱免責聲明。本文的英文版本請見這裡,以供參考。

執行方法的物件,或設定或傳回物件的屬性。

語法

CallByName 物件 procnamecalltype [,引數()])

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

附註: 機器翻譯免責聲明︰本文係以電腦系統翻譯而成,未經人為介入。Microsoft 提供此等機器翻譯旨在協助非英語系使用者輕鬆閱讀 Microsoft 產品、服務及技術相關內容。基於本文乃由機器翻譯而成,因此文中可能出現詞辭、語法、文法上之錯誤。

擴展您的技能
探索訓練
優先取得新功能
加入 Office 測試人員

這項資訊有幫助嗎?

感謝您的意見反應!

感謝您的意見反應! 我們將協助您與其中一位 Office 支援專員連絡以深入了解您的意見。

×