1. В меню Файл выберите команду Создать проект.
2. В диалоговом окне Создание проекта в области Шаблоны выберите Приложение Windows.
3. В поле Имя введите ForNext и нажмите кнопку ОК.
Откроется новый проект Windows Forms.
4. Из Панели элементов перетащите один элемент управления TextBox и один элемент Button на форму.
5. Дважды щелкните элемент Button, чтобы открыть редактор кода.
6. В обработчик событий Button1_Click введите следующий код:
Язык Visual Basic
Dim i As Integer = 0Dim NumberOfRepetitions As Integer = CInt(Textbox1.Text)For i = 1 To NumberOfRepetitions MsgBox("This line has been repeated " & i & " times")Next 7. Нажмите клавишу F5 для запуска программы.
8. В текстовом поле введите число и нажмите кнопку.
Окно сообщения появится столько раз, сколько было указано в текстовом поле.
В этом разделе было рассмотрено, как использовать цикл For...Next для повторения кода заданное число раз. Теперь можно перейти к следующему занятию серии Программный выбор между двумя возможностями. Оператор If... Then или изучить другой тип цикла в разделе Подробное рассмотрение. Повторения операций в цикле Do... While или Do... Until, пока не будет выполнено условие.
