Создание массива элементов управления

Date: 2015-10-07; view: 386.

Массивы элементов управления создаются во время разработки программы. Хотя элементы управления могут добавляться в эти массивы и во время выполнения, тем не менее первый элемент должен быть создан еще на этапе разработки.

Массивы элементов управления можно создается в основном двумя способами:

§ В среде разработки добавить в форму элемент управления, а затем воспользоваться командами Копировать (Сору) и Вставить (Paste) для его дублирования.

§ Добавить в форму несколько индивидуальных элементов управления и назначить им с помощью свойства Name одно и то же имя.

Написание кода для массива элементов управления

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

Фрагмент программы обработки событий нескольких элементов TextBox, объединенные в массив:

Private Sub Txt1_Change(Index As Integer)

End Sub

Пример 1. При загрузке формы производится заполнение текстовых окон массива, состоящего из 5 элементов. При каждом нажатии на кнопку Сmd1 производится увеличение существующего значения на величину 10.

Private Sub Form_Load()

Dim i As Integer

For i = 0 To 4

Text1(i) = 10 * i

Next

End Sub

Private Sub Cmd1_Click()

Dim i As Integer

For i = 0 To 4

Text1(i) = Text1(i) + 10

Next

End Sub