Aracılığıyla paylaş


ControlCollection.AddControl Yöntem (Control, Double, Double, Double, Double, String)

Belirtilen ekler Control için ControlCollection adresinde belirtilen boyutu ve konumu.

Ad alanı:  Microsoft.Office.Tools.Excel
Derleme:  Microsoft.Office.Tools.Excel (Microsoft.Office.Tools.Excel.dll içinde)

Sözdizimi

'Bildirim
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
)

Parametreler

  • left
    Tür: System.Double
    Nokta denetiminin sol kenarına çalışma sayfasının sol kenarı arasındaki uzaklık.
  • top
    Tür: System.Double
    Nokta denetim üst kenarını çalışma sayfasının üst kenarı arasındaki uzaklık.

Dönüş Değeri

Tür: Microsoft.Office.Tools.Excel.ControlSite
Çalışma sayfasında belirtilen denetim içeren denetimi temsil eden nesne.

Özel Durumlar

Exception Koşul
ArgumentNullException

Denetim ya da adı bağımsız değişkeni nullnull başvuru (Visual Basic'te Nothing) veya sıfır uzunlukta.

ControlNameAlreadyExistsException

Aynı ada sahip bir denetim içinde ControlCollection örneği.

Notlar

Bu yöntem, herhangi bir denetim eklemek için kullanılabilir ControlCollection zamanında.Daha fazla bilgi için bkz. Belgeye Çalışma Zamanında Denetim Ekleme.

Örnekler

Aşağıdaki kod örneği, çalışma sayfasını kullanarak iki özel kullanıcı denetimleri ekler AddControl yöntemi.İlk denetim bir hücre aralığına eklenir.İkinci denetimin belirli bir konuma eklenir.Kod değişiklikleri Top özelliği yalnızca denetimi taşır ilk özel kullanıcı denetiminin göreli olarak ControlSite , çalışma sayfasındaki denetim içerir.Kod daha sonra ayarlar Top özelliği ControlSite en doğru yolu göstermek için ikinci kullanıcı denetimi tarafından döndürülen Top denetiminin özelliği.

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

.NET Framework Güvenliği

Ayrıca bkz.

Başvuru

ControlCollection Arabirim

AddControl Fazla Yük

Microsoft.Office.Tools.Excel Ad Alanı