Компьютерные книги
Главное меню
Главная Поиск по сайту Добавить материал О нас Карта книг Карта сайта
Реклама
computersbooks.net -> Добавить материал -> Языки программирования -> Фокселл Дж.Д. -> "Освой самостоятельно Visual Basic.NET за 24 часа" -> 129

Освой самостоятельно Visual Basic.NET за 24 часа - Фокселл Дж.Д.

Фокселл Дж.Д. Освой самостоятельно Visual Basic.NET за 24 часа — М.: Вильямс, 2002. — 416 c.
ISBN 5-8459-0304-1
Скачать (прямая ссылка): osvoysamostoyatelnovsn2002.pdf
Предыдущая << 1 .. 123 124 125 126 127 128 < 129 > 130 131 132 133 134 135 .. 181 >> Следующая

В следующей строке задается следующий цикл For...Next, использующий
переменную lngPauseCounter. Ее начальное значение устанавливается в
единицу, и верхний предел задается как 600 000. В следующей строке
содержится оператор Next для этого цикла. Почему внутри данного цикла не
содержится текст программы? Этот цикл используется только для создания
задержки процессора, Учитывая громадные скорости, на которых работает
процессор в современном компьютере, без установки задержки вы бы просто
не смогли увидеть результат работы первого цикла на экране.
Час15. Создание циклов
291
Я написал этот текст программы на компьютере с частотой процессора 1,33
л . . Г-1 w
GHz. Вы можете изменить значение верхней границы второго цикла,
если
частота процессора в вашем компьютере отличается от указанной. Если у.
вас более быстрый компьютер- увеличьте это значение, если же более
медленный уменьши 10 его. Однако перед каким-либо и--------------- "т~'"
величины, вначале протестируйте созданную программу.
Щелкните Save АП на панели инструментов и нажмите клавишу <F5> для
запуска программы. Ярлык вначале будет иметь ширину 100. После нажатия на
кнопку на форме, ширина уменьшится до единицы, и затем начнет постепенно
увеличиваться до ста. Если скорость роста ярлыка слишком маленькая или
слишком большая, остановите выполнение программы и измените верхнее
значение внутреннего цикла For...Next.
Если вы откажетесь от цикла и напишете каждую строку для отображения
ярлыка, изменяющего свою ширину от 1 до 100, то получите текст программы
длиной 100 строк. Используя простой цикл, мы уложились всего в несколько
строк. В дополнение, цикл For...Next позволяет создать паузу в выполнении
программы. Без применения цикла такое было бы просто невозможно.
Используйте циклы For...Next, когда вам точно известно, сколько раз
должен выполниться фрагмент программы. Это, конечно, не значит, что эту
цифру вы должны знать уже на стадии разработки программы. Это лишь
значит, что это значение должно быть известно до начала первого
выполнения цикла. Для задания любого параметра цикла For...Next вы можете
использовать переменную, что и показано в следующем примере:
Dim lngCounter as Long Dim IngUpperLimit as Long LngUpperLimit=100
For lngCounter=l To lngUpperLimit Debug.WriteLine(lngCounter)
Next lngCounter
Использование Do...Loop для циклов, выполняющихся неопределенное
количество раз
В некоторых ситуациях заранее неизвестно, сколько раз должен выполниться
цикл, даже в момент начала его выполнения. В этом случае вы можете
выполнить цикл For...Next, задав верхнее значение счетчика, заведомо
превосходящее ожидаемое значение. При этом в теле цикла можно задать
условие прерывания выполнения цикла и использовать оператор выхода из
него (tm) Exit For - при выполнении этого условия. Этот метод является
крайне неэффективным и на практике не применяется. Взамен этого
используется для таких случаев конструкция цикла Do ... Loop.
Конструкция Do...Loop имеет множество разновидностей. Самая общая ее
форма имеет следующий синтаксис:
Do
[Операторы]
Loop
Одним из ключевых моментов в программировании является исключение
избыточного текста программы. Если вы обнаруживаете, что набиваете одни и
те же (или сильно похожие) строки текста программы подряд, этот фрагмент
может стать хорошим кандидатом для соэданйя цикла.
292
Часть программировать!
Завершение цикла Do...Loop
Конструкции Do ... Loop, не имеющая какого-либо механизма или условия
выхода, представляет собой бесконечный цикл. В общей конструкции,
показанной выше, нет ничего, указывающего циклу, когда следует
остановиться. Иногда в программах требуются бесконечные циклы (примером
могут послужить игры), но, чаще всего, требуется выход из цикла при
выполнении некоторого условия. Как и цикл For...Next, конструкция Do ...
Loop имеет оператор, который можно использовать в любом месте цикла для
немедленного выхода из него. Это - оператор Exit Do. Например, его можно
включить в рассмотренную выше конструкцию следующим образом:
Do
[Операторы]
if expression Then Exit Do
Loop
В этом фрагменте цикл будет выполняться до тех пор, пока выражение
expression имеет значение True. Обычно выражение условия основывается на
переменных, которые изменяются внутри цикла. Очевидно, что если выражение
никогда не изменяется, то и цикл никогда не заканчивается.
Можно встроить условное выражение непосредственно в структуру Do ...
Loop. Для этого используются ключевые слова while и Until. Следующий
фрагмент является примером использования ключевого слова While:
Do While expression [Операторы]
Loop
Цикл выполняется, пока выражение expression принимает значение True, Если
при первом запуске цикла это значение равно False, цикл не будет выполнен
ни одного раза. Теперь приведем пример аналогичного цикла, использующего
ключевое слово Until:
Do Until expression [Операторы]
Loop
Поведение этого цикла отличается от предыдущего примера, применяющего
Предыдущая << 1 .. 123 124 125 126 127 128 < 129 > 130 131 132 133 134 135 .. 181 >> Следующая
Книги
Web-программирован-
ие
Аппаратное обеспечение Графика Руководство по П.О. Самоучитель Теория программирования Фотошоп Языки программирования
Новые книги
Вирт Н. "Систематическое программирование " (Теория программирования)

Эком "Microsoft Excel 2000 шаг за шагом Русская версия самоучитель " (Самоучитель)

Поляков А.Ю. "Методы и алгоритмы компьютерной графики в примерах Vizual C++" (Графика)

Баяковский Ю.М. "Графическая библиотека Open GL " (Графика)

Валиков А. "Технология " (Языки программирования)
Авторские права © 2013 ComputersBooks. Все права защищены.