For...Next重复指定次数的一组语句，循环索引计算循环执行时的循环迭代数。
优化或报错有奖这个循环结构的语法是：
For counter [ As datatype ] = start To end [ Step step ] [ statements ] [ Continue For ] [ statements ] [ Exit For ] [ statements ]Next [ counter ]
流程图：
示例：
Module loops Sub Main() Dim a As Byte ' for loop execution For a = 10 To 20 Console.WriteLine("value of a: {0}", a) Next Console.ReadLine() End SubEnd Module
当上述代码被编译和执行时，它产生以下结果：
value of a: 10value of a: 11value of a: 12value of a: 13value of a: 14value of a: 15value of a: 16value of a: 17value of a: 18value of a: 19value of a: 20
例如，如果要使用步长2，则需要仅显示10到20之间的偶数：
Module loops Sub Main() Dim a As Byte ' for loop execution For a = 10 To 20 Step 2 Console.WriteLine("value of a: {0}", a) Next Console.ReadLine() End SubEnd Module
当上述代码被编译和执行时，它产生以下结果：
value of a: 10value of a: 12value of a: 14value of a: 16value of a: 18value of a: 20
转载本站内容时，请务必注明来自W3xue，违者必究。
皖公网安备34020702000426号