VB.NETのForEach文とは？実践で使うための裏技も解説！

VB.NET

VB.NET
プログラミング言語

公開日時: 2020-02-21 　更新日時: 2022-06-13

この記事でわかること

「VB.NETのFor Each文って、何に使うのかな……」
「VB.NETのFor Each文の具体的な使い方や、サンプルコードを知りたい……」

と思っていませんか？

For Each文は、ループ処理を作る時に覚えておくと便利です。

そこで今回は、VB.NETのFor Each文の使い方・実践で使うための裏技を解説します。

システム エンジニア: VB.NETのFor Each文って、すぐに使えるのかな...

プロジェクト マネージャー: 使い方はとっても簡単なので、1つずつ覚えていきましょう。

※この記事は、Visual Basicの16.0で動作確認しました。

VB.NETのFor Each文とは？

For Each文は、ループ処理を作るときに使う「構文」の1つです。

「For Each文」でループ処理を作るメリットは、「ループ回数を直接指定しなくても良い点」です。3回、5回など指定しなくても、「複数の値が入っている親要素」を指定すれば、要素の数だけループ処理が実行されるのです。

VB.NETのFor Eachの使い方とは？

次に、VB.NETのFor Each文の使い方を解説します。使い方は、以下の通りです。

For Each 子要素 As 子要素の型名 In 親要素(複数の値が入った変数)
    'ここに「子要素」を使った処理を書く
Next

For Each 子要素 As 子要素の型名 In 親要素(複数の値が入った変数)

'ここに「子要素」を使った処理を書く

親要素に複数の値が入った配列などを指定することで、ループ処理が作れます。

VB.NETでFor Eachを使うときのサンプルコード

サンプルコードは、以下の通りです。

Module Program
    Sub Main(args As String())
        '配列の宣言 + 初期値セット
        Dim arrNetProgLang = New String() {"VB.NET", "C#"}

        'For Each文で配列の要素の数分、値を出力
        For Each item As String In arrNetProgLang
            Console.WriteLine(item)
        Next
    End Sub
End Module

Module Program

Sub Main(args As String())

'配列の宣言 + 初期値セット

Dim arrNetProgLang = New String() {"VB.NET", "C#"}

'For Each文で配列の要素の数分、値を出力

For Each item As String In arrNetProgLang

Console.WriteLine(item)

End Sub

End Module

実行結果：

配列宣言時に入れた初期値が、ログに出力されています。このように、ループ処理を簡単に作れます。

VB.NETのFor Eachを使いこなす2つのテクニックとは？

ここからは、応用テクニックを2つ解説します。

1. Exit For：途中で処理を抜け出す

1つ目は、「途中で処理を抜け出す」ときです。この場合は、「Exit For」を使います。

Module Program
    Sub Main(args As String())
        'スコアを格納する配列の宣言 + 初期値セット
        Dim arrScore = New String() {50, 40, 25, 40, 80}

        '合計計算用の変数を用意
        Dim intNumTotal As Integer
        intNumTotal = 0

        '要素数分値を出力
        For Each num As String In arrScore

            '合計値が100以上の場合は、処理終了
            If intNumTotal >= 100 Then

                Console.WriteLine("100点以上となったため、処理終了")
                Exit For

            End If

            '合計値を計算
            intNumTotal = intNumTotal + num

            '取得した点数 + 合計点を出力
            Console.WriteLine(num & "点ゲット")
            Console.WriteLine("合計点は" & intNumTotal)
            Console.WriteLine("--------------------------")
        Next
    End Sub
End Module

Module Program

Sub Main(args As String())

'スコアを格納する配列の宣言 + 初期値セット

Dim arrScore = New String() {50, 40, 25, 40, 80}

'合計計算用の変数を用意

Dim intNumTotal As Integer

intNumTotal = 0

'要素数分値を出力

For Each num As String In arrScore

'合計値が100以上の場合は、処理終了

If intNumTotal >= 100 Then

Console.WriteLine("100点以上となったため、処理終了")

Exit For

End If

'合計値を計算

intNumTotal = intNumTotal + num

'取得した点数 + 合計点を出力

Console.WriteLine(num & "点ゲット")

Console.WriteLine("合計点は" & intNumTotal)

Console.WriteLine("--------------------------")

End Sub

End Module

実行結果：

If文の中で「Exit For」を書いているため、100点以上の場合に処理が終了しています。このように、処理を抜け出すことができるのです。

2. Continue For：途中で処理をスキップする

2つ目は、「途中で処理をスキップする」ときです。この場合は、「Continue For」を使います。

Module Program
    Sub Main(args As String())
        'スコアを格納する配列の宣言 + 初期値セット
        Dim arrScore = New String() {50, 40, 25, 40, 80}

        '要素数分値を出力
        For Each num As String In arrScore

            '50点以上の場合は合格
            If num >= 50 Then
                Console.WriteLine("あなたの点数は「" & num & "」なので、合格です。")
                Console.WriteLine("--------------------------")
                Continue For
            End If

            '50点未満の場合は、不合格です
            Console.WriteLine("あなたの点数は「" & num & "」なので、不合格です。")
            Console.WriteLine("勉強を継続して、再受験しましょう")
            Console.WriteLine("--------------------------")
        Next
    End Sub
End Module

Module Program

Sub Main(args As String())

'スコアを格納する配列の宣言 + 初期値セット

Dim arrScore = New String() {50, 40, 25, 40, 80}

'要素数分値を出力

For Each num As String In arrScore

'50点以上の場合は合格

If num >= 50 Then

Console.WriteLine("あなたの点数は「" & num & "」なので、合格です。")

Console.WriteLine("--------------------------")

Continue For

End If

'50点未満の場合は、不合格です

Console.WriteLine("あなたの点数は「" & num & "」なので、不合格です。")

Console.WriteLine("勉強を継続して、再受験しましょう")

Console.WriteLine("--------------------------")

End Sub

End Module

実行結果：

先ほどと同様、If文を追加しています。If文内にある「Continue For」以降の処理は実行されず、次のループ処理に移動しています。

このように、処理をスキップできるのです。

VB.NETで繰り返し処理するなら「For」も覚えておこう

For Each文は、配列などの複数の値が入っているケースで便利です。ただ、「ループ回数を指定して実行したいとき」に、少し不便です。

そのため、「ループ回数を指定してループ処理を作る方法」も、覚えておくのがおすすめです。

Module Program
    Sub Main(args As String())
        '要素数分値を出力
        For i = 1 To 5
            Console.WriteLine(i & "回目の実行")
        Next
    End Sub
End Module

Module Program

Sub Main(args As String())

'要素数分値を出力

For i = 1 To 5

Console.WriteLine(i & "回目の実行")

End Sub

End Module

実行結果：

「For i = 1 To 5」で、1 ~ 5までループ処理する処理を作っています。このように、数を指定してループ処理が作れるのです。

まとめ

今回は、VB.NETのFor Each文の使い方・使いこなすための2つのコツを解説しました。

「If文」や「For文」など、セットで覚えておくとループ処理の幅が広がります。

1つずつでいいので、ぜひコードを書いて実行してみてくださいね。

FEnet.NETナビ・.NETコラムは株式会社オープンアップシステムが運営しています。

株式会社オープンアップシステムはこんな会社です

秋葉原オフィスには株式会社オープンアップシステムをはじめグループのIT企業が集結！
数多くのエンジニアが集まります。

スマホアプリから業務系システムまで

スマホアプリから業務系システムまで開発案件多数。システムエンジニア・プログラマーとしての多彩なキャリアパスがあります。
充実した研修制度

毎年、IT技術のトレンドや社員の要望に合わせて、カリキュラムを刷新し展開しています。社内講師の丁寧なサポートを受けながら、自分のペースで学ぶことができます。
資格取得を応援

スキルアップしたい社員を応援するために資格取得一時金制度を設けています。受験料(実費)と合わせて資格レベルに合わせた最大10万円の一時金も支給しています。
東証プライム上場企業グループ

オープンアップシステムは東証プライム上場「株式会社オープンアップグループ」のグループ企業です。

安定した経営基盤とグループ間のスムーズな連携でコロナ禍でも安定した雇用を実現させています。

株式会社オープンアップシステムに興味を持った方へ

株式会社オープンアップシステムでは、開発系エンジニア・プログラマを募集しています。

年収をアップしたい！スキルアップしたい！大手の上流案件にチャレンジしたい！
まずは話だけでも聞いてみたい場合もOK。お気軽にご登録ください。

株式会社オープンアップシステムへ応募する
会員登録不要! カンタン45秒!

VB.NETのForEach文とは？実践で使うための裏技も解説！

VB.NETのFor Each文とは？

VB.NETのFor Eachの使い方とは？

VB.NETでFor Eachを使うときのサンプルコード

VB.NETのFor Eachを使いこなす2つのテクニックとは？

1. Exit For：途中で処理を抜け出す

2. Continue For：途中で処理をスキップする

VB.NETで繰り返し処理するなら「For」も覚えておこう

まとめ

株式会社オープンアップシステムはこんな会社です

スマホアプリから業務系システムまで

充実した研修制度

資格取得を応援

東証プライム上場企業グループ

株式会社オープンアップシステムに興味を持った方へ

新着案件New Job

開発エンジニア/東京都品川区/【WEB面談可】/在宅ワーク

遠隔テストサービス機能改修/JavaScript/東京都港区/【WEB面談可】/テレワーク

病院内システムの不具合対応、保守/東京都豊島区/【WEB面談可】/テレワーク

開発/JavaScript/東京都豊島区/【WEB面談可】/テレワーク

債権債務システム追加開発/東京都文京区/【WEB面談可】/在宅勤務

PMO/東京都豊島区/【WEB面談可】/在宅勤務

VB.NETのForEach文とは？実践で使うための裏技も解説！

VB.NETのFor Each文とは？

VB.NETのFor Eachの使い方とは？

VB.NETでFor Eachを使うときのサンプルコード

VB.NETのFor Eachを使いこなす2つのテクニックとは？

1. Exit For：途中で処理を抜け出す

2. Continue For：途中で処理をスキップする

VB.NETで繰り返し処理するなら「For」も覚えておこう

まとめ

株式会社オープンアップシステムはこんな会社です

スマホアプリから業務系システムまで

充実した研修制度

資格取得を応援

東証プライム上場企業グループ

株式会社オープンアップシステムに興味を持った方へ

新着案件New Job

開発エンジニア/東京都品川区/【WEB面談可】/在宅ワーク

遠隔テストサービス機能改修/JavaScript/東京都港区/【WEB面談可】/テレワーク

病院内システムの不具合対応、保守/東京都豊島区/【WEB面談可】/テレワーク

開発/JavaScript/東京都豊島区/【WEB面談可】/テレワーク

債権債務システム追加開発/東京都文京区/【WEB面談可】/在宅勤務

PMO/東京都豊島区/【WEB面談可】/在宅勤務

関連記事Related Posts

VB.NETをおすすめする3つの理由とは？VBAとの違いや勉強方法を解説

【VB.NET入門】配列の使い方まとめ！基礎から応用まで徹底解説

【VB.NET入門】Dictionaryとは？仕組みや使い方を徹底解説

【サンプル付き】VB.NETでファイルの存在チェックをする方法！

VB.NETの構造体の使い方は？クラスとの違いやサンプルも解説！