计算机VB中的一个DO循环问题？

do
a=a+1
loop until a<6

死循环了啊 loop until a<6的意思是一直循环，直到a<6为止
先执行a=a+1,这时候a=6，判断a是否<6，否，则继续循环a=a+1，…… 除非溢出，否则a是不会<6的，循环不会终止

试试下面的语句。a值将是101,明白原因了吧，因为a>100了，循环终止
Private Sub Form_Click()
a = 5
Do
a = a + 1
Loop Until a < 6 Or a > 100
Print a
End Sub

我自己也不确定

不过你没定义A的类型，这个编译能过么

如果过了，究竟是输出5 还是 死函数呢。

5

答案是6
首先执行do a=a+1
然后再去判断循环条件
这时候a=6已经不满足了
直接结束循环

do ... loop 第一步无条件执行do,然后判断循环条件
while ... do 先判断循环条件，再执行do

死循环

a初始值是5

a=a+1后a=6

loop until a<6，循环结束条件是a<6

但是a永远都不会小于6，所以会一直循环下去

do...loop循环结束条件有2种，一种是until，指满足后面条件结束循环

一种是while，指不满足后面条件后结束循环

相当于
do
a+=1
while a>=6
a永远满足这个条件