<< 向前        下一页 >>

ID : 129

For...Next

功能

仅按指定次数重复一系列语句。

格式

For 计数器 = 初始值 To 最终值[ Step 增量]
	'Statements
Next[计数器]

指定项目

计数器
指定用作计数器的变量。指定数值型变量。
初始值
指定作为计数器指定变量的初始值代入的值。
最终值
指定计数器的最终值。
增量
指定每运行一次一系列语句需添加至计数器的值。可省略。省略时为“1”。

解说

仅按指定次数重复一系列语句。

计数器指定的变量中代入初始值,并判断执行条件。如果执行条件为真(True),则执行指定的一系列语句。每执行一次一系列语句,就将增量中指定的值添加至计数器的变量。

语句的执行条件

在执行指定语句前,判断指定语句的执行条件。结束条件因增量值而异。

增量 执行条件
正数或0 计数器 <= 最终值
负数 计数器 >= 最终值

需强制从该循环中退出时,执行Exit语句的“Exit For”,即移至Next的下一行。

相关项目

Do...LoopExit

注意事项

如果将增量指定为“0”,则将进行无限循环。

对For数据块进行嵌套(嵌套结构)时,请勿与计数器指定的变量相同。否则,可能使动作变得复杂,导致不可预测的无限循环。

在执行完For语句时,代入并确定最终值和增量。执行一系列语句期间,即使最终值指定的变量更改,也不会反映至最终值

应用示例

'!TITLE "重复执行For~Next区间的命令”
' 1至10的求和
Sub Sample_ForNext

  Dim aaa As Integer
  Dim bbb As Integer

  bbb = 0

  ' 执行求和处理,直至aaa大于10
  For aaa = 0 To 10 Step 1

    bbb = bbb + aaa

  Next

  ' 在讯息输出视窗中显示"55"
  PrintDbg bbb

End Sub

ID : 129

<< 向前        下一页 >>