循环结构的执行顺序是:先运行语句块,再对 while 或 until 后的条件进行判断。在循环体内部,可使用 exit do 语句实现提前终止。
1、 启动 Visual Basic 开发环境,新建一个标准 EXE 工程。
2、 在窗体上添加两个 CommandButton 控件,其 Caption 属性分别设置为“while”和“until”;再添加一个 TextBox 控件,将其 Text 属性设为“0”,Name 属性设为 T1。

3、 以计算 1+2+3+…+100 的累加和为例,利用 Do 循环结构编写逻辑代码。单击“while”按钮,进入该按钮的 Click 事件代码编辑窗口。
4、 单击“until”按钮,进入其对应的 Click 事件代码编辑窗口。
5、 Do
6、 完成编码后运行程序,下方展示了采用 Do 循环的两种语法形式所实现的同一功能示例。

7、 单击“while”按钮,文本框中将显示结果:5050。

8、 再次单击“until”按钮,界面同样输出 5050。
9、 尽管 Do...Loop While 和 Do...Loop Until 两种结构形式不同,但均可完成相同任务。二者判断逻辑互为补集:While 在条件为真时继续循环,Until 则在条件为假时重复执行,因此在实际应用中效果等价。