在.vbs文件中，先分组查询，循环取得结果，在循环中，再进行检索，取

发布网友发布时间：2022-04-24 09:55

共1个回答

热心网友时间：2023-10-09 13:32

doloop或fornext等，以下是doloop语句标准介绍，你应该是初学吧，不知你看的明白没，不明白的话可以到我空间去看看例子，有问题可以随时给我留言。DoLoop语句当条件为True时或条件变为True之前重复执行某语句块。Do[{While|Until}condition][statements][ExitDo][statements]Loop也可以使用下面的语法：Do[statements][ExitDo][statements]Loop[{While|Until}condition]参数condition数值或字符串表达式，其值为True或False。如果condition为Null，则condition被当作False。statements当condition为True时被重复执行的一条或多条命令。说明ExitDo仅可以用在DoLoop控制语句中，提供另一种退出DoLoop的方法。可以在DoLoop语句中的任何位置放置任意个ExitDo。ExitDo通常与条件判断语句（如IfThen）一起使用，将控制传递给紧随在Loop语句后面的语句。当用于嵌套DoLoop中的时候，ExitDo将控制传递给其所在循环的上一层嵌套循环。下面例子举例说明如何使用DoLoop语句:DoUntilDefResp=vbNoMyNum=Int(6*Rnd+1)'产生1到6之间的随机数。DefResp=MsgBox(MyNum&"想要另一个数吗？",vbYesNo)LoopDimCheck,CounterCheck=True:Counter=0'初始化变量。Do'外层循环。DoWhileCounter<20'内层循环。Counter=Counter+1'增加计数器。IfCounter=10Then'如果条件为TrueCheck=False'将标志值设置为False。ExitDo'终止内层循环。EndIfLoopLoopUntilCheck=False'立即终止外层循环。