vb6 - Do While の代わりに While ループを使用できますか

Question

Open App.Path & "\employee.txt" For Input As #3

Do While (Not EOF(3))
    Input #3, strEmployeeRead
    lstEmployee.AddItem (strEmployeeRead)
Loop
Close #3

DO While (...) を While ループに置き換えることはできますか?

Answer 1

あなたの場合、ループを使用する必要はありません。ループDo Whileを使用して同じ結果が得られますWhile

While (Not EOF(3))
    ...
Wend

通常、条件の状態をチェックする前に少なくとも 1 回の反復を取得する必要がある場合は、Do..Whileループよりもループを選択します。While

Do
    ...
Loop While (Not EOF(3))