結果 : while wend loop in vb example