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

  • Makale

Belirtilen ekler Control için ControlCollection belirlenen aralıkta.

Ad alanı:  Microsoft.Office.Tools.Excel
Derlemeler:   Microsoft.Office.Tools.Excel (Microsoft.Office.Tools.Excel.dll içinde)
  Microsoft.Office.Tools.Excel.v4.0.Utilities (Microsoft.Office.Tools.Excel.v4.0.Utilities.dll içinde)

Sözdizimi

'Bildirim
Function AddControl ( _
    control As Control, _
    range As Range, _
    name As String _
) As ControlSite

ControlSite AddControl(
    Control control,
    Range range,
    string name
)

Parametreler

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, ad veya aralık bağımsız değişkeni nullnull başvuru (Visual Basic'te Nothing), veya sıfır uzunluk değişkeni vardır.
ControlNameAlreadyExistsException

Aynı ada sahip bir denetim zaten kullanılıyor ControlCollection örneği.
InvalidRangeException

Belirtilen aralık geçersiz.Multi-Area aralıkları kullanılamaz.Aralığı aynı çalışma sayfasında olması gerekir ControlCollection örneği.

Notlar

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

Örnekler

Aşağıdaki kod örneği, çalışma kullanarak iki özel kullanıcı denetimleri ekler AddControl yöntem.Bir hücre aralığına ilk denetimi eklenir.İkinci denetimi belirli bir konuma eklenir.Kod değişikliklerini Top özelliği yalnızca denetimi taşır ilk özel kullanıcı denetiminin göreli olarak ControlSite , çalışma sayfasındaki bir 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ı