網頁

2013年3月11日 星期一

用 MsgBox 練習迴圈

假設想寫個程式,用 MsgBox 印出從 1~9。依照目前學到的指令,是這樣寫:

Sub msgbox_1_9()
    MsgBox 1
    MsgBox 2
    MsgBox 3
    MsgBox 4
    MsgBox 5
    MsgBox 6
    MsgBox 7
    MsgBox 8
    MsgBox 9
End Sub

那改一下,從 1 印到 99...。要寫 99 行哩,很沒效率吧! 投入的工,比獲得的結果還少;投入的工如此辛苦(雖然可以用複製貼上),得到的結果如此微不足道。還不如不寫。

手動複製,不如自動複製,如果能讓小叮噹(哆啦A夢)拿出一種 "程式重複器",可以重複上述看起來就很重複的行為,不就可以節省力氣嗎? 有的,這個重複器,就是迴圈(loop):

Sub msgbox_1_9_using_loop()
    For i = 1 To 9
<這裡按下 2 次 Tab>MsgBox i
    Next
End Sub

For 是規定寫法,i 就是你想重複的次數,Next 也是規定寫法,代表下一個 i,對於 1 來說,下一個 i 就是 2,以此類推。

這個 i,就是變數之後馬上會提到