VBS教程:VBscript语句-Execute 语句_vbs

Execute 语句

执行一个或多个指定的语句。

Execute statements

所需要的 statements 参数是一个字符串表达式,其中包含一个或多个要执行的语句。  如果要在 statements 参数中包含多条语句,应使用分号或嵌入的分行将其分隔开。

说明

在 VBScript 中,x = y 可以有两种解释。首先是作为赋值语句,将 y 的值赋予 x。其次是作为表达式,测试xy 的值是否相等。如果相等,结果True;否则,结果FalseExecute 语句总是使用第一种解释,而 Eval 方法总是使用第二种。

注意  在 Microsoft(R) Visual Basic Scripting Edition 中并不存在赋值与比较之间的混淆,因为赋值运算符(=)与比较运算符(==)是不同的。

调用 Execute 语句的上下文确定了要运行的代码可以使用的对象和变量。作用域内的对象和变量是 Execute 语句中运行的代码可以使用的。不过,必须明白的一点是,如果被执行的代码创建了过程,那么该过程将不会继承它所在的过程的作用域。

与其他过程类似,新的过程的作用域是全局的,它继承了全局作用域的全部东西。与其他过程不同的是,它的上下文不是全局作用域,因此它只能在发生 Execute 语句的过程内的上下文中执行。不过,如果相同的 Execute 语句是在过程之外(例如在全局作用域)的作用域中被调用,那么它将不仅继承全局作用域中的所有东西,而且它还可以在任何地方被调用,因为它的上下文是全局的。下面的例子说明了这种特点:

Dim X            ' 在全局作用域中声明 XX = "Global"         ' 将全局的 X 赋值。Sub Proc1            ' 声明过程。  Dim X            ' 在局部作用域中声明 X  X = "Local"         ' 对局部的 X 赋值。            ' 此处的 Execute 语句建立了一个过程,            ' 在调用该过程时它将打印 X。            ' 它打印的将是全局 X,因为 Proc2            ' 继承了全局作用域中的一切。  Execute "Sub Proc2: Print X: End Sub"  Print Eval("X")      ' 打印本地 X  Proc2            '  Proc1 的作用域中调用 Proc2End SubProc2            ' 本行将导致一个错误,因为            ' Proc2  Proc1 之外是不可使用的。Proc1            ' 调用 Proc1  Execute "Sub Proc2: Print X: End Sub"Proc2            ' 这句话可以成功,因为 Proc2            ' 现在是全局可用的。

下面的例子显示了如何将 Execute 语句改写,免于将整个过程包含在引号内:

S = "Sub Proc2" & vbCrLfS = S & "  Print X" & vbCrLf S = S & "End Sub"Execute S

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

时间: 2025-01-24 16:14:27

VBS教程:VBscript语句-Execute 语句_vbs的相关文章

VBS教程:方法-Execute 方法_vbs

Execute 方法 对指定的字符串执行正则表达式搜索. object.Execute(string) 参数 object 必选项.总是一个 RegExp 对象的名称. string 必选项.要在其上执行正则表达式的文本字符串. 说明 正则表达式搜索的设计模式是通过 RegExp 对象的 Pattern 来设置的. Execute 方法返回一个 Matches 集合,其中包含了在 string 中找到的每一个匹配的 Match 对象.如果未找到匹配,Execute 将返回空的 Matches 集

VBS教程:函数-Eval 函数_vbs

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

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教程:方法-WriteLine 方法_vbs

WriteLine 方法 向 TextStream 文件写入指定字符串和新行字符. object.WriteLine([string]) 参数 object 必选项.应为 TextStream 对象的名称. string 可选项.要写入文件的文本.如果省略,将向文件写入新行字符. 说明 下面例子举例说明如何使用 WriteLine 方法: Function WriteLineToFile Const ForReading = 1, ForWriting = 2 Dim fso, f Set fs

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.对于有这样维数