递归算法1加到100_五种循环方法计算1加到100
上文講過1加到100,詳細解釋了計算的過程，如果理解了以前的文章，就容易理解今天的內容了。
1加到100使用VBA我能使用十來種方法，以下也是一種方法。
While ……wend循環 ?
Private Sub CommandButton1_Click()
??? s?= 0
??? i?= 1
??? While?i <= 100
??????? s?= s + i
??????? i?= i + 1
??? Wend
?? MsgBox?"結果為:" & s
End Sub
這種方法使用較少，原因未知，這里就不詳細介紹。
今天用四種方法做循環，實現1加到100。
對比他們之間的不同。
Do While? 當型循環
Private Sub CommandButton1_Click()
??? s?= 0
??? i?= 1
??? Do?While i <= 100
??????? s?= s + i
??????? i?= i + 1
??? Loop
??????? MsgBox "結果為:" & s
End Sub
當型循環的特點是先判斷是否滿足條件，滿足則執行以下操作，否則退出。
Do While? 直到型循環
Private Sub CommandButton2_Click()
??? s?= 0
??? i?= 1
??? Do
??????? s?= s + i
??????? i?= i + 1
??? Loop?While i <=100
End Sub
直到型循環是先做一次，然后再看是否滿足條件，滿足再執行操作，不滿足退出。
打個比方，你去飯店吃飯，先看有沒有帶錢包再吃飯，還是先吃一口，再檢查是否帶錢包。
以上兩段代碼，初始值為1時沒有區別，將初始值i改為101就有明顯區別。?
再介紹另外兩種循環，都差不多。
Private Sub CommandButton3_Click()??????
??? s?= 0??????
??? i?= 1??????
??? Do?Until i > 100??????
?????? s?= s + i??????
?????? i?= i + 1??????
??? Loop??????
? MsgBox?"結果為:" & s??????
End Sub??????
以下也可以實現。
Private Sub CommandButton4_Click()
??? s?= 0
??? i?= 1
??? Do
????? s?= s + i
????? i?= i + 1
??? Loop?Until i > 100
???? MsgBox?"結果為:" & s
End Sub
建議分別繪制四個按鈕，使用以上代碼實現1加到100求和。
還可以使用數組進行1加到100,初學者數組會有點難，后面安排。
子曰：用之則行，不用則藏。
意思是說，如果你用我的這些建議，就馬上行動，知行合一，如果你不用，就趕緊收藏，以絕后患。
總結
以上是生活随笔為你收集整理的递归算法1加到100_五种循环方法计算1加到100的全部內容，希望文章能夠幫你解決所遇到的問題。
- 上一篇： c语言include math.h,在C
- 下一篇： 数码管显示实验一 编写程序让8只数码管