Функция IsNumeric(Аргумент) возвращает значение True, если аргумент является число и False в противном случае
После конструирования формы и написания кода в модуле формы выберем команду Run ® Run Sub/UserForm, либо нажмем клавишу <F5>, либо кнопку панели инструментов Standard, и форма отобразится поверх активного рабочего листа Excel. Введем значение аргумента и нажмем на кнопку OK.
Рисунок 15 – Вид пользовательской формы
Компонент ListBox(список) применяется для хранения и отображения списка значений. Из списка пользователь может выбрать одно или несколько значений, которые в последующем будут использоваться в тексте программы.
Приводим часто используемые свойства элемента управления ListBox
Таблица свойств компонента ListBox
| Свойство | Описание |
| ListIndex | Возвращает номер текущего элемента списка. Нумерация элементов списка начинается с нуля |
| ListCount | Возвращает число элементов списка |
| TopIndex | Возвращает элемент списка с наибольшим номером |
| ColumnCount | Устанавливает число столбцов в списке |
| Text | Возвращает выбранный в списке элемент |
| List | Возвращает элемент списка, стоящий на пересечении указанной строки и столбца. Синтаксис:List(row, column) Кроме того, свойство List задает весь массив элементов списка |
| ControlSource | Устанавливает диапазон (ячейку), куда возвращается выбранный элемент из списка |
| MultiSelect | Устанавливает способ выбора элементов списка. Допустимые значения: fmMultiSelectSingle - выбор только одного элемента; fmMultiSelectMulti - разрешен выбор нескольких элементов посредством либо щелчка, либо нажатием клавиши <Пробел>); fmMultiSelectExtended - разрешено использование клавиши <Shift> при выборе ряда последовательных элементов списка) |
| Selected | Допустимые значения: True (если элемент списка выбран) и False (в противном случае). Используется для определения выделенного текста, когда свойство MultiSelect имеет значение fmMultiSelectMulti или fmMultiSelectExtended |
| ColumnWidths | Устанавливает ширину столбцов списка. Синтаксис: ColumnWidths = String String — строка, устанавливающая ширину столбцов. В следующем примере устанавливается ширина каждого из трех столбцов списка: With ListBox1 .ColumnCount = 3 .ColumnWidths = "20;30;30" End With |
| ColumnHeads | Допустимые значения: True (выводятся заголовки столбцов раскрывающегося списка) и False (в противном случае) |
Приводим наиболее часто используемые методы элемента управления ListBox в таблице 21.
Таблица 21
| Метод | Описание |
| Clear | Удаляет все элементы из списка |
| RemoveItem | Удаляет из списка элемент с указанным номером. Синтаксис: RemoveItem (index), где index — номер удаляемого из списка элемента |
| AddItem | Добавляет элемент в список. Синтаксис: AddItem ( [ Item [, varIndex]]) Item— элемент (строковое выражение), добавляемый в список varIndex — номер добавляемого элемента |
Заполнить список можно одним из следующих способов.
1 Поэлементно, если список состоит из одной колонки
Дата добавления: 2015-08-08; просмотров: 523;