Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
УЧЕБНОЕ ПОСОБИЕ VBA.doc
Скачиваний:
25
Добавлен:
27.10.2018
Размер:
8.97 Mб
Скачать

3.5.1 Заполнение списка и удаление его элементов

Для поэлементного заполнения списка и удаления из него выбранного элемента применяются методы Clear, RemoveItem и AddItem.

Метод Clear удаляет все элементы из списка.

Метод RemoveItem удаляет из списка элемент с указанным номером.

Синтаксис:

RemoveItem (index)

где

index – номер удаляемого элемента из списка.

Примечание. Этот метод не работает, если список заполнен элементами из диапазона при помощи свойства RowSource.

Метод AddItem добавляет элемент в список.

Синтаксис:

AddItem ([item [, varIndex]])

где

item – элемент (строковое выражение) добавляемый в список;

varIndex – номер добавляемого элемента.

Метод AddItem позволяет заполнять список как в цикле, так и поэлементно.

Пример 1.

Постановка задачи. Создать форму, которая добавляет и удаляет список. Расположить в ней три командные кнопки и один список.

Технология выполнения задания:

1 При помощи окна Properties установить значения свойств Name и Caption элементов управления следующим образом, как показано в таблице 41.

Таблица 41 – Свойства элементов управления

Элемент управления

Свойство

Значение

Форма

Caption

Список

Кнопка

Name

Caption

Добавить

Кнопка

Name

Caption

Удалять из списка

Кнопка

Name

Caption

Удалить все

Список

Name

ListBox1

2 В модуле формы набрать следующий код, изображенном на рисунке 45.

3 Проект готов (рисунок 46).

Примечание. В этом проекте при нажатии на кнопку Add в список добавляется новый элемент. При нажатии кнопки Remove удаляется выделенный элемент, а при нажатии кнопки Clear – весь список очищается.

3.5.2 Список с несколькими столбцами

Для создания многоколоночного списка следует установить значение свойства ColumnCount, которое и задает, сколько столбцов имеется в списке. Кроме того, при работе с подобным списком полезно определить значение свойства ColumnWidths, которое устанавливает ширину каждого столбца. А затем список надо заполнить либо посредством массива, либо поэлементно.

В качестве примера создания списка с несколькими столбцами рассмотрим проект, в котором производится табулирование функции sin (x) на промежутке от а до b с шагом h, а результат табуляции (значения аргумента и функции) выводится в список.

Пример 1.

Постановка задачи. Создать форму, позволяющую табулировать функцию sin (x). Расположить три надписи, три поля ввода, одну кнопку и список, как показано на рисунке 47.

Рисунок 45 – Код программы

Рисунок 46 – Приложение Список

Рисунок 47 – Диалоговое окно Табулирование функции sin (x)

Технология выполнения задания:

1 При помощи окна Properties установить значения свойств Name и Caption элементов управления следующим образом, как показано в таблице 42.

Таблица 42 – Свойства элементов управления

Элемент управления

Свойство

Значение

Форма

Caption

Табулирование функции sin (x)

Надпись

Caption

а

Поле ввода

Name

TextBox2

Надпись

Caption

b

Поле ввода

Name

TextBox3

Надпись

Caption

h

Поле ввода

Name

TextBox4

Кнопка

Name

Caption

OK

CommandButton1

Список

Name

ListBox1

2 В модуле формы набрать следующий код, указанный на рисунке 48. Проект готов.

Рисунок 48 – Программный код