繰り返し回数が事前に分からないけど、条件はわかるという場合には Do Loop Whileループ が使えます。条件が真(True)である限り処理を続けることが出来ます。Do while Loop と似ていますが、
Do while Loop 条件に充てはまると処理
Do Loop while 1回は処理をしてから条件に充てはまると処理
という違いがあります。
基本的な構文は
Do 処理 Loop While 条件式
内容
サンプルコードは、コンソール画面からなにか入力されるまで、”何か入力してください”がループします。
イメージとしては、ゲームの主人公の名前を入力するまで、次に進まない感じです。
Module Module1 Sub Main() ' 変数の宣言 Dim inStr As String = "" ' 何か入力するまで続ける Do Console.WriteLine("名前を入力してください") ' キーボードから入力 inStr = Console.ReadLine() Loop While inStr.Equals("") ' 結果を表示 Console.WriteLine() ' 改行 Console.WriteLine("こんにちは") Console.WriteLine(inStr) Console.WriteLine("さん") End Sub End Module
名前を入力してください 名前を入力してください 名前を入力してください いぬづか こんにちは いぬづか さん 続行するには何かキーを押してください . . .
コメント