Поделиться через

ControlCollection.AddControl Метод (Control, Range, Single, Single, String) (2007 System)

  • Статья

Обновлен: Ноябрь 2007

Добавляет в коллекцию ControlCollection указанный элемент управления с заданным диапазоном и размером.

Пространство имен:  Microsoft.Office.Tools.Word
Сборка:  Microsoft.Office.Tools.Word.v9.0 (в Microsoft.Office.Tools.Word.v9.0.dll)

Синтаксис

'Декларация
Public Function AddControl ( _
    control As Control, _
    range As Range, _
    width As Single, _
    height As Single, _
    name As String _
) As OLEControl
'Применение
Dim instance As ControlCollection
Dim control As Control
Dim range As Range
Dim width As Single
Dim height As Single
Dim name As String
Dim returnValue As OLEControl

returnValue = instance.AddControl(control, _
    range, width, height, name)

public OLEControl AddControl(
    Control control,
    Range range,
    float width,
    float height,
    string name
)

Параметры

  • width
    Тип: System.Single
    Ширина элемента управления в пунктах.
  • height
    Тип: System.Single
    Высота элемента управления в пунктах.
  • name
    Тип: System.String
    Имя, которое можно использовать для индексации элемента управления в экземпляре класса ControlCollection.

Возвращаемое значение

Тип: Microsoft.Office.Tools.Word.OLEControl
Экземпляр класса OLEControl, представляющий элемент управления, который содержит указанный элемент управления в документе.

Исключения

Исключение Условие
ArgumentNullException

Аргумент control, name, range имеет значение nullссылка null (Nothing в Visual Basic), либо аргумент name имеет нулевую длину.
ControlNameAlreadyExistsException

Элемент управления с таким именем уже имеется в данном экземпляре класса ControlCollection.
InvalidRangeException

Указанный диапазон не существует.

Заметки

Этот метод используется для добавления во время выполнения любого элемента управления в коллекцию ControlCollection. Дополнительные сведения см. в разделе Добавление элементов управления в документы Office во время выполнения.

Примеры

В приведенном ниже примере кода с помощью метода AddControl в документ добавляются два настраиваемых пользовательских элемента управления. Первый элемент управления добавляется в объект Range. Второй элемент управления добавляется в указанное расположение. В коде изменяется свойство Top первого настраиваемого пользовательского элемента управления, что приводит к перемещению элемента управления относительно объекта OLEControl, в котором содержится элемент управления в документе. Затем в коде присваивается значение свойству Top объекта OLEControl, возвращаемого вторым пользовательским элементом управления с целью демонстрации правильного способа задания свойства Top элемента управления.

Private Sub WordRangeAddControl()
    Me.Paragraphs(1).Range.InsertParagraphBefore()
    Dim CustomUserControl As New UserControl1()
    Dim CustomUserControl2 As New UserControl2()

    Dim DynamicControl As Microsoft.Office.Tools.Word. _
        OLEControl = Me.Controls.AddControl(CustomUserControl, _
        Me.Paragraphs(1).Range, 150, 150, "DynamicControl")

    Dim DynamicControl2 As Microsoft.Office.Tools.Word. _
        OLEControl = 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 WordRangeAddControl()
{
    this.Paragraphs[1].Range.InsertParagraphBefore();
    UserControl1 customUserControl = new UserControl1();
    UserControl2 customUserControl2 = new UserControl2();

    Microsoft.Office.Tools.Word.OLEControl dynamicControl =
        this.Controls.AddControl(customUserControl, 
        this.Paragraphs[1].Range, 150, 150, "dynamicControl");

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

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

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

Разрешения

См. также

Ссылки

ControlCollection Класс

ControlCollection - члены

AddControl - перегрузка

Microsoft.Office.Tools.Word - пространство имен