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

UptoLike

ВУЗ: 

ВГУ | Воронеж

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

Рубрика: 

57
нет, управление передается оператору, заданному после
End Select.
Case“level1” Первый вариант значения. Если значение определяющего
выражения совпадает с ним , выполняется фрагмент про -
граммы до следующего ключевого слова Case, а затем
управление передается операторам , стоящим после End
Select. Если совпадения нет, управление передается сле-
дующему Case.
Case “level2” Второй вариант значения . Действует так же, как Case
“level1”.
Case “level3” Третий вариант значения . Действует так же, как Case
“level1”.
Case Else Фрагмент программы , указанный за этими словами, выпол-
няется , если значение определяющего выражения не совпа-
ло ни с одним из предыдущих вариантов Case.
End Select Ключевые слова, отмечающие конец структуры Select Case.
9.7. Управляющая структура For-Each-Next
Это самый мощный цикл Visual Basic - For-Each-Next. Аналогичные
структуры в других языках программирования встречаются очень редко .
Структура For-Еach-Next предназначена для выполнения одной и той же
группы действий над каждым объектом семейства или структуры массива.
Ниже приведен пример этой структуры :
Sub Proc39_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
End Sub
В Proc39 элементы массива CountryArray заполняются названием
стран, которые затем по очереди выводятся на экран в структуре For-Each-
Next в виде следующего сообщения :
Microsoft Excel
India 
                                         57
              нет, управление передается о перато ру, заданно му по сле
              End Select.
Case“ level1” П ервы й вариант значения. Е сли значение о пределяю щ его
              вы раж ения со впадает с ним , вы по лняется фраг     мент про -
              г раммы до следую щ ег     о клю чево г о сло ва Case, а затем
              управление передается о перато рам, сто ящ им по сле End
              Select. Е сли со впадения нет, управление передается сле-
              дую щ ем уCase.
Case “level2” В то ро й вариант значения. Д ей ствует так ж е, как Case
              “level1”.
Case “level3” Т ретий вариант значения. Д ей ствует так ж е, как Case
              “level1”.
Case Else     Ф рагментпро г   раммы , указанны й заэтим и сло вами, вы по л-
              няется, если значение о пределяю щ ег    о вы раж ения не со впа-
              ло нис о дним из преды дущ их варианто вCase.
End Select    К лю чевы е сло ва, о тмечаю щ ие ко нец структуры Select Case.

           9.7. У правл яю щ ая стру кту ра For-Each-Next

      Э то самы й мо щ ны й ц икл Visual Basic - For-Each-Next. А нало гичны е
структуры в друг    их язы ках про г рамм иро вания встречаю тся о чень редко .
Структура For-Еach-Next предназначена для вы по лнения о дно й и то й ж е
группы дей ствий над каж ды м о бъекто м семей ства или структуры массива.
Н иж е приведен примерэто й структуры :
Sub Proc39_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
End Sub
      В Proc39 элементы массива CountryArray запо лняю тся названием
стран, ко то ры е затем по о череди вы во дятся наэкран вструктуреFor-Each-
Next ввидеследую щ ег    о со о бщ ения:

                       Microsoft Excel

                       India

Страницы