2．循环控制语句

（1）Do...Loop 循环 例1

可以使用 Do...Loop 语句多次（次数不定）运行语句块。当条件为 True 时或条件变为 True 之前，重复执行语句块。 

Do...Loop 语句形式：

第一种语法形式是先判断循环条件

Do [{While | Until} condition]

[statements]

[Exit Do]

[statements]

Loop

Do...Loop 循环例2  例3

第二种语法形式是先执行一次循环，再判断循环条件

Do

[statements]

[Exit Do]

[statements]

Loop [{While | Until} condition]

（2）While...Wend循环

While...Wend 语句是当指定的条件为 True 时，执行一系列的语句。语法形式为：

While condition

   [statements]

Wend

（3）For...Next循环  举例

For...Next语句是以指定次数重复执行一组语句。

语句一般形式是：

For counter = start To end [Step step]

[statements]

[Exit For]

[statements]

Next

For...Next循环嵌套  举例

可以将一个For...Next循环放置在另一个For...Next循环中，组成嵌套循环。每个循环中的counter要使用不同的变量名。

（4）For Each...Next循环  举例

For Each...Next 循环与 For...Next 循环类似。For Each...Next不是将语句运行指定的次数，而是对于数组中的每个元素或对象集合中的每一项重复一组语句。这在不知道集合中元素的数目时非常有用。

For Each...Next 语句的一般形式如下：

For Each element In group

[statements]

[Exit For]

[statements]

Next [element] 

（5）On Error 语句

语法形式：On Error Resume Next

当一个错误发生时，这条语句就执行紧靠发生错误语句后面的语句，或者执行紧靠调用进程后面的语句。

Sub cmdSubmit_OnClick

       On Error Resume Next

     Myvar="aaa"+30

       ''''显示引起错误的描述

       If Err <> 0 Then

          Msgbox "An error occurred. " & Err.Description

            Err.Clear

       End if

End Sub

十一．过程与函数据

1．Sub过程  例1 例2 例3

声明Sub过程的名称、参数以及构成其主体的代码。

Sub name [(arglist)]

[statements]

[Exit Sub]

[statements]

End Sub

注意：Sub过程默认为公用，即它们对于脚本中的所有其他过程都是可见的。Sub过程中局部变量的值在调用过程中不被保留。

注意：不能在任何其他过程（例如，Function）中定义Sub过程。

上一页  [1] [2] [3] [4] [5] [6] [7]  下一页