Элемент управления TextBox
TextBox используется для ввода/вывода текста, который в последующем используется в программе, или для вывода результатов расчетов программы. Текст, введенный в поле, обычно в программе преобразуется либо в числа, либо в формулы.
рис . 1.1 Элемент управления Textbox на панели ToolBox
рис. 1.2 Элемент управления Textbox на форме
Основные свойства элемента упраления TextBox:
Свойство |
Назначение |
AutoSize |
Определяет, изменяет ли объект автоматически размеры, чтобы показать его все содержание.Допустимые значения:True — Автоматически изменяет размеры контроля, чтобы показать его все содержание.False — Держит размер контроля постоянным.
|
AutoTab |
Определяет, происходит ли автоматическая табуляция, когда пользователь вводит максимальное допустимое число символовДопустимые значения:True — табуляция происходит.False — табуляция не происходит (значение по умолчанию).
|
AutoWordSelect |
Определяет, что являются (слово или знак) основной единицей, используемой, чтобы определить выбор.Допустимые значения:True — Использует слово как основную единицу (значение по умолчанию).False — Использует знак как основную единицу.
|
BackColor |
Определяет цвет фона объекта.Параметры:Вы можете использовать любое целое число, которое представляет правильный цвет. Вы можете также определить цвет при использовании функции RGB с красными, зелеными, и синими цветными компонентами. Значение каждого цветного компонента — целое число, которое колеблется от нуля до 255. Например, Вы можете определить цвет, синего как целочисленное значение 4966415 или как красные, зеленые, и синие цветные компоненты 15, 200, 75.Комментарии: Вы можете только видеть цвет фона объекта, если свойство BackStyle установлено в fmBackStyleOpaque.
|
BackStyle |
Устанавливает фоновый стиль для объекта.Параметры настройки для fmBackStyle:
- fmBackStyleTransparent= 0 — Фон прозрачен
- fmBackStyleOpaque =1 — Фон непрозрачен (значение по умолчанию).
Комментарии: Свойство BackStyle определяет, прозрачно ли управление. Если BackStyle — fmBackStyleOpaque, управление не прозрачно, и Вы ничего не можете видеть позади управления на форме. Если BackStyle — fmBackStyleTransparent, Вы можете видеть через управление и смотреть на что-нибудь на форме, расположенной позади управления.
|
BorderColor |
Определяет цвет границы объектаПараметры: Вы можете использовать любое целое число, которое представляет правильный цвет. Вы можете также определить цвет при использовании функции RGB с красными, зелеными, и синими цветными компонентами. Значение каждого цветного компонента — целое число, которое колеблется от нуля до 255. Комментарии: Чтобы использовать свойство BorderColor, свойство BorderStyle должно быть установлено в значение кроме fmBorderStyleNone. BorderStyle использует BorderColor, чтобы определить выделяющие цвета. |
BorderStyle |
Определяет тип границы, используемой управлением или формой.fmBorderStyleNone=0 — У управления нет никакой видимой линии обрамленияfmBorderStyleSingle = 1 — У управления есть граница одиночной линии.Значение по умолчанию для ComboBox, Кадра, Метки, Окна списка или TextBox 0 (Ни один). Значение по умолчанию для Изображения 1 (Сингл).
|
CanPaste |
Определяет, содержит ли Буфер обмена данные, которые поддерживает объект.Допустимые значения:True — Объект под курсором мыши может получить информацию, вставленную от Буфера обмена (значение по умолчанию).False — Объект под курсором мыши не может получить информацию, вставленную от Буфера обмена.
|
Text |
Возвращает текст, содержащийся в поле |
Visible |
Допустимые значения:True (поле отображается во время выполнения программы)False (в противном случае) |
Enabled |
Допустимые значения:True (пользователь непосредственно может вносить изменения в содержание поля)False (в противном случае) |
Multiline |
Допустимые значения:True (устанавливается многострочный режим ввода текста)False (однострочный режим) |
WordWrap |
Допустимые значения:True (устанавливается режим автоматического переноса)False (в противном случае) |
AutoSize |
Допустимые значения:True (устанавливается режим автоматического изменения размера поля так, чтобы весь вводимый текст помещался в нем)False (устанавливаетя фиксированный размер поля) |
ScrollBars |
Устанавливает режим отображения в поле полос прокрутки. Допустимые значения:
- fmScrollBarsNone (не выводить полос прокрутки)
- fmScrollBarsHorizontal (выводить горизонтальную полосу прокрутки)
- fmScrollBarsVertical (выводить вертикальную полосу прокрутки)
- fmScrollBarsBoth (выводить горизонтальную и вертикальную полосы прокрутки)
|
SelLenghtSelStartSelText |
Эти свойства характеризуют выделенный в поле фрагмент текста (длина, начало и сам фрагмент текста соответственно) |
MaxLenght |
Устанавливает максимальное допустимое количество вводимых в поле символов. Если это свойство равно 0, то нет ограничений на вводимое количество символов. |
PasswordChar |
Устанавливает символ,отображаемый при вводе пароля. Если это свойство определено, то вместо вводимых символов в поле будет отображаться установленный символ |
|
|
Ввод в TextBox только определенных символов:
Иногда требуется, чтобы в текстовое поле можно было вводить только определенные символы, например числа, в этом случае поможет следующий код:
Function OnlyMySymbols (Symbol As Integer, Pattern as string) as Integer
If InStr (Pattern & Chr (8), Chr (Symbol)) > 0 Then
OnlyMySymbols = Symbol
Else
OnlyMySymbols = 0
End If
End Function
Применяется код так, если в поле Textbox1 необходимо разрешить введение только чисел:
Private Sub Textbox1_KeyPress (KeyAscii As Integer)
KeyAscii = OnlyMySymbols (KeyAscii, “0123456789.»)
End Sub
Быстрое заполнение полей TextBox:
Sub All_TextBoxes()
Dim li As Long
For li = 1 To 10
UserForm1.Controls(“TextBox” & li).Value = li
Next li
End Sub
Недостаток данного метода: имена элементов должны строго соответствовать используемым в коде и лишь нумерация на конце имени должна различаться.
В примере TextBox с именами от “TextBox1″ до “TextBox10″ будут подставлены значения номеров самих TextBox.
Достоинства данного метода: В зависимости от имени можно проделывать различные действия: стирать значения, менять свойства элементов и т.д.
Обзорная статья про элементы управления предоставлена здесь