VBS语言程序控制语句——for

VBScript基础知识

内容：For...Next、For Each...Next语句

申明：该系列文档仅供个人学习使用，转载请注明出处©

For...Next语句

For...Next用于运行一段语句指定的次数

For counter = start To end [Step step]   

语句

[Exit For]

语句

Next

说明：

counter

用作循环计数器的数值变量。该变量不能是数组元素或用户定义类型的元素。

start

计数器的初始值。

end

计数器的结束值。

step

计数器变量值在每次循环改变。如果未指定step，则默认以1 作为步进值来递增。

执行过程：

①先给循环计数器赋初值

②比较计数器变量值与结束值，如果值为真true，则执行for中的语句。如果为假false，则转到下面第5步结束循环

③根据step设置的步数值，计算计数器的值。如果未设置step，默认计数器加1

④转到上面第2步继续执行

⑤循环结束

示例程序：

Dim  indexA,  indexB,  highBhighB  =  5For indexA = 1 to 3    For indexB = highB to 1 Step -1        document.write (indexB & " ")    NextNext

step参数：

step设置的步数可以是正数或负数

当为正数时，计数器变量值大于结束值时结束循环

当为负数时，计数器变量值小于结束值时结束循环

Exit For：

Exit For语句可以用来从for循环体内跳出循环体，即提前结束循环，接着执行循环语句下面的程序。

For Each...Next语句

For Each...Next 针对集合中的每个项目或者数组中的每个元素来重复运行某段代码。

For Each element In group    

语句

[Exit For]   

语句

Next

说明：

element

用于遍历集合或数组的元素的变量。对于集合，element只能是Variant变量，通用Object变量或任何特定的Automation对象变量。对于数组，element只能是Variant变量。

group

对象集合或数组的名称。

示例程序：

Function ShowFolderList(folderspec)   Dim fso, f, f1, fc, s   Set fso = CreateObject("Scripting.FileSystemObject")   Set f = fso.GetFolder(folderspec)   Set fc = f.Files   For Each f1 in fc      s = s & f1.name       s = s & "<br>"   Next   ShowFolderList = sEnd Function

免责声明：如果侵犯了您的权益，请联系站长，我们会及时删除侵权内容，谢谢合作！