Button.Creator 屬性
取得值,指出建立 Button 所在的應用程式。
命名空間: Microsoft.Office.Tools.Excel.Controls
組件: Microsoft.Office.Tools.Excel.v4.0.Utilities (在 Microsoft.Office.Tools.Excel.v4.0.Utilities.dll 中)
語法
'宣告
Public ReadOnly Property Creator As XlCreator
public XlCreator Creator { get; }
屬性值
型別:Microsoft.Office.Interop.Excel.XlCreator
xlCreatorCode 。
備註
因為 Button 是在 Microsoft Office Excel 中建立,所以這個屬性會傳回字串 XCEL,這個字串相當於十六進位數字 5843454C。
範例
下列程式碼範例會將 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 安全性
- 完全信任立即呼叫者。這個成員無法供部分信任的程式碼使用。如需詳細資訊,請參閱從部分受信任程式碼使用程式庫。