Цикл со счетчиком (FOR . . . Next)

ЦИКЛЫ

Содержание работы:

1 ПОНЯТИЕ ЦИКЛА.. 1

1.1 ЦИКЛ СО СЧЕТЧИКОМ (FOR... NEXT) 1

1.2. ОПЕРАТОРЫ ЦИКЛА С НЕИЗВЕСТНЫМ ЗАРАНЕЕ ЧИСЛОМ ПОВТОРЕНИЙ(DO...LOOP) 4

2. РАБОТА СО СТРОКАМИ.. 5

3 КОНТРОЛЬНОЕ ЗАДАНИЕ.. 7

ПОНЯТИЕ ЦИКЛА

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

В Visual Basic существуют два основных типа циклов - циклы со счетчиком (с известным числом повторений) и циклы с условием (итерационные циклы). Циклы со счетчиком используют в тех случаях, когда необходимо выполнить некоторые действия определенное число раз. Циклы с условием применяются тогда, когда действия в программе должны повторяться пока выполняется определенное условие или до тех пор, пока оно не начнет выполняться.

Цикл, который никогда не заканчивается, называется бесконечным, а о программе в подобном случае говорят, что она зацикливается.

ЦИКЛ СО СЧЕТЧИКОМ (FOR... NEXT)

Иногда бывает нужно повторить некоторую часть программы вполне определенное число раз. Например, Вам может быть предоставлено только три попытки ответа на вопрос сколько будет два плюс два, или может потребоваться посылать счет ежемесячно в течение года. Один из способов задания числа повторений цикла заключается в использовании конструкции FOR... NEXT (лля... следующий).

Посмотрите на две строчки программы:

FOR X=l ТО 3 NEXT X

Именно они и образуют цикл. Первая строка начинает цикл, а вторая заканчивает его. Любые строки программы, вставленные между ними, будут телом цикла, то есть той группой операторов, которые будут выполняться три раза.

НАБЕРИТЕ текст следующей программы для кнопки «Выполнить»и ВЫПОЛНИТЕ ее:

Dim I As Integer Dim N As String N = "" For I = 1 To 3 N = N & I & " " Next I MsgBox(N)  

Обратите внимание на то, что переменной I последовательно будут присваиваться значения от 1 до 3-х (это задается в операторе FOR ). Компьютер три раза выводит предложение, стоящее между операторами FOR и NEXT. Переменная I является в этом случае счетчиком цикла. Оператор NEXT I дает компьютеру указание увеличивать значение I каждый раз на 1, пока оно не достигнет значения большего 3. В этом случае цикл заканчивается, и программа продолжается уже за его пределами.

В цикле FOR...NEXT оператор FOR устанавливает переменную цикла и задает ее начальное и конечное значение. Оператор NEXT дает компьютеру указание изменить значение этой переменной и возвратиться на начало цикла, если полученное значение не выходит за пределы заданного конечного значения.

ЗАМЕНИТЕ программный код на следующий и ВЫПОЛНИТЕ программу:

Dim I As Integer Dim N As String N = "" For I = 1 To 15 step 2 N = N & I & " " If I = 7 Then Exit For Next I MsgBox(N)

Step – это шаг цикла, то есть то число на которое будет изменяться счетчик. Шаг может быть как положительный, так и отрицательный.

Выход из цикла FOR... NEXT можно осуществить досрочно. Для этого необходимо воспользоваться оператором альтернативного выхода из цикла EXIT FOR (выход для). Рассмотрим цикл, который повторяется до тех пор, пока не будет введен правильный ответ, но при этом он будет выполняться не более трех раз.

1. Запустите Visual Studio и создайте новый проект. Добавите в форму элемент управления Button, но на этот раз новым способом.

2. Дважды щелкните мышью в окне области элементов на элементе управления Button (он находится на закладке Windows Forms). Visual Studio поместит объект кнопки в верхний левый угол формы. В случае с элементом управления Button, а также и со многими другими, двойной щелчок мышью позволяет быстро создать в форме объект со стандартными размерами. Теперь можно перетащить этот объект кнопки в нужное место и настроить его свойства.

3. Перетащите объект кнопки вправо и поместите его в центре верхней части формы.

4. Откройте окно Properties (Свойства), а затем установите свойство Text кнопки на значение Цикл.

5. В области элементов щелкните дважды на элементе управления TextBox. Visual Studio создаст небольшое текстовое поле.

6. Установите свойство Multiline этого объекта текстового поля на значение True, а свойство ScrollBars на значение Vertical. Эти настройки подготавливают текстовое поле к отображению более чем одной строки текста.

7. Сделайте свойство Text объекта текстового поля пустым (empty).

8. Переместите текстовое поле под кнопку и увеличьте его так, чтобы оно заняло большую часть формы.

9. Щелкните дважды на кнопке Цикл формы. В Редакторе кода появится процедура события Button1_Click.

10. Введите в этой процедуре следующие операторы программы:

Dim i As IntegerDim Wrap As StringWrap = Chr(13) & Chr(10)For i = 1 To 10TextBox1.Text = TextBox1.Text & "Строка " & i & WrapNext i

Эта процедура события объявляет две переменные - одну типа Integer (i), а вторую - типа String (Wrap), а затем присваивает второй переменной строковое значение, представляющее символ перевода строки. В терминах программирования символ перевода строки является эквивалентом нажатия на клавишу (Enter) на клавиатуре. Чтобы сделать его менее громоздким, создано для этого символа специальную переменную, которая состоит из элементов "возврат каретки" (return) и "прокрутка строки" (linefeed).

После объявления переменной и присвоения, я использую цикл For…Next для десятикратного отображения в объекте текстового поля строки "Строка X", где X - это текущее значение переменной-счетчика (другими словами, со "Строка 1" до "Строка 10"). Символы конкатенации строк (&) объединяют в текстовом поле части каждой строки воедино. В начале в объект добавляется все значение текстового поля, которое хранится в свойстве Text, так, что предыдущие строки при добавлении новых не удаляются. Затем для отображения новой строки и перевода курсора влево и на следующую строку объединяются строка "Строка", текущий номер строки и символ возврата каретки (Wrap). Оператор Next завершает цикл.

Обратите внимание, что Visual Studio автоматически добавляет оператор Next в конец цикла, когда вы вводите For в его начале. В данном случае я отредактировал оператор Next так, чтобы включить в него имя переменной i - это необязательное пояснение синтаксиса, которое мне нравится использовать.

11. Чтобы сохранить изменения, щелкните на кнопке Save All (Сохранить все) на стандартной панели инструментов. Теперь запустите эту программу.

12. Щелкните на кнопке Start (Начать) стандартной панели инструментов.

13. Щелкните на кнопке Цикл.

Цикл For…Next отображает в текстовом поле 10 строк, как показано ниже.

14. Снова щелкните на кнопке Цикл. Цикл For…Next отображает в форме еще 10 строк, и вы можете увидеть невидимые строки, используя вертикальную полосу прокрутки. При каждом повторении цикла он добавляет в объект текстового поля 10 новых строк.

Совет. Боитесь, что в объекте текстового поля не останется места? Если вы отображаете только 10 строк, это случится очень нескоро. Объект многострочного текстового поля имеет практическое ограничение на размер текста в 32 Кб. Для текстов большего объема или для форматирования попробуйте использовать элемент управления RichTextBox.

Дата добавления: 2015-07-08