Button.Application 屬性

取得 Application 物件，表示 Button 的建立者。

命名空間：  Microsoft.Office.Tools.Excel.Controls
組件：  Microsoft.Office.Tools.Excel.v4.0.Utilities (在 Microsoft.Office.Tools.Excel.v4.0.Utilities.dll 中)

語法

'宣告
Public ReadOnly Property Application As Application

public Application Application { get; }

屬性值

型別：Microsoft.Office.Interop.Excel.Application
Application 物件，表示 Button 的建立者。

範例

下列程式碼範例會將 Button 控制項加入至目前的工作表。 這個按鈕的 Click 事件處理常式會顯示 Creator 和 Application 屬性的值。

這是示範文件層級自訂的範例。

Private Sub DisplayCreatorAndApplication()
    Dim CreatorButton1 As Microsoft.Office.Tools.Excel.Controls.Button = _
        Me.Controls.AddButton(Me.Range("B2", "C3"), "CreatorButton1")
    CreatorButton1.Text = "Click to view creator and application"
    AddHandler CreatorButton1.Click, AddressOf CreatorButton_Click
End Sub

Private Sub CreatorButton_Click(ByVal sender As Object, ByVal e As EventArgs)
    Dim ClickedButton As Microsoft.Office.Tools.Excel.Controls.Button = _
        CType(sender, Microsoft.Office.Tools.Excel.Controls.Button)

    Dim ApplicationString As String = "The current application is " & _
        ClickedButton.Application.Name.ToString()

    If ClickedButton.Creator = Excel.XlCreator.xlCreatorCode Then
        MsgBox(ApplicationString & ". Created by Microsoft Excel")
    Else
        MsgBox(ApplicationString & _
            ". Created by an application other than Microsfot Excel")
    End If
End Sub

private void DisplayCreatorAndApplication()
{
    Microsoft.Office.Tools.Excel.Controls.Button creatorButton1 =
            this.Controls.AddButton(this.Range["B2", "C3"],
            "creatorButton1");
    creatorButton1.Text = "Click to view creator and application";
    creatorButton1.Click += new EventHandler(creatorButton_Click);
}

void creatorButton_Click(object sender, EventArgs e)
{
    Microsoft.Office.Tools.Excel.Controls.Button clickedButton =
        (Microsoft.Office.Tools.Excel.Controls.Button)sender;

    string applicationString = "The current application is " +
        clickedButton.Application.Name.ToString();

    if (clickedButton.Creator == Excel.XlCreator.xlCreatorCode)
    {
        MessageBox.Show(applicationString +
            ". Created by Microsoft Excel");
    }
    else
    {
        MessageBox.Show(applicationString +
            ". Created by an application other than Microsfot Excel");
    }
}

.NET Framework 安全性

• 完全信任立即呼叫者。這個成員無法供部分信任的程式碼使用。如需詳細資訊，請參閱從部分受信任程式碼使用程式庫。

請參閱

參考

Button 類別

Microsoft.Office.Tools.Excel.Controls 命名空間