Лекция: Операторы Do, Loop, Until (от -Гепарда97-)

Использование:

Do

<… операторы...>

Loop

Вгоняет комп в чуть менее, чем бесконечный цикл.

Например, всего 5ю строчками вражий комп можно повесить намертво (спасет только зажимание кнопки включения, приводящее к его аварийному отключениювынимание батареек), пишем в модуль:

subsub

(Совет: такую бяку надо глушить не по одиночке через диспетчер задач, а запустить taskkill /im virus.exe /f где virus.exe — имя плодящегося процесса, выполнять хоть из того же диспетчера задач)

Особо доставляет прописка такой бяки в автозагрузку, кстати. Но об этом позже.

Или другой пример (а здесь еще и использование случайного генератора чисел!)

SubCall RandomizeIfThenDo«Хахахаха, ламерз маст дай!»LoopEnd IfEndEnd Sub

Что делает код: сначала генерирует ряд случайных чисел,

затем записывает в переменную одно случайное число, и если оно меньше 0.75 (а случайное число всегда > 0 и < 1) то

начать цикл и постоянно выводить сообщение (есичо, Loop — «закрывающий» оператор для Do, как Next для For и End If для If). Лулзы заключаются в том, что жертва (если она конечно полный ламер) не сможет закрыть эту мессагу. Если она конечно вывалится — если случ.число больше 0.75 то прога просто выключится.

А теперь — цикл с условием — реализуется двумя способами. Предположим, что нам нужно для выхода из цикла, чтобы Х был = 1.

1ый способ:

do'Здесь мог быть ваш кодloop

Второй:

doifthen'Здесь мог быть ваш кодelseexit do'Выходим из циклаend ifloop

 

 

еще рефераты
Еще работы по информатике