Sdílet prostřednictvím


ControlCollection.AddControl – metoda (Control, Double, Double, Double, Double, String)

Přidá zadaný Control se ControlCollection na zadanou velikost a umístění.

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

Syntaxe

'Deklarace
Function AddControl ( _
    control As Control, _
    left As Double, _
    top As Double, _
    width As Double, _
    height As Double, _
    name As String _
) As ControlSite
ControlSite AddControl(
    Control control,
    double left,
    double top,
    double width,
    double height,
    string name
)

Parametry

  • left
    Typ: System.Double
    Vzdálenost mezi levým okrajem ovládacího prvku a levým okrajem listbodů.
  • top
    Typ: System.Double
    Vzdálenost mezi horním okrajem ovládacího prvku a horním okrajem listbodů.

Vrácená hodnota

Typ: Microsoft.Office.Tools.Excel.ControlSite
objekt , který představuje ovládací prvek, který obsahuje zadaný ovládací prvek na list.

Výjimky

Výjimka Podmínka
ArgumentNullException

Ovládací prvek nebo název argument nullodkaz Null (Nothing v jazyce Visual Basic) nebo má nulovou délku.

ControlNameAlreadyExistsException

Ovládací prvek se stejným názvem je již v ControlCollection instance.

Poznámky

Tuto metodu lze použít libovolný ovládací prvek přidat ControlCollection v čase zpracování. Další informace naleznete v tématu Adding Controls to Office Documents at Run Time.

Příklady

Následující příklad kódu přidá do list pomocí dvou vlastní uživatel ovládací prvky AddControlmetoda. První ovládací prvek je přidán do oblasti buněk. Druhý ovládací prvek je přidán na určité místo. Změny kódu Top vlastnost první vlastní uživatel řízení, které pouze přesune ovládací prvek vzhledem k ControlSite , která obsahuje ovládací prvek na list. Kód poté nastaví Top Vlastnosti ControlSite vrátil druhý ovládací prvek uživatele ilustrují správné lze nastavit Top vlastnost ovládacího prvku.

    Private Sub ExcelRangeAddControl()

        Dim CustomUserControl As New UserControl1()
        Dim CustomUserControl2 As New UserControl2()

        Dim DynamicControl As Microsoft.Office.Tools.Excel.ListObject = Me.Controls.AddControl( _
            CustomUserControl, 0, 0, 150, 150, _
            "DynamicControl")

        Dim DynamicControl2 As Microsoft.Office.Tools.Excel. _
            ControlSite = Me.Controls.AddControl( _
            CustomUserControl2, 200, 0, 150, 150, _
            "DynamicControl2")

        CustomUserControl.BackColor = Color.Blue
        CustomUserControl2.BackColor = Color.Green

        CustomUserControl.Top = 100
        DynamicControl2.Top = 100

    End Sub

private void ExcelRangeAddControl()
{

    UserControl1 customUserControl = new UserControl1();
    UserControl2 customUserControl2 = new UserControl2();

    Microsoft.Office.Tools.Excel.ControlSite dynamicControl =
        this.Controls.AddControl(customUserControl,
        0, 0, 150, 150, "dynamicControl");

    Microsoft.Office.Tools.Excel.ControlSite dynamicControl2 =
        this.Controls.AddControl(customUserControl2, 200, 0,
        150, 150, "dynamicControl2");

    customUserControl.BackColor = Color.Blue;
    customUserControl2.BackColor = Color.Green;

    customUserControl.Top = 100;
    dynamicControl2.Top = 100;
}

Zabezpečení rozhraní .NET Framework

Viz také

Odkaz

ControlCollection Rozhraní

AddControl – přetížení

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