For 迴圈語句 a印出1~3,遞增1。 Sub test() For a = 1 To 3 Step 1 MsgBox a Next a End Sub 指定遞增值 a印出1、3、5、7、9,遞增2...