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

Циклы For

For Do...Mext

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

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

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

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

Dim a As Integer Dim a As Integer

a = 0 For a = 1 To 10 Step

Do Until a > 10 инструкции a = a + 1 Next a

инструкции

Loop

В первой строке присваивается имя переменной, имеющей значение Integer. Вторую можно перевести так: для а от 1 до 10 при шаге 1. В третьей содержатся инструкции, которые выполнятся десять раз. Последняя увеличивает значение а на единицу (шаг равен 1) и дает команду на возврат ко второй строке. К инструкциям может быть добавлен еще один или несколько циклов (вложенные циклы). Step (шаг) можно задать любой, а по умолчанию он равен 1, то есть Step можно исключить из кодов.

Составим код для цикла For...Next, содержащего вложенный цикл. Расположим на форме кнопку Button и два текстовых поля TextBox.

Dim a As Integer Dim b As Integer Dim с As Integer = 0 Dim d As Integer = 0 For a = 1 To 10

For b = 1 To 10 d = d + 1 TextBoxl.Text = d

Next b

с = с + 1 TextBox2.Text = с Next a

Переменные а и b задают количество итераций в цикле. Инструкции d = d+ lHC = c + l говорят о том, что значения переменных d и с с каждой итерацией возрастают на единицу. Внешний цикл выполняет каждую итерацию после выполнения всех интераций внутренним циклом. Таким образом,

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

Циклы For

в данном примере на каждые десять итераций внутреннего цикла приходится одна итерация внешнего. Запустите программу, щелкните Button и вы увидите, что величина d возросла до ста, а величина с до десяти. Попробуйте поменять значение шага (Step). Если определить величину шага Step 5, количество итераций сократится до двух. Соответствующим образом изменятся значения переменных cud. Величина шага может измеряться как целым, так и дробным числом. Итерации отсчитываются и в обратном порядке. Для этого величине шага надо присвоить отрицательное значение: For а = 10 То 1 Step -1.


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