結果 : how to do a while loop in visual basic