Button.Top - свойство
Возвращает или задает расстояние в точках между верхним краем Button и верхним краем рабочего листа.
Пространство имен: Microsoft.Office.Tools.Excel.Controls
Сборка: Microsoft.Office.Tools.Excel.v4.0.Utilities (в Microsoft.Office.Tools.Excel.v4.0.Utilities.dll)
Синтаксис
'Декларация
Public Property Top As Double
Get
Set
public double Top { get; set; }
Значение свойства
Тип: System.Double
Расстояние в точках между верхним краем Button и верхним краем рабочего листа.
Заметки
Значение свойства Button.Top указывается в пунктах, в то время как значение свойства Control.Top указывается в точках.
Примеры
В следующем примере кода сравнивается поведение двух элементов управления Button, связанное с изменением их размеров и местоположения на листе. Обработчик событий Click, первой кнопки изменяет значения ее свойств Height и Width так, что размер кнопки изменяется, но она остается в том же месте книги. Обработчик событий Click, второй кнопки изменяет значения ее свойств Top и Left изменяя ее расположение на рабочем листе, но оставляя ее прежний размер.
В этом примере демонстрируется настройка уровня документа.
Private Sub ModifySizeAndLocation()
Dim SizeButton As Microsoft.Office.Tools.Excel.Controls.Button = _
Me.Controls.AddButton(25, 30, 100, 25, "SizeButton")
SizeButton.Name = "SizeButton"
SizeButton.Text = "Click to resize"
AddHandler SizeButton.Click, AddressOf PointButtons_Click
Dim LocationButton As Microsoft.Office.Tools.Excel.Controls.Button = _
Me.Controls.AddButton(25, 150, 100, 25, "LocationButton")
LocationButton.Name = "LocationButton"
LocationButton.Text = "Click to move"
AddHandler LocationButton.Click, AddressOf PointButtons_Click
End Sub
' Represents the toggle states of the buttons.
Private toggleState1 As Boolean = True
Private toggleState2 As Boolean = True
Private Sub PointButtons_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)
' Toggle the Height and Width of sizeButton.
If ClickedButton.Name = "SizeButton" Then
If toggleState1 Then
ClickedButton.Height = 40
ClickedButton.Width = 80
toggleState1 = False
Else
ClickedButton.Height = 25
ClickedButton.Width = 100
toggleState1 = True
End If
' Toggle the Left and Top of locationButton.
Else
If toggleState2 Then
ClickedButton.Left = 50
ClickedButton.Top = 100
toggleState2 = False
Else
ClickedButton.Left = 25
ClickedButton.Top = 150
toggleState2 = True
End If
End If
End Sub
private void ModifySizeAndLocation()
{
Microsoft.Office.Tools.Excel.Controls.Button sizeButton =
this.Controls.AddButton(25, 30, 100, 25,
"sizeButton");
sizeButton.Name = "sizeButton";
sizeButton.Text = "Click to resize";
sizeButton.Click += new EventHandler(pointButtons_Click);
Microsoft.Office.Tools.Excel.Controls.Button locationButton =
this.Controls.AddButton(25, 150, 100, 25,
"locationButton");
locationButton.Name = "locationButton";
locationButton.Text = "Click to move";
locationButton.Click += new EventHandler(pointButtons_Click);
}
// Represents the toggle states of the buttons.
bool toggleState1 = true;
bool toggleState2 = true;
void pointButtons_Click(object sender, EventArgs e)
{
Microsoft.Office.Tools.Excel.Controls.Button clickedButton =
(Microsoft.Office.Tools.Excel.Controls.Button)sender;
// Toggle the Height and Width of sizeButton.
if (clickedButton.Name == "sizeButton")
{
if (toggleState1)
{
clickedButton.Height = 40;
clickedButton.Width = 80;
toggleState1 = false;
}
else
{
clickedButton.Height = 25;
clickedButton.Width = 100;
toggleState1 = true;
}
}
// Toggle the Left and Top of locationButton.
else
{
if (toggleState2)
{
clickedButton.Left = 50;
clickedButton.Top = 100;
toggleState2 = false;
}
else
{
clickedButton.Left = 25;
clickedButton.Top = 150;
toggleState2 = true;
}
}
}
Безопасность платформы .NET Framework
- Полное доверие для непосредственно вызывающего метода. Этот член не может быть использован частично доверенным кодом. Дополнительные сведения см. в разделе Использование библиотек из не вполне надежного кода.