Шта је за сваког?
За сваку је наредба петље. Ову изјаву бисте требали користити када требате поновити скуп изјава за сваку ставку у колекцији. Помоћу ње можете манипулисати свим елементима који се налазе у колекцији или низу.
У овом ВБ. Нет туториал, научићете,
- Шта је за сваког?
- Синтакса Фор Евери ... Нект
- Примери
- Угњежђено за петље
- Изађите и наставите даље
Синтакса Фор Евери ... Нект
За сваку наредбу узима се синтакса дата у наставку:
For Each item [ As data_type ] In group[ statement(s) ][ Continue For ][ statement(s) ][ Exit For ][ statement(s) ]Next [ item ]
Ево,
- Ставка је променљива која ће се користити за понављање свих ставки колекције. Обавезно је за сваку изјаву, али опционално у наредној наредби.
- Тип података је тип података елемента. Потребно је да ствар није пријављена.
- Група је колекција над којом треба поновити изјаве. То је неопходно.
- Изјаве нису обавезне. Означава једну или више наредби које треба извршити за сваку ставку у групи.
- Цонтинуе Фор ће пренијети контролу на почетак Фор Евери лооп. Није обавезно.
- Излаз за ће пренети контролу из за сваку петљу. Није обавезно.
- Следећи означава крај петље За сваку. То је неопходно.
Примери
Покажимо како да користимо ову изјаву:
Корак 1) Започните са креирањем нове апликације конзоле.
Корак 2) Користите следећи код:
Module Module1Sub Main()Dim myArray() As Integer = {10, 3, 12, 23, 9}Dim item As IntegerFor Each item In myArrayConsole.WriteLine(item)NextConsole.ReadKey()End SubEnd Module
Корак 3) Кликните дугме Старт са горње траке да бисте покренули код. Требали бисте добити следећи резултат:
Ево снимка екрана кода:
Објашњење кода:
- Креирање модула под називом Модуле1.
- Покретање главног потпроцедура.
- Креирање низа по имену миАрраи са скупом од 4 целобројне вредности.
- Креирање целобројне променљиве под називом ставка.
- Коришћење променљиве итем за превртање ставки низа под називом миАрраи.
- Штампање предмета пронађених у низу помоћу горњег израза на конзоли.
- Крај петље За сваку.
- Паузирање прозора конзоле на неко време чекајући да корисник предузме мере за затварање прозора.
- Крај главног потпроцедура.
- Крај модула.
Угњежђено за петље
Петља За сваку може се угнездити. То ће се догодити када ставимо једну за сваку петљу у другу за сваку петљу. Покажимо то на примеру.
Корак 1) Направите нову конзолу.
Корак 2) Користите следећи код:
Module Module1Sub Main()Dim nums() As Integer = {12, 23, 35}Dim names() As String = {"Guru99", "alice", "antony"}For Each n As Integer In numsFor Each st As String In namesConsole.Write(n.ToString & st & " ")NextNextConsole.ReadKey()End SubEnd Module
Корак 3) Кликните дугме Старт на горњој траци да бисте извршили код. Требали бисте добити следећи излаз:
Ево снимка екрана кода:
Објашњење кода:
- Креирање модула под називом Модуле1.
- Покретање главног потпроцедура.
- Креирање низа под називом нумс са скупом целих бројева.
- Креирање низа имена са скупом имена.
- Креирање променљиве н и његово коришћење за итирање ставки садржаних у низу под називом нумс. Ово је спољна петља За сваку.
- Стварање променљиве са именом ст и употреба за прелазак преко ставки садржаних у низу са именима имена. Ово је унутрашња За сваку петљу.
- Комбинујући предмете из два низа. Свака ставка у низу бројева биће комбинована са сваком ставком у низу имена. Функција ТоСтринг помаже нам да конвертујемо бројеве прочитане из низа нумс у низове. „“ Нам помаже да направимо простор након сваке комбинације. Комбинација је постигнута помоћу & (амперсанд).
- Крај унутрашње За сваку петљу.
- Крај спољне За сваку петљу.
- Паузирајте прозор конзоле чекајући да корисник нешто предузме да га затвори.
- Крај главног потпроцедура.
- Крај модула.
Изађите и наставите даље
Када користите наредбу Екит Фор, извршење ће оставити Фор Фор Евери
... Сљедећа петља и контрола бит ће пребачени у изразе који долазе након наредне наредбе.Када користите наредбу Настави за, контрола ће се пренети на следећу итерацију ваше петље. Покажимо то на примеру:
Корак 1) Започните са креирањем нове апликације конзоле.
Корак 2) Користите следећи код:
Module Module1Sub Main()Dim nums() As Integer ={10, 12, 14, 17, 19, 23, 26, 31, 33, 37, 40, 48}For Each n As Integer In numsIf n>= 17 And n <= 25 ThenContinue ForEnd IfConsole.Write(n.ToString & " ")If n = 37 ThenExit ForEnd IfNextConsole.ReadKey()End SubEnd Module
Корак 3) Покрените код кликом на дугме Старт са горње траке. Требали бисте добити следећи резултат:
Ево снимка екрана кода:
Објашњење кода:
- Креирање модула са именом модуле1.
- Покретање главног потпроцедура.
- Креирање низа под називом нумс са скупом целих бројева.
- Стварајући променљиву названу н, тада је користимо за прелазак преко елемената садржаних у низу нумс.
- Коришћење услова Иф ... Тхен за проверу вредности променљиве н. Ако је вредност између 17 (укључено 17) и 25 (укључено 25), итерација ће прескочити на следећу ставку у низу.
- Прескакање горњих вредности се врши овде. Ово је изјава неопходна за извођење прескакања. То значи да се петља Фор Евери неће изводити за прескочене ставке.
- Завршите услов Иф.
- Штампање вредности добијених из низа на конзоли. Функција ТоСтринг помаже нам да вредности из бројева претворимо у низове. "" Ће створити размак након сваке одштампане вредности.
- Провера променљиве итерације н када је њена вредност 37 помоћу услова Иф ... Тхен.
- Излаз из петље Фор Евери када је горњи услов тачан, односно вредност н = 37. То значи да ће се итерација на ставкама низа зауставити.
- Крај горе наведеног услова Иф.
- Крај Фор ... Свака изјава.
- Паузирајте прозор конзоле чекајући да корисник нешто предузме да га затвори.
- Крај главног потпроцедура.
- Крај модула.
Резиме
- Израз „За сваки“ користи се за понављање сваке ставке која се налази у колекцији или низу.
- Током развоја можете да комбинујете изразе За сваку са Излазима за и Настави за да бисте контролисали како се врши итерација.