ControlCollection.AddTextBox Метод (Double, Double, Double, Double, String) (2007 System)

Статья
11/16/2008

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

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

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

Синтаксис

'Декларация
Public Function AddTextBox ( _
    left As Double, _
    top As Double, _
    width As Double, _
    height As Double, _
    name As String _
) As TextBox
'Применение
Dim instance As ControlCollection
Dim left As Double
Dim top As Double
Dim width As Double
Dim height As Double
Dim name As String
Dim returnValue As TextBox

returnValue = instance.AddTextBox(left, _
    top, width, height, name)

public TextBox AddTextBox(
    double left,
    double top,
    double width,
    double height,
    string name
)

Параметры

left
Тип: System.Double
Расстояние в пунктах между левым краем элемента управления и левым краем листа.

top
Тип: System.Double
Расстояние в пунктах между верхним краем элемента управления и верхним краем листа.

width
Тип: System.Double
Ширина элемента управления в пунктах.

height
Тип: System.Double
Высота элемента управления в пунктах.

name
Тип: System.String
Имя элемента управления.

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

Тип: Microsoft.Office.Tools.Excel.Controls.TextBox
Элемент управления TextBox, добавленный в экземпляр ControlCollection.

Исключения

Исключение	Условие
ArgumentNullException	Аргумент имени равен nullссылка null (Nothing в Visual Basic) или имеет нулевую длину.
ControlNameAlreadyExistsException	Элемент управления с таким именем уже имеется в данном экземпляре ControlCollection.

Заметки

Метод AddTextBox используется для добавления объектов TextBox в конец ControlCollection. Чтобы удалить добавленный программно элемент управления TextBox, воспользуйтесь методом Remove().

Примеры

В приведенном ниже примере в верхнюю часть листа добавляется элемент управления TextBox, после чего в этот элемент управления заносится текст.

Private Sub ExcelAddTextBox()
    Dim TextBox1 As Microsoft.Office.Tools.Excel. _
        Controls.TextBox = Me.Controls.AddTextBox( _
        0, 0, 75, 15, "TextBox1")

    TextBox1.Text = "Sample text"

End Sub

private void ExcelAddTextBox()
{
    Microsoft.Office.Tools.Excel.Controls.TextBox
         textBox1 = this.Controls.AddTextBox(
         0, 0, 75, 15, "textBox1");
    textBox1.Text = "Sample text";
}

Разрешения

Полное доверие для непосредственно вызывающего метода. Этот член не может быть использован частично доверенным кодом. Дополнительные сведения см. в разделе Использование библиотек из не вполне надежного кода.