Информатика для I курса. Часть I. Никифоров С.Н. - 40 стр.

UptoLike

ВУЗ: 

СПбГАСУ | Санкт-Петербург

Составители: 

Рубрика: 

78 79
Рис. 10.4
Программа поэлементного заполнения списка
объекта ListBox, если список состоит
из одной колонки
Private Sub CommandButton1_Click()
‘Заполнение списка поэлементно, 1 колонка
With ListBox1
.AddItem «Июнь»
.AddItem «Июль»
.AddItem «Август»
.AddItem «Сентябрь»
End With
End Sub
Private Sub CommandButton2_Click()
UserForm1.Hide
End Sub
Некоторые комментарии к программе:
модуль объекта CommandButton2, который в свойстве Cap-
tion переименован в «Закрыть», обеспечивает завершение функ-
ционирования объекта UserForm за счет применения к объекту
UserForm1 метода Hide.
10.2.2. Заполнение списка массивом, если список
состоит из одной колонки
Вызов объекта UserForm2, на базе которого организуется за-
полнение списка объекта ListBox1 массивом (если список
состоит
из одной колонки), осуществляется с помощью следующего про-
граммного модуля:
Private Sub CommandButton2_Click()
UserForm2.Show
End Sub
Создание пользовательской формы c объектом ListBox1 орга-
низуется следующим образом:
войти в VBA – Alt-F11;
выбрать Insert (вставка);
выбрать UserForm.
Затем на появившуюся «платформу» объекта UserForm с пане-
ли Toolbox (см. рис. 9.4) последовательно переместить:
один объект ListBox;
один объект TextBox;
два объекта CommandButton,
расположив их, как показано на рис. 10.5.
Далее войти в VBA (Alt-F11), выбрать объект UserForm2.
Затем, выбрав объект CommandButton1, написать соответству-
ющую программу, обеспечивающую заполнение данными объек-
та ListBox1.

Страницы