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