VBS教程:语句-While...Wend 语句_vbs

While...Wend 语句

当指定的条件为 True 时,执行一系列的语句。

While condition
 
;  Version [statements]
Wend

参数

condition

数值或字符串表达式,其计算结果为 TrueFalse。如果 condition 为 Null,则 condition 被当作 False

statements

在条件为 True 时执行的一条或多条语句。

说明

如果 conditionTrue,则 statements 中所有 Wend 语句之前的语句都将被执行,然后控制权将返回到 While 语句,并且重新检查 condition。如果 condition 仍为 True,则重复执行上面的过程。如果不为 True,则从 Wend 语句之后的语句继续执行程序。

While...Wend 循环可以是多层嵌套结构。每个 Wend 与最近的 While 语句对应。

注意 Do...Loop 语句提供一种结构化与适应性更强的方法以执行循环。

下面例子举例说明如何使用 While...Wend 语句:

Dim CounterCounter = 0                '初始化变量。While Counter < 20         ' 测试计数器的值。   Counter = Counter + 1   ' 增加计数器。   Alert CounterWend                       ' 计数器大于 19 时终止循环。

要求

版本 1

以上是小编为您精心准备的的内容,在的博客、问答、公众号、人物、课程等栏目也有的相关内容,欢迎继续使用右上角搜索按钮进行搜索vbs循环语句、vbs for循环语句、vbs if语句、vbs语句未结束、vbs goto语句,以便于您获取更多的相关知识。

时间: 2024-12-09 23:31:56

VBS教程:语句-While...Wend 语句_vbs的相关文章

VBS教程:方法-Clear 方法_vbs

Clear 方法 清除 Err 对象的所有属性设置. object.Clear object 应为 Err 对象的名称. 说明 在错误处理后,使用 Clear 显式地清除 Err 对象.此操作是必须的,例如使用 On Error Resume Next 延迟错误处理时.在任何时候执行下列语句,VBScript 自动调用 Clear 方法: On Error Resume Next Exit Sub Exit Function 下面例子举例说明如何使用 Clear 方法. '发生错误继续下一步Er

VBS教程:函数-GetObject 函数_vbs

GetObject 函数 返回对文件中 Automation 对象的引用. GetObject([pathname] [, class]) 参数 Pathname 可选项.字符串,包含待检索对象的文件的完整路径和名称.如果省略 pathname 则必须有 class. Class 可选项.字符串,对象的类. class 参数的语法格式为 appname.objectype,其中包括以下部分: 参数 appname 必选项.字符串,提供对象的应用程序名称. objectype 必选项.字符串,要创

VBS教程:对象-Drives 集合_vbs

Drives 集合 只读所有可用驱动器的集合. 说明 无论是否插入媒体,可移动媒体驱动器都显示在 Drives 集合中. 以下代码举例说明如何获得 Drives 集合并使用 For Each...Next 语句枚举集合成员: ShowDriveList 函数 Dim fso, d, dc, s, n Set fso = CreateObject("Scripting.FileSystemObject") Set dc = fso.Drives For Each d in dc n =

VBS教程:函数-Eval 函数_vbs

Eval 函数 计算一个表达式的值并返回结果.  [result = ]Eval(expression) 参数 result 可选项. 是一个变量,用于接受返回的结果.如果未指定结果,应考虑使用 Execute 语句代替. expression 必选项.可以是包含任何有效 VBScript 表达式的字符串. 说明 在 VBScript 中,x = y 可以有两种解释.第一种方式是赋值语句,将 y 的值赋予 x.第二种解释是测试 x 和 y 是否相等.如果相等,result 为 True:否则 r

VBS教程:函数-Array 函数_vbs

Array 函数 返回包含数组的 Variant. Array(arglist) arglist 参数是赋给包含在 Variant 中的数组元素的值的列表(用逗号分隔).如果没有指定此参数,则将会创建零长度的数组. 说明 用于引用数组元素的表示符,由跟随有括号的变量名组成,括号中包含指示所需元素的索引号.在下面的示例中,第一条语句创建名为 A 的变量.第二条语句将一个数组赋值给变量 A.最后一条语句将包含在第二个数组元素中的值赋值给另一个变量. Dim AA = Array(10,20,30)B

VBS教程:对象-Folders 集合_vbs

Folders 集合 包含在一个 Folder 对象中的所有 Folder 对象的集合. 说明 以下代码举例说明如何获得 Folders 集合并使用 For Each...Next 语句枚举集合成员: Function ShowFolderList(folderspec) Dim fso, f, f1, fc, s Set fso = CreateObject("Scripting.FileSystemObject") Set f = fso.GetFolder(folderspec)

VBS教程:函数-UBound 函数_vbs

UBound 函数 返回指定数组维数的最大可用下标. UBound(arrayname[, dimension]) 参数 arrayname 必选项.数组变量名,遵循标准变量命名约定. Dimension 可选项.指定返回哪一维上界的整数.1 表示第一维,2 表示第二维,以此类推.如果省略 dimension 参数,则默认值为 1. 说明 UBound 函数与 LBound 函数一起使用,用于确定数组的大小.使用 LBound 函数可以确定数组某一维的下界. 所有维的下界均为 0.对于有这样维数

VBS教程:VBScript 与窗体_vbs

VBScript 与窗体 简单验证 使用 Visual Basic Scripting Edition,您可以完成通常要在服务器上进行的大量窗体处理工作,也可以完成不能在服务器上进行的工作. 这是一个简单的客户端验证的样例.HTML 代码的结果是一个文本框和一个按钮.如果使用 Microsoft(R) Internet Explorer 查看用以下代码制作的页面,您会看到一个旁边带有按钮的小文本框. <HTML><HEAD><TITLE>简单验证</TITLE&g

VBS教程:对象-Files 集合_vbs

Files 集合 文件夹中所有 File 对象的集合. 说明 以下代码举例说明如何获得 Folders 集合并使用 For Each...Next 语句枚举集合成员:  Function ShowFolderList(folderspec) Dim fso, f, f1, fc, s Set fso = CreateObject("Scripting.FileSystemObject") Set f = fso.GetFolder(folderspec) Set fc = f.File