VB中的Do...Loop语句怎么使用？

Do...Loop 语句
当条件为 True 时，或直到条件变为 True 时，重复执行一个语句块中的命令。

语法

Do [{While | Until} condition]
[statements]
[Exit Do]
[statements]

Loop

Do...Loop 语句示例
本示例示范如何使用 Do...Loop 语句。内层的 Do...Loop 语句循环到第 10 次时将标志值设置为 False，并用 Exit Do 语句强制退出内层循环。外层循环则在检查到标志值为 False 时，马上退出。

Dim Check, Counter
Check = True: Counter = 0 ' 设置变量初始值。
Do ' 外层循环。
Do While Counter < 20 ' 内层循环。
Counter = Counter + 1 ' 计数器加一。
If Counter = 10 Then ' 如果条件成立。
Check = False ' 将标志值设成 False。
Exit Do ' 退出内层循环。
End If
Loop
Loop Until Check = False ' 退出外层循环。

看考试教程吧，写得很清除了（链接给的是循环结构部分的讲解）：

http://www.examda.com/ncre2/VB/fudao/20070213/114159965-3.html

有图也有实例，看不明白就开个vb自己试一下，慢