double arrow

With ListBox2

.List = Array("январь", "февраль", "март", "апрель", "май", "июнь", "июль", "август", "сентябрь", "октябрь", "ноябрь", "декабрь")

End With

'Заполнение списка поэлементно,несколько колонок

s(1, 1) = "N": s(1, 2) = "Ф.И.О.": s(1, 3) = "Оценка":

s(2, 1) = "1": s(2, 2) = "Петров": s(2, 3) = "5"

s(3, 1) = "2": s(3, 2) = "Сидоров": s(3, 3) = "2"

s(4, 1) = "3": s(4, 2) = "Иванов": s(4, 3) = "3"

s(5, 1) = "4": s(5, 2) = "Ромашкин": s(5, 3) = "4"

With ListBox4

.ColumnCount = 3

.List = s

End With

'Заполнение списка массивом,несколько колонок

With ListBox5

.ColumnCount = 3

.AddItem "июнь"

.List(0, 1) = "06"

.List(0, 2) = "30"

.AddItem "июль"

.List(1, 1) = "07"

.List(1, 2) = "31"

.AddItem "август"

.List(2, 1) = "08"

.List(2, 2) = "31"

.AddItem "сентябрь"

.List(3, 1) = "09"

.List(3, 2) = "30"

End With

End Sub

Private Sub CommandButton2_Click()

ListBox1.Clear

ListBox2.Clear

ListBox4.Clear

ListBox5.Clear

End Sub

Private Sub CommandButton3_Click()

Sheets("лист0").Select

End Sub

Некоторые комментарии к программе:

– В модуле Private Sub CommandButton1_Click(), программно поддерживающем объект CommandButton1, реализуются те же программы, что и в модуле программно поддерживающем объект CommandButton1 раздела 1.1.

– В модуле Private Sub CommandButton1_Click(), программно поддерживающем объект CommandButton1, не реализуется способ заполнения объекта ListBox “ из диапазона”, то есть объект ListBox 3 – отсутствует;

– В модуле Private Sub CommandButton2_Click(), программно поддерживающем объект CommandButton2, который в свойстве Caption переименован в “Очистить”,к объекту ListBox1 применен метод .Clear, с помощью которого осуществляется удаление элементов списка, анлогично операции применяются к элементам списков объектов ListBox2, ListBox4 и ListBox5;

– В модуле Private Sub CommandButton3_Click(), программно поддерживающем объект CommandButton3, который в свойстве Caption переименован в “Меню”,к объекту Sheets применен метод. Select, с помощью которого выполняется переход на лист оглавления всего пакета.


Лекция 2. Виды алгоритмов. Операторы цикла

Материалы этой статьи опубликованы в [1], [3].


Понравилась статья? Добавь ее в закладку (CTRL+D) и не забудь поделиться с друзьями:  



Сейчас читают про: