excel图表循环设置?下面继续介绍在满足指定的条件时才执行相应代码块的循环结构,接着来看看Do Until循环。
Do Until循环与Do While循环的结构相似,最本质的区别在于循环条件的判断。顾名思义,在Do While循环中,当条件为真(True)时,就执行循环;而在Do Until循环中,执行循环直到条件为真(True)时,退出循环。
Do Until循环的基本语法结构如下:
Do [Until 条件语句]
[语句块]
[Exit Do]
[语句块]
Loop
或者:
Do
[语句块]
[Exit Do]
[语句块]
Loop [Until 条件语句]
说明:
按照惯例,方括号中的内容表示可选项。
条件语句可以放在循环的开始处或者结尾处。如果放在开始处,那么先评估条件,若不满足条件要求,就执行循环里面的语句;这种情况下,当始终满足条件时,就有可能一次也不会执行循环里面的语句。如果放在结尾处,则至少会执行一次循环里面的语句。
Exit Do语句表示提前退出循环。
用框图分别表示Do Until循环的两种语法形式如下:
与上一篇文章介绍的Do While循环相比较,结构一样,只是执行循环的条件相反。
接下来,为方便对两种循环结构的理解,我们改写上一篇文章中的部分示例。
示例1:如果想要在工作表单元格区域A1:A10中依次填写数字1至10,也可以使用下面的包含Do Until循环的代码:
Sub DoUntil1()
Dim i As Integer ‘声明变量
i = 1 ‘给变量赋初始值
‘循环
Do Until i > 10
Cells(i, 1).Value = i
i = i + 1
Loop
End Sub
注意,与For-Next循环不同的是,在进入循环之前,需要先给变量i赋初始值。在循环中,还需要能够增加变量的值。
示例2:下面的代码使用Do Until循环求1至100的和,并显示结果。
Sub DoUntil2()
‘声明变量
Dim i As Integer
Dim sum As Integer
‘给变量赋初值
i = 1
sum = 0
‘循环并显示结果
Do Until i > 100
sum = sum + i
i = i + 1
Loop
MsgBox “1至100的和为:”& sum
End Sub
示例3:下面的代码使用Do Until循环求1至100之间的偶数和并显示结果。
Sub DoUntil3()
‘声明变量
Dim i As Integer
Dim sum As Integer
‘给变量赋初值
i = 1
sum = 0
‘循环并显示结果
Do Until i > 100
If (i Mod 2 = 0) Then
sum = sum + i
End If
i = i + 1
Loop
MsgBox “1至100的和为:”& sum
End Sub
图片声明:本站部分配图来自人工智能系统AI生成,觅知网授权图片,PxHere摄影无版权图库。本站只作为美观性配图使用,无任何非法侵犯第三方意图,一切解释权归图片著作权方,本站不承担任何责任。如有恶意碰瓷者,必当奉陪到底严惩不贷!
内容声明:本文中引用的各种信息及资料(包括但不限于文字、数据、图表及超链接等)均来源于该信息及资料的相关主体(包括但不限于公司、媒体、协会等机构)的官方网站或公开发表的信息。部分内容参考包括:(百度百科,百度知道,头条百科,中国民法典,刑法,牛津词典,新华词典,汉语词典,国家院校,科普平台)等数据,内容仅供参考使用,不准确地方联系删除处理!本站为非盈利性质站点,发布内容不收取任何费用也不接任何广告!
免责声明:我们致力于保护作者版权,注重分享,被刊用文章因无法核实真实出处,未能及时与作者取得联系,或有版权异议的,请联系管理员,我们会立即处理,本文部分文字与图片资源来自于网络,部分文章是来自自研大数据AI进行生成,内容摘自(百度百科,百度知道,头条百科,中国民法典,刑法,牛津词典,新华词典,汉语词典,国家院校,科普平台)等数据,内容仅供学习参考,不准确地方联系删除处理!的,若有来源标注错误或侵犯了您的合法权益,请立即通知我们,情况属实,我们会第一时间予以删除,并同时向您表示歉意,谢谢!