ControlCollection.AddTextBox Метод (Range, String) (2007 System)
Обновлен: Ноябрь 2007
Добавляет в указанный диапазон листа новый элемент управления TextBox.
Пространство имен: Microsoft.Office.Tools.Excel
Сборка: Microsoft.Office.Tools.Excel.v9.0 (в Microsoft.Office.Tools.Excel.v9.0.dll)
Синтаксис
'Декларация
Public Function AddTextBox ( _
range As Range, _
name As String _
) As TextBox
'Применение
Dim instance As ControlCollection
Dim range As Range
Dim name As String
Dim returnValue As TextBox
returnValue = instance.AddTextBox(range, _
name)
public TextBox AddTextBox(
Range range,
string name
)
Параметры
- range
Тип: Microsoft.Office.Interop.Excel.Range
Объект Range, предоставляющий границы элемента управления.
- name
Тип: System.String
Имя элемента управления, которое можно использовать для индексации элемента управления в экземпляре ControlCollection.
Возвращаемое значение
Тип: Microsoft.Office.Tools.Excel.Controls.TextBox
Элемент управления TextBox, добавленный в экземпляр ControlCollection.
Исключения
| Исключение | Условие |
|---|---|
| ArgumentNullException | Аргумент имени или диапазона равен nullссылка null (Nothing в Visual Basic), или аргумент имени имеет нулевую длину. |
| ControlNameAlreadyExistsException | Элемент управления с таким именем уже имеется в данном экземпляре ControlCollection. |
| InvalidRangeException | Указанный диапазон не существует. Невозможно использовать диапазоны с несколькими областями. Диапазон должен находиться на том же листе, что и экземпляр ControlCollection. |
Заметки
Метод AddTextBox используется для добавления объектов TextBox в конец ControlCollection. Чтобы удалить добавленный программно объект TextBox, воспользуйтесь методом Remove().
Размер элемента управления автоматически изменяется при изменении размера диапазона.
Примеры
В следующем примере кода добавляется элемент управления TextBox в ячейки A1 до B2, и затем назначается текст в элемент управления.
Private Sub ExcelRangeAddTextBox()
Dim TextBox1 As Microsoft.Office.Tools.Excel. _
Controls.TextBox = Me.Controls.AddTextBox( _
Me.Range("A1", "B2"), "TextBox1")
TextBox1.Text = "Sample text"
End Sub
private void ExcelRangeAddTextBox()
{
Microsoft.Office.Tools.Excel.Controls.TextBox
textBox1 = this.Controls.AddTextBox(
this.Range["A1", "B2"], "textBox1");
textBox1.Text = "Sample text";
}
Разрешения
- Полное доверие для непосредственно вызывающего метода. Этот член не может быть использован частично доверенным кодом. Дополнительные сведения см. в разделе Использование библиотек из не вполне надежного кода.