Visual Basic. Разработка приложений: теория и практика. Ищенко В.А - 58 стр.

UptoLike

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

58
For Each элемент In коллекция
Блок операторов
Next элемент
Ниже приведен пример этой структуры:
Пример 10.
Private Sub Proc10_ForEachNext ( )
Dim CountryArray (5) As String
Dim Country As Variant
CountryArray (1) = “India”
CountryArray (2) = “Peru”
CountryArray (3) = “Greeke”
CountryArray (4) = “Canada”
CountryArray (5) = “Kenya”
For Each Country In CountryArray
MsgBox Country
Next Country
End Sub
В Proc10 элементы массива CountryArray заполняются названиями
стран, которые затем по очереди выводятся на экран в структуре For-Each-
Next в виде сообщения в окне сообщения (MsgBox).
Рассмотрим компоненты оператора For-Each-Next, используемые в
примере 10.
For Each Ключевые слова, отмечающие начало структуры For-Each-
Next
Сountry Переменная, которой присваиваются значения элементов
группымассива или семейства объекта. В первом случае
переменная должна относиться к типу Variant, Object или
приписать ей конкретный объектный тип, соответствую-
щий объектам семейства
In Ключевое слово, отделяющее переменную от группы
CountryArray Группа, то есть массив или семейство
объектов. Количест-
во повторений цикла совпадает с числом элементов в
группе. Переменной цикла при первом выполнении при-
сваивается значение первого элемента группы, затем
всех последующих элементов
MsgBox CountryДействие, которое выполняется над элементом группы
Next Ключевое слово, отмечающее конец структуры. Достигнув
его, программа возвращается к началу цикластруктуры
For Each. Если значение переменной цикла
совпадает с
последним элементом группы, выполнится последова-
тельность операторов, написанная сразу после Next.
                                       58

                 For Each элемент In коллекция
                   Блок операторов
                 Next элемент
     Ниже приведен пример этой структуры:
Пример 10.
Private Sub Proc10_ForEachNext ( )
      Dim CountryArray (5) As String
      Dim Country As Variant
      CountryArray (1) = “India”
      CountryArray (2) = “Peru”
     CountryArray (3) = “Greeke”
     CountryArray (4) = “Canada”
     CountryArray (5) = “Kenya”
     For Each Country In CountryArray
           MsgBox Country
     Next Country
End Sub
      В Proc10 элементы массива CountryArray заполняются названиями
стран, которые затем по очереди выводятся на экран в структуре For-Each-
Next в виде сообщения в окне сообщения (MsgBox).
     Рассмотрим компоненты оператора For-Each-Next, используемые в
примере 10.
For Each      Ключевые слова, отмечающие начало структуры For-Each-
               Next
Сountry        Переменная, которой присваиваются значения элементов
               группы – массива или семейства объекта. В первом случае
               переменная должна относиться к типу Variant, Object или
               приписать ей конкретный объектный тип, соответствую-
               щий объектам семейства
In             Ключевое слово, отделяющее переменную от группы
CountryArray Группа, то есть массив или семейство объектов. Количест-
               во повторений цикла совпадает с числом элементов в
               группе. Переменной цикла при первом выполнении при-
               сваивается значение первого элемента группы, затем –
               всех последующих элементов
MsgBox Country – Действие, которое выполняется над элементом группы
Next          Ключевое слово, отмечающее конец структуры. Достигнув
               его, программа возвращается к началу цикла – структуры
               For Each. Если значение переменной цикла совпадает с
               последним элементом группы, выполнится последова-
               тельность операторов, написанная сразу после Next.