如何:创建过程 (Visual Basic)

在起始声明语句(SubFunction)和结束声明语句(End SubEnd Function)之间包含一个过程。 所有过程的代码都位于这些语句之间。

一个过程不能包含另一个过程,因此其起始语句和结束语句必须位于任何其他过程之外。

如果代码在不同位置执行相同的任务,可以将任务编写一次作为过程,然后从代码中的不同位置调用它。

创建不返回值的过程

  1. 在任何其他过程外,使用 Sub 语句,后接 End Sub 语句。

  2. Sub 语句中,在 Sub 关键字后面输入过程的名称,然后将参数列表用括号括起来。

  3. 将过程的代码语句放在 SubEnd Sub 语句之间。

创建返回值的过程

  1. 在任何其他过程外,使用 Function 语句,后接 End Function 语句。

  2. Function 语句中,在 Function 关键字后面加上过程名称,然后是括号中的参数列表,最后是指定返回值数据类型的 As 子句。

  3. 将过程的代码语句放在 FunctionEnd Function 语句之间。

  4. 使用 Return 语句将值返回给调用代码。

将新过程与旧的重复代码块连接起来

  1. 请确保在旧代码有权访问新过程的位置定义新过程。

  2. 在旧的重复代码块中,将执行重复任务的语句替换为调用 SubFunction 过程的单个语句。

  3. 如果过程是返回值的 Function,请确保调用语句使用返回的值执行操作,例如将其存储在变量中,否则该值将丢失。

示例

下面的 Function 过程根据其他两边的值计算直角三角形的最长边(斜边):

Function Hypotenuse(side1 As Double, side2 As Double) As Double
    Return Math.Sqrt((side1 ^ 2) + (side2 ^ 2))
End Function

另请参阅