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
Get
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
- Полное доверие для непосредственно вызывающего метода. Этот член не может быть использован частично доверенным кодом. Дополнительные сведения см. в разделе Использование библиотек из не вполне надежного кода.