循环结构--1~100的累加

本文详细解析了五种常见的循环结构:dowhile...loop、dountil...loop、do...loop、do...loopWhile/Until及for...next。通过实例“1+2+3+...100”的累加,展示了不同循环语句的应用场景和区别,帮助读者理解何时选择何种循环。

摘要生成于 C知道 ,由 DeepSeek-R1 满血版支持, 前往体验 >

不管是在我们学习的哪一门语言中,都少不了控制结构的身影,计算机程序执行的流程也由他们三大结构组成。循环计算是项目中必不可少的业务,今天我借助“1+2+3+...100”的累加来说说如何使用不同的循环结构如何用不同的循环语句来表示!

目录

方式一、do while ...loop(先判断条件形式)

方式二、do until...loop

方式三、do...loop

方式四、do ... loop While/Until(后判断条件形式)

方式五、for...next

循环语句中包含这么多语句,那我们使用时如何选择呢?

for...next语句

do..loop语句


方式一、do while ...loop(先判断条件形式)

语句格式:

Do  While <条件>

    [循环体]

Loop

 说明:Do  While ... Loop是“当型循环”形式,即<条件>为真(True)时执行循环体,条件为假(False)时,终止循环

如果条件为假,不满足时,可能一次都不执行,直接退出循环(这也是与后判断条件形式的区别)

Private Sub Form_Click()
    Dim s As Integer
    Dim n As Integer
    s = 0: n = 1
    FontSize = 18

    Do While n <= 100
        s = s + n
        n = n + 1
    Loop
    Print "1+2+3+...+100="; s
End Sub

方式二、do until...loop

语句格式:

Do  Until <条件>

    [循环体]

Loop

 说明:Do  Until ... Loop是“直到型循环”形式,即<条件>为假(False)时执行循环体,条件为真(True)时,终止循环

Private Sub Form_Click()
    Dim s As Integer
    Dim n As Integer
    FontSize = 18
    s = 0: n = 1
    
    Do Until n > 100
        s = s + n
        n = n + 1
    Loop
    Print "1+2+3+...+100="; s
End Sub

方式三、do...loop

语句格式:

Do  

    [循环体]

   If  <条件> Then Exit Do

Loop 

 说明:Do ... Loop循环语句可以省略While/Until,将循环结束条件写在循环体内,用Exit Do语句退出循环。

Private Sub Form_Click()
    Dim s As Integer
    Dim n As Integer
    FontSize = 18
    s = 0: n = 1
    
    Do
        s = s + n
        n = n + 1
        If n > 100 Then Exit Do
    Loop
    Print "1+2+3+...+100="; s
End Sub

方式四、do ... loop While/Until(后判断条件形式)

语句格式:

Do  

    [循环体]

  Loop  [While|Until] <条件>]

 说明:Do ... Loop循环语句首先执行循环体,然后判断条件的真假,决定是否继续循环。

语句至少执行一次循环体(这也是与先判断条件形式的区别)

Private Sub Form_Click()
    Dim s As Integer
    Dim n As Integer
    FontSize = 18
    s = 0: n = 1
    
    Do
        s = s + n
        n = n + 1
    Loop While n <= 100
    Print "1+2+3+...+100="; s
End Sub

方式五、for...next

语句格式:

For  <循环变量>=<初值>  To  <终值>  [Step<步长>]

    [<循环体>]

Next  [<循环变量>]

 说明:Do ... Loop循环语句首先执行循环体,然后判断条件的真假,决定是否继续循环。

Private Sub Form_Click()
    Dim s As Integer
    Dim n As Integer
    FontSize = 18
    n = n + 1
    
    For n = 1 To 100 Step 1
        s = s + n
    Next n
    Print "1+2+3+...+100="; s
End Sub

在循环体内部,可以执行任意的代码块,例如对变量进行操作、调用方法等。循环变量的递增或递减步长可以根据需要进行调整,以满足具体的循环需求。

需要注意的是,在使用For...Next循环时,要确保循环变量的初始值、终止值和步长设置正确,以避免无限循环或者不满足循环条件的情况。同时,也可以使用控制语句如Exit For来提前退出循环。

循环语句中包含这么多语句,那我们使用时如何选择呢?

for...next语句

1.你要执行循环的次数是已知的。如何计算循环次数=Int((终值-初值)/步长+1

2.明确初值、终值、步长,适合用于已知循环次数的情况

do..loop语句

1.循环的次数未知,选择使用

2.条件为“当。。。时”

如果大家还有不同的方法,欢迎补充!

评论 7
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

小乔努力变强

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付:¥1
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值