Visual Basic. Теория. Нагина Е.К - 58 стр.

UptoLike

Составители: 

58
Рассмотрим компоненты оператора For-Each-Next, используемые в
примере 39.
For Each Ключевые слова, отмечающие начало структуры For-Each-
Next.
С ountry Переменная , которой присваиваются значения элементов
группы массива или семейства объекта . В первом случае
переменная должна относиться к типу Variant, Object или
приписать ей конкретный объектный тип , соответствую -
щий объектам семейства.
In Ключевое слово , отделяющее переменную от группы .
CountryArray - группа, то есть массив или семейство объ-
ектов. Количество повторений цикла совпадает с числом
элементов в группе. Переменной цикла при первом вы -
полнении присваивается значение первого элемента груп -
пы , затем всех последующих элементов.
MsgBox Country Действие, которое выполняется над элементом группы .
Next Ключевое слово , отмечающее конец структуры . Достигнув
его , программа возвращается к началу цикла структуры
For Each. Если значение переменной цикла совпадает с
последним элементом группы , выполнится последова-
тельность операторов, написанная сразу после Next.
9.8. Оператор Exit
В некоторых случаях необходимо прервать выполнение цикла до его
завершения . Это можно сделать с помощью команды безусловного пере-
хода Exit.
Команда Exit завершает выполнение цикла и передает управление
следующей за циклом конструкции. Синтаксис этого оператора внутри
цикла For выглядит так : Exit For. Внутри цикла Do синтаксис оператора
Exit Do.
For счетчик=начЗначение To конЗначение [Step шаг]
[конструкции]
[Exit For]
[конструкции]
Next [счетчик [, счетчик] [ ]]
Do [{While / Until} условие]
конструкции
[Exit Do]
конструкции
Loop
Например:
                                        58


      Рассмо трим ко мпо ненты о перато ра For-Each-Next, испо льзуем ы е в
примере 39.
For Each       К лю чевы есло ва, о тмечаю щ ие начало структуры For-Each-
                Next.
С ountry        П еременная, ко то ро й присваиваю тся значения элементо в
                г руппы – массиваили семей ствао бъекта. В перво м случае
                переменная до лж на о тно ситься к типуVariant, Object или
                приписать ей ко нкретны й о бъектны й тип, со о тветствую -
                щ ий о бъектам семей ства.
In              К лю чево есло во , о тделяю щ ее переменную о тг  руппы .
                CountryArray - г     руппа, то есть массив или семей ство о бъ-
                екто в. К о личество по вто рений ц икла со впадаетс число м
                элементо в в г   руппе. П еременно й ц икла при перво м вы -
                по лнении присваивается значение перво го элемента г         руп-
                пы , затем –всех по следую щ их элементо в.
MsgBox Country Д ей ствие, ко то ро е вы по лняется над элементо м группы .
Next            К лю чево е сло во , о тмечаю щ ее ко нец структуры . Д о стигнув
                его, про г рамма во звращ ается к началуц икла – структуры
                For Each. Е сли значение переменно й ц икла со впадает с
                по следним элементо м группы , вы по лнится по следо ва-
                тельно сть о перато ро в, написанная сразупо сле Next.

                                 9.8. О ператор Exit
      В неко то ры х случаях нео бхо димо прервать вы по лнение ц икладо его
заверш ения. Э то мо ж но сделать с по мо щ ью ко манды безусло вно г  о пере-
хо даExit.
      К о манда Exit заверш аетвы по лнение ц икла и передаетуправление
следую щ ей за ц икло м ко нструкц ии. Синтаксис это г   о о перат о ра внутри
ц икла For вы г лядиттак: Exit For. В нутри ц икла Do синтаксис о перато ра
Exit Do.
            For с чет чик=начЗ начение To ко нЗ начение [Step ш аг]
           [ко нс т рукции]
           [Exit For]
           [ко нс т рукции]
      Next [с чет чик[, с чет чик] [… ]]

      Do [{While / Until} ус л о вие]
         ко нс т рукции
         [Exit Do]
          ко нс т рукции
      Loop

      Н апример: