繰り返し回数が事前に分からないけど、条件はわかるという場合には 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
名前を入力してください 名前を入力してください 名前を入力してください いぬづか こんにちは いぬづか さん 続行するには何かキーを押してください . . .
コメント