语句VBScript与JScript实例教程第三章

本文由gaofan16zh贡献doc文档可能在WAP端浏览体验不佳。建议您优先选择TXT或下载源文件到本机查看。

第3章

VBScript语句和过程

前面的章节中已经详细地介绍了有关VBScript语句的数据类型、常量、变量但是 仅仅了解这些知识还是远远不够的也无法完成符合用户需求的页面。所以在这一章节中我们将进一步学习VBScript的知识主要包括VBScript的一些基本语句如选择语句和循环语句等 以及在VBScript中使用过程的具体方法等。学习这些知识也有助于读者加深对不同程序结构的理解。

3.1

VBScript语句中的基本语句

对于一般程序有三类基本的程序结构可以控制程序的流程顺序结构分支结构和循环结构。顺序结构的流程是按照事务完成的先后次序依次执行语句而且总是在完成前一句语句之后再执行后一句语句并且执行过的语句不再执行这就与分支结构和循环结构有所区别。分支结构相当于在实际生活中我们对于判断进行选择一样如果出现某些情况我们将会如何做如果不出现这些情况我们将作如何打算。但是在程序中分支结构并不一定只有“是”或“否”这两种选择也可以存在多种选择的结构。循环结构是对于某一些语句进行反复执行循环语句结束的关键往往是 当符合某些条件或不符合某些条件或在重复执行一定次数之后。一般而言任何程序总是同时包含这三种结构来对程序的流程进行控制。在VBScript语句中顺序结构最简单一般不需要程序进行什么控制分支结构可以使用选择语句来实现循环结构可以使用循环语句来实现。在下文中将具体介绍选择语句和循环语句。 需要指出的是在许多结构化语言中一般来说不提供Go to语句直接在程序中跳转 因为这将会极大地损害程序的可读性另外有一些结构化语言虽然提供了Go to语句但是不建议使用这条语句 而是建议使用Bre ak、 C o nt inu e等跳转语句来代替这些语句和Go to语句不同之处就在于 Go to语句是任意跳转的而Bre a k、 C ont inue语句并不能任意跳转 只是实现了循环的中断退出功能。VBS crip t也不支持Goto语句但在VBS cript中提供了Exit语句和On Error语句来实现程序流程的跳转。

3.1.1

选择语句

在VBScript中有两种条件语句 If…Then…Else语句和Select…Case语句(表

3.1) 这两种条件语句执行的时候先对条件进行判断然后根据条件执行相应的脚本。 If…Then…Else语句只会形成两重分支如果条件满足执行其中的一个分支如果条件不满足则执行其中的另外一个分支。 Select…Case语句会形成多重分支根据条件的结果选择其中相应的分支执行。

第3章

VBScript语句和过程

·41·

表3.1 VBScript语句中的分支语句If……Then……Else语句Select Case语句二值分支语句多值分支语句

3.1.1.1

使用If……Then……Else语句

VBScript中最常用的条件语句就是If…Then…Else语句一般If…Then…Else语句用来检查一个布尔条件然后根据结果为True或者False执行相应的脚本如果为True则执行Then后面的脚本如果为False则执行Else后面的脚本。If…Then…Else语句有两种形式单行形式和多行形式(也称块形式)单行形式中整条语句都需要在一行中完成其中也包括条件和判断后执行的脚本其语法如下所示 If condition Then statements [Else elsestatements]多行形式的语法如下所示 If condition Then statements [Else elsestatements]End If其中 condition是测试条件 state ments是条件为True的情况下所执行的脚本 els estate me nt s是条件为False的情况下所执行的脚本如果条件为Null那么执行的脚本仍然是e ls e stat e me nt s。通常情况下测试条件是使用比较运算符对值或变量进行比较的表达式。在这两种语法中 Else都是可选的如果没有Else则表明如果判断条件为True执行Then后面的脚本如果条件为False则不执行任何脚本。 注意在多行形式中语句结束的最后一行中有一句End If而单行形式则不需要。 对于比较短小而简单的测试 我们可以使用单行形式。 例如 如果学生成绩大于60分 则判定成绩为Pass否则判定其成绩为Fail如以下脚本所示 If Score>=60 Then Status=“Pass”Else Status=“Fail”不过在编写脚本的过程中多行形式比单行形式的结构化更强更加容易阅读、维护和调试。对于上面单行形式的语句我们可以改写为多行形式如下 If S core>=60 Then Status=“Pass”Else Status=“Fail”End If在VBScript中还可以扩展If…Then…Else语句的功能通过添加ElseIf子句我们可以对多个条件进行判断和分支选择其语法如下所示If condition Then statements ElseIf conditin-n Then

·42·

VBScript与JScript实例教程elseifstatements Else elsestatements End If在条件语句中如果条件是True时要执行多个语句条件是False时也需要执行多个语句的时候则就可以使用If……Then……Else语句来定义两个语句块在Then后面的语句块在条件是True时被执行在Else后面的语句块在条件是False时被执行。

Dim nTemp1,nTemp2 Dim nBigValue,nSmallValue nTemp1=CDbl (InputBox(“请输入第一个数值 ”) )nTemp2=CDbl (InputBox(“请输入第二个数值 ”) ) If(nTemp1>nTemp2)Then nBigValue=nTemp1 nSmallValue=nTemp2 ElsenBigValue=nTemp2 nSmallValue=nTemp 1 End If

有时候 单个条件语句并不能满足在多种选择中做決定 所以用户要采用If……Then……Else语句的变形 从多种选择中选取一种选择。 这种变形形式是在原来的条件语句上加上ElseIf子句 以扩充其原有的功能这样能让用户的程序有多种不同的流程方便了对于程序代码行的控制。举例如下

Sub ReportValue(value) If value=0 Then MsgBox value ElseIf value=1 ThenMsgBox value ElseIf value=2 then Msgbox value Else Msgbox"Value out of range!"End If

用户可以根据需要加上多个ElseIf子句以提供其它选项。但是有时ElseIf子句用得太多也常常会变成一种麻烦。经常我们所采用的方法是使用可以进行多种选择的Select Case语句。

3.1.1.2

使用Select Case语句

如果需要实现多重分支选择 一般我们使用SelectCase语句 而不使用If…Then…Else语句尽管后者也完全能够实现这些功能。 Select Case语句的功能就是根据表达式的值执行几组脚本当中的一组。其语法如下所示

第3章

VBScript语句和过程

·43·

Select Case te stexpression Case expressionliststatements…Case Else expressionlist elsestatements End Select其中 testexpression是语句的判断条件 可以是任何数值或者字符串表达式exp ress ionlis t则是可能出现的表达式的值 state me nt s和elsestate me nts是根据表达式结果执行的脚本。 如果testexpress ion的表达式结果和某一个Case子句中列举的值相符合 那么则执行这一个Case子句和下一个Case子句之间的脚本如果和任何列举出的值都不符合则执行Case Else子句和End Select之间的脚本如果再没有Case Else语句那么将会直接执行End Select之后的脚本。如果表达式的结果和多个Case子句中的值相符合则只会执行第一个匹配后的语句。 其实Select Case语句提供了除了If……Then……ElseIf以外的另外一种条件语句的形式 可允许用户从多个语句块中作出一个选择并执行相应的语句。 Select Case语句提供的功能和If……Then……Else语句类似但它可使整个程序代码行执行起来更加的有效率而且也提高了程序的可读性。 Select Case语句在其前端 即Select Case子句后有一个测试运算式这个运算式只会被执行一次。 执行完后的结果将被用来和每一个Case子句的值作比较。 如果有相符的情况时这个Case子句后的语句块就将被执行注意下面这个例子

Select C ase Document.Form1.CardType.Options(SelectedIndex).Text Case

"MasterCard"Disp layMCLo go ValidateMCAc count Case"Vis a"Disp layVisaLogoValidateVis aAccount Case "American Exp res s"Di splayAMEXCOLo go

ValidateAMEXCOAccount Case Else DisplayUnknownImage PromptAgain End S elect

从上面的程序中可以注意到Select Case语句只在前端执行一个运算式。而与此相反的是 If……Then……ElseIf条件语句则可在每一个ElseIf语句后面加上一个不同的比较运算式。 对于这种格式的语句只有在每一个ElseIf语句使用的都是同一个运算式时才能用Select Case语句来取代If……Then……ElseIf语句。 与If语句相同 Select Case语句也可以嵌套只是对于每一层嵌套的Select Case语句中必须有与其相对应的End Select语句。

·44·

VBScript与JScript实例教程

3.1.2

循环语句

使用循环语句可以反复执行某段脚本直到满足循环结束条件后才停止。如表

3.2所示 VBScript中 在提供了四种循环语句 For…Next语句、 Do…Loop语句、While…Wend语句和For Each…Next语句。在这四种循环语句中 ForEac h…Next语句是比较特殊的一种它不是指定循环的次数、也没有指定循环的结束条件而是提供了枚举集合中元素的一种方法。运用循环语句可以极大地方便我们开发脚本的工作。

表3.2 VBScript语句中的循环语句Do……Loop While……Wend For……Next ForEach……Next当条件是True时执行循环也可以是执行到条件为True时停止循环。 当条件是True就执行循环。 使用一个计数器让语句重复执行某个固定的次数。 对每个集合对象中的项目或数组中的元素重复执行一次循环。

3.1.2.1

For…Next语句

For…Next语句在循环的过程中 可以指定循环运行的次数 当到达循环运行次数之后 退出循环。其语法如下所示 For counter=start To end Step stepsizestate me nts N ext其中 counter是用作循环计数器的数值变量 st art是循环变量的初值 end是循环变量的终值 ste p s ize是循环变量的步长在默认条件下ste p size=1 state me nts是循环内反复执行的脚本。 在执行F or…N ext语句有以下几个步骤 1.将初值赋给循环变量 即执行c ounte r=sta rt 2.判断循环条件如果循环步长大于等于0则循环条件是c ounte r<=end如果循环步长小于0则循环条件是c ounter>=end如果循环条件为True则执行循环中的语句如果循环条件为Fals e则跳出循环 3.执行循环代码再将步长累加到循环计数器上 即执行counter=count er+st ep s ize 然后返回步骤2判断循环条件。 举个例子。下面的程序会计算从1到50所有数值相乘的结果。这个For语句指定了一个计数器

I 同时指定了该计数器的起始值和结束值。Next语句会使计数器的值在每次循环执行时自动递增1。使用Visual Basic的编程人员注意在VB语句中的For语句在Next语句之后必须跟有作为计数器的变量而在VB Script语句中该变量不必再写了。

Dim I,nResult nResult=1 For I=1 To 50 nResult=nResult *I Next MsgBox“结果为 ”&nRe sult

第3章

VBScript语句和过程

·45·

使用S tep关键字用户就可以随自己的需要来递增或是递减计数器变量。在下面的例子中计数器变量j会在每次循环执行后递增2。当循环执行完时变量nRe sult將是2、 4、 6、 8和10的总和。

Dimj,nResult nResult=0 Forj=2 To 10 Step 2 total=total+j Next MsgBox“结果为 ”&nResult

如果用户要使计数器变量递减时则可以使用负的S tep值。此时结束值必须小于起始值。在下面例子中计数器变量myN um会在每次循环执行过后递减2。当这个循环结束时变量tota l的值将会是16、 14、 12、 10、 8、 6、 4和2的总和。

Dim nStep nResult nResult=0 For nStep=16 To 2 Step-2 nResult=nResult+nStepNext MsgBox“结果为 ”&nResult

用户可以使用Exit For语句在计数器到达其结束值之前跳离For……Next语句。因为通常用户只会希望在某些特定的情形发生时才要跳离循环 比如像发生了错误时。所以用户应该把Exit Do语句放在If……Then……Else语句的Then子句之后的语句中。 当条件是False时 循环就会照常执行。 需要指出的是VBScript和Visual Basic的Next语句在使用上有所不同 Visual Basic中 Next语句后一般要求一个循环变量但在VBScript中Next语句后不要求循环变量 如果后面有循环变量反而会导致错误的出现。 一般情况下我们不建议在循环执行的过程中使用语句改变循环计数器的值 因为这样会使得脚本的可读性变差代码的调试和维护工作都会变得困难得多。 在循环中我们还可以使用循环嵌套不过循环嵌套的过程中要求各重循环计数器的变量不同例如

For I=1 To 10 For J=1 To 10……Next Next

3.1.2.2

Do…Loop语句

Do…Loop语句和For…Next语句有所不同 For…Next语句中循环执行的次数是确定的而Do…Loop中循环执行的次数则往往是不确定的如果循环条件为True或者循

·46·

VBScript与JScript实例教程

环条件变为True循环将会一直执行。 Do…Loop语句有两种形式 DoWhil e/Until…Lo op和Do…Lo op While/Until。 我们先来看第一种形式。

Do While/Until…Loo p的语法如下所示 Do{While|Until} c onditio nstate ment s Loop其中 cond iti on是循环执行条件 state me nt s是循环内反复执行的脚本。 Do While/Until…Loop循环的执行步骤如下所示 1.如果是Do

While…Loop循环则判断cond itio n是否满足如果满足则进入步骤2执行循环内脚本否则跳出循环如果是Do Until…Loop循环则判断condition是否不满足如果不满足则进入步骤2执行循环内脚本如果满足conditi on则跳出循环 2.执行循环中脚本然后返回步骤1。 在Do……Loo p语句中需用While关键字来检查条件。用户可以在进入循环之前就先检查条件或在循环至少执行过一次之后再检查 比如下面的ChkLastWhile例子。在ChkF ir stWhile程序中如果myN um不是设成20而是设成9那么在循环中的语句就永远不会被执行。在ChkLastWhile程序中循环里的语句只会被执行一次。因为它的条件已经是False了。

Sub ChkF irstWhile()Dim counter,myN um counter=0 myNum=20 D o WhilemyNum>10 myNum=myNum- 1 counter=counter+1 Loop MsgBox"The loopmade "&counter&"rep etitions."End Sub Sub C hkLastWhile()Dim counter,myNumcounter=0 myNum=9 Do myNum=myNum- 1 counter=counter+1 Loop WhilemyNum>10 MsgBox"The loop made "&counter&"rep etitions."End Sub

而如果我们将上述脚本中的Whil e改为Until再执行这段脚本我们则会发现执行结果不一样了。这是由于Do Until…Loop中在执行循环内代码前先判断循

环条件是否不满足只有在不满足的情况下 Do Until…Loop才会执行循环内脚本而如果满足则循环内代码一次也不会执行。

第3章

VBScript语句和过程

·47·

在Do……Lo op语句中用户有两种方法来使用Unt il关键字检查条件。用户可以在进入循环前先检查条件或在循环至少执行过一次后再检查(如下面的ChkLastUntil例子)。只要在条件是False时循环就会执行。

Sub C hkFirstUntil( )Dim c ounter,myNum c ounter=0 myNum=20 Do UntilmyNum=10 myNum=myNum- 1 counter=counter+1 Loop MsgBox"The loopmade "&co unte r&"repetito ns."End Sub Sub ChkLa stUntil()D im c ounte r,myNumcounter=0 myN um=1 Do myNum=myN um+1 counter=counter+1 LoopUntil myNum=10 MsgBox"The loop made "&counter&"repetitions."End Sub

我们再来看第二种形式。Do…Loop While/Until的语法如下所示 Do statementsLoop{While|Until} c onditio n其中 conditio n是循环执行条件 state ments是循环内反复执行的脚本。 D o…Loop While/Until循环的执行步骤如下所示 1.执行循环中脚本 2.对于Do…Lo op While循环则判断condition是否满足如果满足返回步骤1执行循环内脚本 否则跳出循环 如果是Do…Lo op Until循环则判断condition是否不满足 如果不满足则返回步骤1执行循环内脚本如果满足cond itio n则跳出循环。 如果我们将上述脚本中的While改为Until再执行这些脚本我们就会发现结果和Do Until…Loop的结果有所不同。这是由于在Do…Loop Until循环中首先将执行一次循环内脚本然后再对循环条件进行判断这也就是说不论循环条件如何设定 Do…Loop While/Until循环都将至少执行一次循环内的脚本。 注意在Do…Loop循环中一定要有改变循环条件中变量的语句否则很有可能会陷入死循环而不能终止。就技术上来说用户可以在Do……Loop中使用Exit Do语句来跳离循环。因为通常用户只会希望在某些特定的情形发生时才需要跳离循环语句 比如像要避免死循环时用户应该把E x itDo语句放在If……Then……Else语句的Then之后的语句块中。

·48·

VBScript与JScript实例教程

当条件是False时循环就会照常执行而当条件为True时 即满足离开循环的条件时 将执行Exit Do语句。 在下面的例子中 myNum将会被指定成一个会造成无限循环的值。 其中的If……Then……Else语句将会检查这个条件 以避免无限死循环的发生。

Sub ExitExamp le()Dim counter,myNum counter=0 myNum=9 Do Until myNum=10 myN um=myN um- 1 counter=counter+1 I f myN um<10 Then Exit Do LoopMsgBox"The loop made"&counter&"repetitions."End Sub

3.1.2.3

While…Wend语句

While…Wend语句和Do…Lo op语句十分类似但不如Do…Loo p语句那样灵活在While…Wend语句中如果条件为True则执行循环内脚本。其语法如下所示 While conditio n statements Wend其中 co nditin是循环执行条件 statements

是循环内执行的脚本。While…Wend语句的执行步骤如下所示 1.判断conditio n是否为True如果为True则进入步骤2执行循环内脚本如果为False或者为Null则跳出循环 2.执行循环中脚本然后返回步骤1。 与Do…Loo p语句不同的是Wh ile循环语句没有任何可以跳离循环的语句用户不能想当然地使用Exit While语句。 不过和Do…Lo op语句比较而言While…Wend语句的灵活性要差一些脚本的清晰程度则是相同的所以我们建议在同样的情况下还是使用Do…Loop语句。

3.1.2.4

For Each…Next语句

For Each…Next语句和上述三个循环语句都有所不同它既不指定循环执行的次数 也不指定循环结束条件而是对数组和集合中的元素进行枚举 当枚举结束之后才会退出循环。其语法如下所示 For Each element In group statements Next其中 gro up是我们进行枚举的数组或者集合 e le me nt是枚举变量的名

称 state me nt s是对于每个元素都会执行的循环脚本。

第3章

VBScript语句和过程

·49·

For Each……N ext和For……Next循环非常相似。 它们的不同之处在

于 Each……Next循环For是针对集合对象中的每一个对象或数组中的每一个元素重复执行一次循环而ForEach……Next循环语句是依指定的数字重复执行循环的次数。当用户不知道集合对象中有几个元素时 For Eac h……Next循环语句将会特別的有用。 在下面的HTML程序范例中 D ictio nary对象的功能是要将文字放到数个文本框中

3.1.2.5

E x it语句

在结构化程序设计的过程中 Go to语句的取消可以极大地增强程序的可读性便于程序的阅读与维护不过也不可避免带来了一些不足之处。在某些循环嵌套的程序中在合适的地方使用G o to语句能够使程序显得简洁明了并且代码效率高在禁止使用Go t o语句的场合中虽然不使用Go to语句也完全能够实现同样的功能但是却使得程序的可读性和代码效率形成了一种矛盾要么追求代码的高效率而使得程序晦涩难懂要么追求程

·50·

VBScript与JScript实例教程

序结构清晰而降低了代码的效率。所以在C语言中提供了b re ak、 c o nt inue、 Ex it等半结构化语句这些语句能够实现一定的跳转功能保持代码的高效也能够使得程序保持较强的可读性。 在VBScript中也提供了类似的语句 使用Exit语句能够停止程序当前正在执行的逻辑 退出循环或者当前过程。它能够退出Do…Loop、 For…Next循环也能够退出Function和Sub的过程处理关于Functio n定义的函数和Sub定义的过程我们会在下一节中介绍。 Exit语句有以下四种语法形式 1.Exit Do提供了一种退出Do…Loop循环的方法 Exit Do只能在Do…Loop语句中使用执行Exit Do语句之后将控制权转移到Loop语句之后。 2.Exit For提供了一种退出For循环的方法 Exit For语句只能在For…Next

语句或者For Each…Next循环中使用执行Exit For语句之后将控制权转移到Next语句之后。 3.Exit Function执行Exit Function语句之后退出当前函数。 4.Exit Sub执行Exit S ub语句之后退出当前过程。 例如我们可以使用Exit D o语句实现一个死循环中的退出在下面的脚本中 当循环计数器大于10之后退出循环处理而循环本身并不具备结束循环的功能counter=0 Do While True counter=counter+1 If counter>10 Then Exit Do Loop

当然上面的脚本完全不需要使用Exit Do语句但是在许多场合中使用Exit语句之后能够显著提高脚本的执行效率。

3.2

VBScript语句中的过程

掌握了一些基本概念后程序设计和编制就变成了一个不断重复的过程。用户需要多次重复某些步骤或是某些语句来完成某一所需处理的任务。 出于程序的可读性、可调试性和简单性的考虑在实际的编程过程中我们会将这些用于实现某一特定功能而且相对集中的语句放在一个子程序中称为过程。在过程中的语句一般和其他过程中的语句 或和主程序相对于子程序而言中语句没有什么直接联系。在VBScript中过程被分为两类 Sub过程和Function过程。前面的举例程序中我们已经接触过这两个过程但我们没有展开介绍。下面就具体谈谈这两种类型的过程。

3.2.1

Sub过程

Sub过程是由一些功能实现相对集中的VBScript语句组成。这些语句以Sub语句作为过程的开头 以End Sub语句作为其结束。这些语句被执行操作时并不返回任何数值这一点和后面所谈到的Func tio n过程有本质的区别 所以有些书上也将Sub过程称为子程序。

第3章

VBScript语句和过程

·51·

Sub过程可以使用参数由调用过程的主程序将所需的常量、变量或表达式传递给过程 。 如果Sub过程无任何参数则Sub语句必须包含空括号( )该括号不能省略。 比如我们希望写一段程序用于弹出一个对话框并在对话框上显示一段提示信息。 在这个程序中关于对话框的实现在程序的任何地方都是一致的所不同的是相应的提示信息。我们可以写一段Sub过程来处理这一特定的功能。

在这段程序中 CreateMes sageB ox是过程名称 strInfo是参数整个过程包含在Sub和End Sub之中。该过程相当简单只有三行语句。第一句定义了一个变量strComp l ete 该变量将用于对话框上的提示信息 第二句是根据参数的内容组织成一个完整的提示信息 并将该值赋给变量strC omp le te第三句是将该信息用对话框的形式来提供给用户。 以后用户在程序中的任何地方只要写

CreateM essageBox“He llo,World”

或者

Call CreateMes sageBox(“Hello,World”)

即可调用该过程。 对于通过值传递的参数在调用过程的时候 VBScript会在过程内部暂时建立一个变量并将参数值复制给这个变量这样就可以把过程外部的数值传递到过程内部中不过这个变量只是在过程内部有效的在脚本中改变变量的值的时候并不会对参数造成任何影响 当脚本结束过程调用的时候这个变量将被删除。 而对于通过地址传递的参数在调用过程的时候 VBScript将参数的地址传递到过程中去过程中的变量名称实际是对于这一块地址的引用 当过程中变量的值发生变化的时候也就意味着该地址中的数据发生了变化。 在脚本中调用过程有两种方法一种是使用C all语句的显式调用另外一种是不使用C all语句的隐式调用。这两种调用方法的效果其实是一样的 隐式调用的时候只需要在脚本中输入过程的名称和参数的名称就可以了参数之间用逗号进行分隔而在显式调用的时候必须在过程名称之后加上括号并且使得参数包含在括号中 即 CreateMess ageBox“Hello,World”Call Cre ateMe ssageBox(“He llo,World”)上面的两条语句中前面一条语句是过程的显式调用后面是隐式调用。 在过程执行的时候如果希望满足某种条件后直接退出过程的处理逻辑返回主程序 我们可以使用Exit Sub语句执行Exit Sub语句脚本的执行将立即从过程中退出这样

·52·

VBScript与JScript实例教程

可以极大地方便我们脚本的编写提高程序的灵活性。 在Windows操作系统中 由于采取的是一种使用消息机制来驱动程序所以我们往往将一些对于消息或是事件的处理语句作为一个Sub过程。关于消息机制和事件驱动的概念由于不是本书的内容这里不再赘述。如果需要了解这方面内容可以参阅有关Windows编程的书籍。在这里我们只需要知道触发某一事件之后的代码写在哪个Sub过程中即可。 请看下面这个例子。我们要放置一个按钮按下这个按钮之后将会弹出一个对话框。 这是一个简单的程序但这个程序反映了如何使用控件和Sub过程。我们首先要在页面上放置一个按钮代码如下

该语句定义了一个按钮该按钮的名字为btnMsg按钮上的文字为“提示信息”。

这段语句是用于在按下按钮之后所需要执行的代码。 由于在VBScript中不像MFC中对于任何的Windo ws消息有相应的消息映射而是简化成了一些直观的过程。这些过程往往在名称上就直接反映了其与各类消息之间的联系。例如在上述的例子中我们就可以看到关于btnMsg按钮的点击事件中的语句是写在一个名为btnMsg_onC lick()的过程中其中btnMsg是按钮的名称 onClick说明了在该按钮点击后所需要响应的代码。 我们可以根据这个例子触类旁通知道凡是带有这样结构命名的Sub过程都是系统指定的消息函数希望用户自定义的函数不要和该名称冲突。 在该过程中 又调用了上述定义的CreateMe ssageBox过程 当然该语句也可以写成Call CreateMessageBox(MsgInfo)注意括号不要漏掉。

3.2.2

Function过程

Functio n过程与Sub过程相类似也是由一系列VBScript语句所组成这些语句是以Function语句作为该Function过程的开头标记 以End Function语句作为