Button.SendToBack Метод (2007 System)
Обновлен: Ноябрь 2007
Помещает объект Button в конец z-порядка.
Пространство имен: Microsoft.Office.Tools.Excel.Controls
Сборка: Microsoft.Office.Tools.Excel.v9.0 (в Microsoft.Office.Tools.Excel.v9.0.dll)
Синтаксис
'Декларация
Public Function SendToBack As Object
'Применение
Dim instance As Button
Dim returnValue As Object
returnValue = instance.SendToBack()
public Object SendToBack()
Возвращаемое значение
Тип: System.Object
Имеет значение true, если z-порядок успешно изменен; в противном случае имеет значение false.
Заметки
Этот метод устанавливает z-порядок Button к первому индексу в коллекции OLEObjects; нумерация z-порядка противоположна нумерации индекса в коллекции OLEObjects. Чем выше индекс в коллекции OLEObjects, тем ниже z-порядок объекта Button.
Примеры
В следующем примере используется метод BringToFront и SendToBack установки z-порядка трех элементов управления Button на рабочем листе. Если кнопка, в настоящее время, нажата в начале z-порядка, тогда кнопка перемещается в конец коллекции вызовом SendToBack. А если наоборот, то кнопка перемещается в начало коллекции вызовом BringToFront. Обратите внимание, что z-порядок трех кнопок первоначально находится в диапазоне от 2 до 4.Элемент управления-хранилище данных времени выполнения на листе первоначально имеет позицию z-порядка 1. Дополнительные сведения см. в разделе Общие сведения о Runtime Storage Control.
В этом примере демонстрируется настройка уровня документа.
Private Sub ToggleZOrder()
Dim Button1 As Microsoft.Office.Tools.Excel.Controls.Button = _
Me.Controls.AddButton(Me.Range("A1", "B2"), "Button1")
Button1.BackColor = Color.Blue
Dim Button2 As Microsoft.Office.Tools.Excel.Controls.Button = _
Me.Controls.AddButton(Me.Range("B2", "C3"), "Button2")
Button2.BackColor = Color.Red
Dim Button3 As Microsoft.Office.Tools.Excel.Controls.Button = _
Me.Controls.AddButton(Me.Range("C3", "D4"), "Button3")
Button3.BackColor = Color.Green
AddHandler Button1.Click, AddressOf ZOrderButton_Click
AddHandler Button2.Click, AddressOf ZOrderButton_Click
AddHandler Button3.Click, AddressOf ZOrderButton_Click
End Sub
Private Sub ZOrderButton_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)
If ClickedButton.ZOrder = 4 Then
ClickedButton.SendToBack()
Else
ClickedButton.BringToFront()
End If
End Sub
private void ToggleZOrder()
{
Microsoft.Office.Tools.Excel.Controls.Button button1 =
this.Controls.AddButton(this.Range["A1", "B2"],
"button1");
button1.BackColor = Color.Blue;
Microsoft.Office.Tools.Excel.Controls.Button button2 =
this.Controls.AddButton(this.Range["B2", "C3"],
"button2");
button2.BackColor = Color.Red;
Microsoft.Office.Tools.Excel.Controls.Button button3 =
this.Controls.AddButton(this.Range["C3", "D4"],
"button3");
button3.BackColor = Color.Green;
button1.Click += new EventHandler(zOrderButton_Click);
button2.Click += new EventHandler(zOrderButton_Click);
button3.Click += new EventHandler(zOrderButton_Click);
}
void zOrderButton_Click(object sender, EventArgs e)
{
Microsoft.Office.Tools.Excel.Controls.Button clickedButton =
(Microsoft.Office.Tools.Excel.Controls.Button)sender;
if (clickedButton.ZOrder == 4)
{
clickedButton.SendToBack();
}
else
{
clickedButton.BringToFront();
}
}
Разрешения
- Полное доверие для непосредственно вызывающего метода. Этот член не может быть использован частично доверенным кодом. Дополнительные сведения см. в разделе Использование библиотек из не вполне надежного кода.