Sdílet prostřednictvím


Button.Top – vlastnost

Získá nebo nastaví vzdálenost mezi horním okrajem body Button a horním okraji listu.

Obor názvů:  Microsoft.Office.Tools.Excel.Controls
Sestavení:  Microsoft.Office.Tools.Excel.v4.0.Utilities (v Microsoft.Office.Tools.Excel.v4.0.Utilities.dll)

Syntaxe

'Deklarace
Public Property Top As Double
public double Top { get; set; }

Hodnota vlastnosti

Typ: System.Double
Vzdálenost mezi horním okrajem bodů Button a horním okraji listu.

Poznámky

Button.Top Vlastnost používá body, že Control.Top vlastnost používá obrazové body.

Příklady

Následující příklad kódu porovnává změny velikosti a přemístění chování dvou Button ovládacích prvků na list.Click Nastaví obslužnou rutinu události prvního tlačítka Height a Width vlastnosti tlačítka tak, aby tlačítko změní velikost, ale zůstane na stejném místě na listu.Click Obslužnou rutinu události pro druhé tlačítko upraví Top a Left vlastnosti tlačítka tak, aby tlačítko změní umístění na list, ale zůstane stejné velikosti.

Tento příklad je pro vlastní úpravy úrovni dokumentu.

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;
        }
    }
}

Zabezpečení rozhraní .NET Framework

Viz také

Referenční dokumentace

Button Třída

Microsoft.Office.Tools.Excel.Controls – obor názvů