Эта программа демонстрирующая работу цикла

Это очень важная и довольно не сложная тема. Её должен знать каждый программист т.к. она имеет очень большое значение и применение. С помощью циклов можно сделать ващу программу компактнее и проще. Например нам надо выдать одинаковых сообщений 155 раз, я думаю что писать 155 сообщений это не самый лучший вариант! Гораздо легче написать одно а с помощью цикла промотать его нужное нам количество раз! Надеюсь вы поняли для чего предногзначен цикл. Но на выдачи 155 сообщений он не ограничивается! С помощью его помощью можно легко и максимально тонко работать с масивами! Вообщем приступаем!

Cейчас напишим простую прогу с помощью циклов, она будет выдавать MSGBOX сообшщения на экран 10 раз (а можно и 155)! Создайте процедуру Form_Load и напишите туда следующие:

For i = 0 To 9

MsgBox "Одно из 10 сообщений", vbInformation, "Работа цикла"

Next i

Теперь пояснения! For - это начало цикла; i=0 - тут мы у казываем первое значение; to 9 - это второе знаечение. Второй строчкой идет само MSG сообщение, а Next i - это конец цикла!

Ну что, если все понятно тогда идем дальше! Теперь попробуем написать более сложную прогу, она будет с масивами т.к. это наиболее правильное на мой взгляд применение цикла! В этой программе у нас будет 6 (шесть) массивов кнопок и все они изменят свой заголовок на другой! Это конечно тогже не сособо сложный пример, но он демонстрирует работу с массивом, что очень важно! Его можно усложнить по вашему усмотрению, главное это вьехать в саму идею!

Приступаем! Создайте шесть массивов кнопки (для этого выделите одну и копируйте, вас спросит "Вы действительно хотите создать массив?" Ты кайте да! Второй и последующие разы спрашивать не будут!) И создайте другую кноку (не массив) где-нибудь пониже! У вас должно получиться примерно нижеследующие:

Немного повторюсь, для уточнения! Все кнопки в верхнем ряду - массивы их шесть щтук! кнопка внизу - это не масив, 1 штука. создайте процедуру Click для нижней кнопки в впишите туда:

For i = 0 To 5

Command2(i).Caption = "X"

Next i

Небольшое пояснение: мы написали i = 0 To 5 - заметте что начинаеться с нуля (!) т.к. массивы начинаються с нуля а не с 1 !(Не путать это!)

Все! прога готова, теперь все массивы изменят свой заголовок! Но помоему этого мало! Еще можно дописать пару операторов, для усложнения программы! Вместо строки For i = 0 To 5 впишите:

For i = 0 To 5 Step 2

Как видите мы дописали оператор Step и параметр 2 (хотя параметр может быть любым! Поэксперементируйте над значениями!) Теперь заголовок извенят не все масивы а только ккаждый второй! т.к. параметр равен 2!