Question

关于VB中FOR NEXT句型的用法

我是个新手 不知道FOR NEXT 语句的具体用法 劳烦各位老鸟举几个简单的例子

Answer 1

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 语句之前出现，则会产生错误。

Answer 2

Dim i As Integer
For i = 0 To 10
Msgbox i
Next
这样的效果就是弹出11次对话框，内容分别为0,1,2,...,10

Dim i As Integer
For i = 0 To 10 Step 2
Msgbox i
Next
这样的效果就是弹出6次对话框，分别为0,2,4,6,8,10

Dim i As Integer
For i = 10 To 0 Step -1
Msgbox i
Next
这样的效果就是弹出11次对话框，分别为 10,9,8,7,6,...,0

Answer 3

格式
FOR 变量=X TO Y (STEP Z) /*X到Y指期间要执行的次数,Z指执行一次在X到Y之间要跨过的范围*/
语句
NEXT 变量

Answer 4

dim i,j as integer
for i=1 to 10
for j=1 to 10
print i*j
next j
next i

Answer 5

For语句是用于确定循环次数的循环语句。例如：
For a = b To c (Step d)
...
Next (a)
其中，a是变量，b是初值，c是终值，d是步长。
第一次循环时，将初值b赋给a，执行完所有语句，返回执行第二次循环，将原来a的值加上步长，并判断a是否超出终值，超出则终止循环，以此类推。
d默认为1，即不写步长时，步长为1。b、c可以是常量，也可以是变量或者表达式，但是，当步长为正值时，b<c，步长为负值时，b>c，否则会出现错误。可以在此循环语句内用Exit For来强行终止循环，控制循环。可以使用循环嵌套，例如：
For a = 1 To 3
...
For b = 1 To 2
...
Next b
...
Next a
第二个...将被执行6次。
但是，严禁出现以下情况，将语句交叉使用：
For a = 1 To 3
...
For b = 1 To 2
...
Next a
...
Next b
我自己做过一个用于计算24点的程序，其中用到了许多For语句和If语句，如果你需要的话，可以给你参考：
For i = 0 To 3
For j = 0 To 3
For k = 0 To 3
For l = 0 To 3
b(0) = a(i) : b(1) = a(j) : b(2) = a(k) : b(3) = a(l)
If i <> j And i <> k And i <> l And j <> k And j <> l And k <> l Then JiSuan '调用JiSuan过程
Next l
Next k
Next j
Next i
===================================
这是其中对四张牌按每一种排列的方式进行运算的部分，希望对你有用。