VB里 for next 这个怎么用

在一些编程语言中循环结构是三种基本结构之一，而循环结构肯定要用到循环语句，for-next语句就是最常使用的语句之一，也是最典型的语句。

1、首先要了解for-next语句的基本语法结构，其语句的基本结构是for 变量=初值 to终值 step 步长值，其中像for 、next、step是vb中保留字，变量应该符合vb中命名规范，步长值根据自己的需要进行设置。

2、for后面的变量应该满足vb中命名原则，变量的开头必须是汉字或者是字母开头，不能是数字开头并且在变量的组成中不能含有其他字符。但是可以使用下划线。

3、接下来就以具体的事例说明for-next语句的使用方法，启动vb6，执行文件-新建工程命令，在新建工程对话框中选择标准exe文件，然后点击确定按钮，进入主界面。

4、选择form后拖拽周围的小正方形调节窗体的大小和位置，在工具箱里双击标签工具，在窗体上出现标签控件

5、选择窗体上标签控件，修改其caption属性值为九九乘法表，接着修改font属性，设置字体为王羲之书法字体，常规，字号为二号。

6、在工具箱里双击picturebox控件，在窗体上呈现一个picturebox控件，拖拽其周围的小正方形调节其大小和位置，使其适应窗体的大小和位置。

7、双击picturebox控件进入代码编辑区域，在对象中选择picturebox，在过程中选择点击事件即（click）。接下来就可以书写代码了。

8、首先要定义用于for语句的循环变量，使用dim进行定义其数据类型，循环变量通常情况下定义成整数型，具体情况可以根据自己的需要进行定义。

9、根据事先分析九九乘法表需要九行，每行输出的乘法数目和行数一致，所以我们使用双重循环，外循环控制行数，即1-9行。循环变量用i表示，初值为1，终值为9，步长值设置为1，当然也可以省略不写。

10、接着书写内循环内容即内循环输出对应的乘法表，同时要求输出几乘几得几的形式，内循环循环变量用j表示，初值也为1，终值为i，这样每行输出就会和行数一致，使用M = I * J  Print J & "*" & I & "=" & M & "  "两行语句即可以输出“几乘几得几”的形式。

11、点击工具栏上的运行按钮进行调试运行，点击fram后发现结果出现在窗体form1上，这说明输出的位置不对，要进行修改，应该在fram1上输出，所以修改为picture1.Print J & "*" & I & "=" & M & "  "即可。

12、修改之后再次调试运行发现结果在picture1上出现。执行文件-保存命令，选择一个合适的位置，输入“for语句应用”点击确定进行保存即可。

For...Next 语句

以指定次数来重复执行一组语句。

语法

For counter = start To end [Step step]
[statements]
[Exit For]
[statements]

Next [counter]

For…Next 语句的语法具有以下几个部分：

部分 描述
counter 必要参数。用做循环计数器的数值变量。这个变量不能是布尔或数组元素。
start 必要参数。counter 的初值。
End 必要参数，counter 的终值。
Step 可选参数。counter 的步长。如果没有指定，则 step 的缺省值为 1。
Statements 可选参数。放在 For 和 Next 之间的一条或多条语句，它们将被执行指定的次数。

说明

step 参数可以是正数或负数。step 参数值决定循环的执行情况，如下所示：

值 循环执行，如果
正数或 0 counter <= end
负数 counter >= end

当所有循环中的语句都执行后，step 的值会加到 counter 中。此时，循环中的语句可能会再次执行（基于循环开始执行时同样的测试），也可能是退出循环并从 Next 语句之后的语句继续执行。

提示 在循环中改变 counter 的值，将会使程序代码的阅读和调试变得更加困难。

循环中可以在任何位置放置任意个 Exit For 语句，随时退出循环。 Exit For经常在条件判断之后使用，例如 If...Then，并将控制权转移到紧接在 Next 之后的语句。

可以将一个 For...Next 循环放置在另一个 For...Next 循环中，组成嵌套循环。不过在每个循环中的 counter 要使用不同的变量名。下面的体系结构是正确的：

For I = 1 To 10
For J = 1 To 10
For K = 1 To 10
...
Next K
Next J
Next I

注意 如果省略 Next 语句中的 counter，就像 counter 存在时一样执行。但如果 Next 语句在它相对应的 For 语句之前出现，则会产生错误。

这是MSDN的解释

举个示例吧
Private Sub Form_Click()
Dim i As Integer, s As Integer
For i = 1 To 100
s = s + i
Next i
MsgBox s
End Sub
这是一个从1加到100的小程序 变量i在刚进入for循环时值为1当遇到next i时i会自动加1此时i值为2当i遇到next i累加到101时由于大于了for中不定义的100范围就会自动离开for循环体去执行下面的语句

for 用作循环的变量=初值 to 终值 step 步长
...
next 用作循环的变量
步长默认为1，每次执行到next语句，用作循环的变量的值自动加上步长的值
注：用作循环的变量必须为数值型或变体型

sub for_next()
dim i as long
for i=0 to 100
debug.print i
next
end sub
调用时 call for_next