[VB.NET]Do WHile文でExit Do を使うサンプル

2021年9月29日

書式

Do While 条件式
If 条件式　Then
   Exit Do
  End if

使用例

Module Module1
    Sub Main()
        '変数cftの定義
        Dim cft As Integer = 15

        'Do While
        Do While cft < 25
            'If条件式
            If cft = 19 Then
                'Exit Doを使用
                Exit Do
            End If
            Console.WriteLine(cft)
            cft = cft + 2
        Loop

        Console.ReadKey()
    End Sub
End Module

結果
15
17