语句
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]
[color=Maroon]Wend
不停地连续执行语句statements 直到条件condition为True。
本文地址:http://com.8s8s.com/it/it42022.htm