vbscript语句

'vbscript语句
Call
'[call] name [argumentlist]
'把控制转移到函数或子程序。当调用函数或子程序时，Call是可写可不写的。但是如果你用了Call,那么argumentlist必须用括号括起来。
Const
'[Public | Private] Const constantname=expression
'用于申明常数。你可以在一行里申明多个常数，此时你必须用逗号把常数赋值语句隔开。
Dim
'Dim varname[ ( [subscripts])][, varname [( [subscripts])]...
'创建一个新变量并且分配存储空间。
DO . . . LOOP
'语法 1：
'Do [{While | Until } condition ]
'[statements]
'[Exit Do]
'[statements]
'LOOP
'语法 2：
'Do
'[statements]
'[Exit Do]
'[statements]
'LOOP [{While | Until } condition ]
'当条件condition为真时或直到条件condition为真时，两种形式都重复执行语句。
Erase
'Erase array
'清理数组，对于固定长度的数组，重新初始化元素；对于动态数组，重置存储空间。
Exit
'Exit Do
'退出一个 DO . . . LOOP 循环。
'Exit For
'退出一个 For . . . Next 循环或For Each . . . Next循环。
'Exit Function
'退出一个 函数。
'Exit Sub
'退出一个子程序。
For . . . Next
'For counter = start To End [Step step]
'[statements]
'[Exit For]
'[statements]
'Next
'由loop 计数器指定的次数重复执行statements语句群。
For Each . . . Next
'For Each element In group
'[statements]
'[Exit For]
'[statements]
'Next [element]
'对于每一个在数组或集合中的元素，重复执行statements语句群。
Function
'[Public | Private] Function name [(arglist)]
'[statements]
'[name=expression]
'[Exit Function]
'[statements]
'[name=expression]
'End Function
'定义一个函数，指明函数名，参数及代码。
If . . . Then . . . Else
'语法1：
'If condition Then statements [Else elsestatements]
'语法2：
'If condition Then
'statements
'[ElseIf condition-n Then
'[elseifstatements]] . . .
'[Else 
'[elsestatements]]
'End If
'两种格式都条件执行一系列语句。
On Error
'On Error Resume Next
'当一个错误发生时，这条语句就执行紧靠发生错误语句后面的语句，或者执行紧靠调用进程后面的语句。
Option Explicit
'Option Explicit
'在使用变量之前强制明确定义该变量，可以用Dim,Private,Public或 ReDim语句定义变量。
Private
'Private varname[([下标])][, varname[([下标])] . . . 
'创建私有变量并且分配存储空间。（私有变量只能在定义该变量的脚本中可用）
Public
'Public varname[([下标])][, varname[([下标])] . . . 
'创建公有变量并且分配存储空间。（公有变量在程序的任何地方均可使用）
Randomize
'Randomize [number]
'给Rnd函数的随机数发生器一个新种子值。
ReDim
'ReDim [Preserve] varname(subscripts)[, varname(subscripts)] . . . 
'修改维的下标，大小；或重置动态数组的大小。Preserve 保护已存数组的数据。
Rem
'语法1：
'Rem comment
'语法2：
'‘comment
'这两种语句形式都能使注释的句子不被处理。如果Rem和其它语句在同一行上，Rem 语句必须在后且二者之间必须用冒号隔开。
Select Case
'Select Case testexpression
'[Case expressionlist-n
'[statements-n]] . . .
'[Case Else expressionlist-n
'[elsestatements-n]]
'End Select
'如果某一个expressionlist 和testexpression 匹配，则执行和expressionlist对应的语句；如果没有一个expressionlist 和testexpression 相匹配，则执行和Case Else 相对应的语句。
Set
'Set obectvar= {objectexpression | Nothing}
'赋予一个变量或一个性质对象引用。当赋予的值为Nothing 时，使obectva 和任何以前指明的对象解除关系。
Sub
'[Public | Private] Sub name [(arglist)]
'[statements]
'[Exit Sub]
'[statements]
'End Sub
'定义一个子程序，指明名称，参数及代码。
While . . . Wend
'While condition
'[statements]
'Wend
'不停地连续执行语句statements 直到条件condition为True