VB编程的Do循环结构

启动VB界面，建立标准EXE。

创建两个命令按钮，caption改为while，until。创建一个文本框，text=0，名称改为T1.

现在以1+2+3+...100为例，用do循环结构编程。点击while按钮，进入代码编辑器，Dim i As Long, s As Long Do  s = s + i  i = i + 1 Loop While i <= 100 T1.Text = s

然后点击until按钮，进入代码编辑器，Do  s = s + i  i = i + 1 Loop Until i > 100 T1.Text = s

编写好代码之后，点击运行一下，下面是两个用Do不同格式写出的同一个例子。

现在先点击while按钮，显示出5050.

然后再点击一下until按钮，显示的也是5050.

用两个do结构写的程序可以完成一样的效果，一个是while条件，一个是until条件，这两个条件刚好是反过来的，当符合while条件时，循环继续，当不符合until条件时，程序也是继续。