Трусов M. А. Visual Basic .NЕТ Практическое руководство для начинающего программиста стр.35
Трусов M. А. Visual Basic .NЕТ Практическое руководство для начинающего программиста стр.35

В первой строке присваиваем имя переменной. Во второй задаем ее значение: расположение объекта по горизонтали (координата х). С третьей строки начинается выполнение самого цикла - Do можно перевести как «делай». В четвертой находится инструкция: с каждой итерацией величина а возрастает на единицу. Пятая строка определяет расположение объекта после каждой итерации. Шестая дает команду возвращаться к началу цикла после каждой итерации - выполнять цикл до тех пор, пока координата объекта по горизонтали остается меньшей 300 пикселов, что и является заданным условием. Напоминаем, этот цикл работает до тех пор, пока условие соответствует значению True. Loop можно перевести как «петля», «возврат». Теперь запустите программу и щелкните Label 1. Объект переместится вправо до точки равной 300 пикселам. Чтобы объект двигался медленнее, уменьшите величину, которую мы прибавляем к значению переменной а. Рассмотрим это на примере следующего цикла.

Do...Loop Until

Этот цикл, как и рассмотренный выше, сначала выполняет инструкцию, а затем проверяет условие. Итерации выполняются до тех пор, пока проверяемое условие является ложным. Как только условие становится равным True, выполнение цикла заканчивается. Таким образом, осуществляется хотя бы одна итерация. Синтаксис этого цикла выглядит так:

Do

Инструкции Loop Until условие

ГЛАВА 8 ▼ Циклические программы

Составим программу для замедленного движения объекта. Поместите на форму объект Label2 (вверху формы) и напишите для него код:

Dim b As Double b = Labe12.Top Do

a = a + 0.00001 Label2. Top = a Loop Until a > 300

В первой строке присваиваем имя переменной. Обратите внимание, что ее тип - Double. Это сделано потому, что величина а возрастает на 0,0001 (дробное число). Вторая строка определяет значение переменной: вертикальное расположение объекта. Третья - начало цикла. Четвертая изменяет величину переменной. Каждая итерация увеличивает значение переменной на 0,00001. Пятая задает координаты объекта по вертикали после итерации. Последняя строка - это условие, при соблюдении которого продолжается выполнение цикла. Пока условие False, то есть величина а остается меньше 300, цикл продолжает работу.


⇐ Предыдущая Следующая ⇒
 
 
 
Powered by Exponenta