次の方法で共有

Button.Height Property

  • [アーティクル]

Gets or sets the height of the Button.

Namespace:  Microsoft.Office.Tools.Excel.Controls
Assembly:  Microsoft.Office.Tools.Excel.v4.0.Utilities (in Microsoft.Office.Tools.Excel.v4.0.Utilities.dll)

Syntax

'Declaration
Public Property Height As Double

public double Height { get; set; }

Property Value

Type: System.Double
The height of the Button in points.

Remarks

Changes made to the Height and Top property values cause the Bottom property value of the Button to change.

The Button.Height property uses points, whereas Control.Height property uses pixels.

Examples

The following code example compares the resizing and relocating behavior of two Button controls to a worksheet. The Click event handler of the first button adjusts the Height and Width properties of the button so that the button changes size, but remains in the same location on the worksheet. The Click event handler of the second button adjusts the Top and Left properties of the button so that the button changes location on the worksheet, but stays in the same size.

This example is for a document-level customization.

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 Security

See Also

Reference

Button Class

Microsoft.Office.Tools.Excel.Controls Namespace