vb如何用代码解除do until loop这个无限循环代码

Question

vb如何用代码解除do until loop这个无限循环代码

Answer 1

关键字While是指当条件为True时执行循环,而Until则是在条件变为True之前重复,就你的例子来说,用关键字Until给出了X=-1这个条件,意思就是在X=-1这个条件不成立的时候循环一直重复执行,直到X=-1这个条件成立了,则结束循环.
下面是详细的例句解析:
Do循环在使用关键字While或Until的时候有两种写法,一种是放在开头,一种是放在结尾,而Eixt Do则是插在循环体内语句块的任何地方,,用来在需要的时候退出循环.
关键字While或Until的两种写法见如下格式:
[第一种]
Do While(或Until) 条件 '关键字和条件放在开头
语句块
Loop
这种格式是用关键字While指定的条件为True时执行循环,或用Until在指定的条件变为True之前重复执行循环.
[第二种]
Do
语句块
Loop While(或Until) 条件 '关键字和条件放在结尾
这种格式是不管条件是否成立,都先执行一次循环,然后再判断条件来决定是否继续循环.
Do
If (a * i ^ 2 + b * i + c) * (a * m ^ 2 + b * m + c) > 0 Then
i = m
End If
Loop Until Abs(i - s) <= d

Answer 2

这里举个简单的例子
Sub aa()
Do
x = x + 1
Loop Until x <> 1
MsgBox x
End Sub

意思是每一次循环x的值+1，当x<>1的时候退出循环
实际上就只有一个1，所以循环一次就退出了
你根据你的实际情况修改即可。
Sub aa()
Do
x = x + 1
Loop Until x > 10
MsgBox x
End Sub
同理，这是当x>10的时候退出循环本回答被网友采纳