Сколько раз выполнится тело цикла i 4

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

Exit For часто используется после оценки какого-то условия (например, в If . Then . Else структура). Для следующих условий может потребоваться использовать Exit For следующее:

• Продолжение итерации является ненужным или невозможным. Ошибочное значение или запрос на завершение может создать это условие.
• А Try . Catch . Finally оператор перехватывает исключение. Вы можете использовать Exit For в конце Finally блока.
• У вас есть бесконечный цикл, который может выполнять большой или даже бесконечное количество раз. При обнаружении такого условия можно использовать Exit For для escape-цикла. Дополнительные сведения см. в разделе "Do. Оператор цикла.

Техническая реализация

For При запуске цикла . Next , Visual Basic оценивает start и end step . Visual Basic оценивает эти значения только в это время, а затем назначается start counter . Перед запуском блока инструкций Visual Basic сравнивается counter с end . Если counter значение уже больше end (или меньше, если step отрицательно), For цикл заканчивается и элемент управления передается оператору, который следует инструкции Next . В противном случае блок инструкции выполняется.

Каждый раз, когда Visual Basic сталкивается с оператором Next , он увеличивается step counter и возвращается в инструкцию For . Снова он сравнивается counter с end и снова запускает блок или выходит из цикла в зависимости от результата. Этот процесс продолжается до тех пор, пока не counter будет end Exit For обнаружена инструкция.

Цикл не останавливается до тех пор, пока counter не прошел. end Если counter равно end , цикл продолжается. Сравнение, определяющее, следует ли запускать блок counter = end если step отрицательный.

Если изменить значение counter в цикле, код может оказаться более сложным для чтения и отладки. Изменение значения start , end или step не влияет на значения итерации, которые были определены при первом вводе цикла.

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

Аргумент шага

Значение step может быть положительным или отрицательным. Этот параметр определяет обработку цикла в соответствии со следующей таблицей:

Значение step по умолчанию равно 1.

Аргумент счетчика

В следующей таблице указывается, определяет ли counter новая локальная переменная, которая область в весь For…Next цикл. Это определение зависит от того, присутствует ли и counter уже datatype определена ли она.

Тип counter данных определяет тип итерации, который должен быть одним из следующих типов:

• , Byte , SByte UInteger Integer Short UShort Long Decimal ULong Single или . Double
• Перечисление, которое объявляется с помощью инструкции перечисления.
• Объект Object .
• Тип T , имеющий следующие операторы, где B тип, который можно использовать в Boolean выражении. Public Shared Operator >= (op1 As T, op2 As T) As B Public Shared Operator

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

Выражения start и step выражения могут оценивать любой тип данных, расширяющий counter тип. end Если для этого используется определяемый пользователем тип counter , может потребоваться определить CType оператор преобразования для преобразования типов start или end step в тип counter .

Пример 1

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

Dim lst As New List(Of Integer) From For index As Integer = lst.Count - 1 To 0 Step -1 lst.RemoveAt(index) Next Debug.WriteLine(lst.Count.ToString) ' Output: 0 

Пример 2

В следующем примере выполняется итерацию перечисления, объявленного с помощью инструкции Enum.

Public Enum Mammals Buffalo Gazelle Mongoose Rhinoceros Whale End Enum Public Sub ListSomeMammals() For mammal As Mammals = Mammals.Gazelle To Mammals.Rhinoceros Debug.Write(mammal.ToString & " ") Next Debug.WriteLine("") ' Output: Gazelle Mongoose Rhinoceros End Sub 

Пример 3

В следующем примере параметры инструкции используют класс, имеющий перегрузки операторов для + операторов , - >= и

Private Class Distance Public Property Number() As Double Public Sub New(ByVal number As Double) Me.Number = number End Sub ' Define operator overloads to support For. Next statements. Public Shared Operator +(ByVal op1 As Distance, ByVal op2 As Distance) As Distance Return New Distance(op1.Number + op2.Number) End Operator Public Shared Operator -(ByVal op1 As Distance, ByVal op2 As Distance) As Distance Return New Distance(op1.Number - op2.Number) End Operator Public Shared Operator >=(ByVal op1 As Distance, ByVal op2 As Distance) As Boolean Return (op1.Number >= op2.Number) End Operator Public Shared Operator <=(ByVal op1 As Distance, ByVal op2 As Distance) As Boolean Return (op1.Number <= op2.Number) End Operator End Class Public Sub ListDistances() Dim distFrom As New Distance(10) Dim distTo As New Distance(25) Dim distStep As New Distance(4) For dist As Distance = distFrom To distTo Step distStep Debug.Write(dist.Number.ToString & " ") Next Debug.WriteLine("") ' Output: 10 14 18 22 End Sub 

См. также

• List
• Циклические структуры
• Оператор While. End While
• Оператор Do. Loop
• Вложенные структуры управления
• Оператор Exit
• Коллекции

Совместная работа с нами на GitHub

Источник этого содержимого можно найти на GitHub, где также можно создавать и просматривать проблемы и запросы на вытягивание. Дополнительные сведения см. в нашем руководстве для участников.