Button.Border Свойство (2007 System)
Обновлен: Ноябрь 2007
Возвращает объект Border, представляющий границу элемента управления Button.
Пространство имен: Microsoft.Office.Tools.Excel.Controls
Сборка: Microsoft.Office.Tools.Excel.v9.0 (в Microsoft.Office.Tools.Excel.v9.0.dll)
Синтаксис
'Декларация
Public ReadOnly Property Border As Border
'Применение
Dim instance As Button
Dim value As Border
value = instance.Border
public Border Border { get; }
Значение свойства
Тип: Microsoft.Office.Interop.Excel.Border
Объект Border, представляющий границу объекта Button.
Примеры
Следующий пример кода добавляет элемент управления Button в рабочий лист и использует свойство Border окраски границы ячейки в зеленый цвет. Обработчик событий кнопкиClick использует свойство Visible скрытого положения кнопки и предлагает пользователю выбрать между ее скрытым и видимым положением.
В этом примере демонстрируется настройка уровня документа.
Private Sub AlterControlAppearance()
Dim HideButton As Microsoft.Office.Tools.Excel.Controls.Button = _
Me.Controls.AddButton(Me.Range("B2", "C3"), "HideButton")
HideButton.Text = "Click to hide"
HideButton.Border.Color = ColorTranslator.ToOle(Color.Green)
AddHandler HideButton.Click, AddressOf hideButton_Click
End Sub
Private Sub HideButton_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)
ClickedButton.Visible = False
' Allow the user to make the button visible.
If DialogResult.Yes = MessageBox.Show( _
"This sheet contains a hidden control." & _
" Make it visible?", "Example", MessageBoxButtons.YesNo) Then
ClickedButton.Visible = True
End If
End Sub
private void AlterControlAppearance()
{
Microsoft.Office.Tools.Excel.Controls.Button hideButton =
this.Controls.AddButton(this.Range["B2", "C3"],
"hideButton");
hideButton.Text = "Click to hide";
hideButton.Border.Color = ColorTranslator.ToOle(Color.Green);
hideButton.Click += new EventHandler(hideButton_Click);
}
void hideButton_Click(object sender, EventArgs e)
{
Microsoft.Office.Tools.Excel.Controls.Button clickedButton =
(Microsoft.Office.Tools.Excel.Controls.Button)sender;
clickedButton.Visible = false;
// Allow the user to make the button visible.
if (DialogResult.Yes ==
MessageBox.Show("This sheet contains a hidden control." +
" Make it visible?", "Example", MessageBoxButtons.YesNo))
{
clickedButton.Visible = true;
}
}
Разрешения
- Полное доверие для непосредственно вызывающего метода. Этот член не может быть использован частично доверенным кодом. Дополнительные сведения см. в разделе Использование библиотек из не вполне надежного кода.