For Next迴圈語句
進行迴圈處理的時候使用For Next語句。
For 迴圈變數 = 初始值 To 最大值處理Next
來看下面的例子。
首先,往迴圈變數v中代入初始值1,然後判斷v的值有沒有超過最大值10,沒有超過最大值的話將v的值代入表格中;再把v的值遞增1,再一次判斷v的值有沒有超過10。依次迴圈,直至v的值超過10的時候停止for語句的執行。
Sub main()For v = 1 To 10Worksheets("Sheet1").Cells(v, 1).value = vNextEnd Sub
在For Next語句中,預設情況下迴圈變數每次遞增1。其實可以用Step來指定每次遞增的數值。
For 迴圈變數 = 初始值 To 最大值 Step 遞增值處理Next
首先,往迴圈變數v中代入初始值1,然後判斷v的值有沒有超過最大值10,沒有超過最大值的話將v的值代入表格中;再把v的值遞增2,再一次判斷v的值有沒有超過10。依次迴圈,直至v的值超過10的時候停止for語句的執行。
Sub main()For v = 1 To 10 Step 2Worksheets("Sheet1").Cells(v, 1).value = vNextEnd Sub
For Next迴圈語句
進行迴圈處理的時候使用For Next語句。
For 迴圈變數 = 初始值 To 最大值處理Next
來看下面的例子。
首先,往迴圈變數v中代入初始值1,然後判斷v的值有沒有超過最大值10,沒有超過最大值的話將v的值代入表格中;再把v的值遞增1,再一次判斷v的值有沒有超過10。依次迴圈,直至v的值超過10的時候停止for語句的執行。
Sub main()For v = 1 To 10Worksheets("Sheet1").Cells(v, 1).value = vNextEnd Sub
在For Next語句中,預設情況下迴圈變數每次遞增1。其實可以用Step來指定每次遞增的數值。
For 迴圈變數 = 初始值 To 最大值 Step 遞增值處理Next
來看下面的例子。
首先,往迴圈變數v中代入初始值1,然後判斷v的值有沒有超過最大值10,沒有超過最大值的話將v的值代入表格中;再把v的值遞增2,再一次判斷v的值有沒有超過10。依次迴圈,直至v的值超過10的時候停止for語句的執行。
Sub main()For v = 1 To 10 Step 2Worksheets("Sheet1").Cells(v, 1).value = vNextEnd Sub