通过

如何：创建返回值的过程（Visual Basic）

您使用Function方法将值返回到调用代码。

创建一个返回值的函数

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

  2. 在 Function 语句中，关键字 Function 后面应该是过程的名称，然后括号内是参数列表。

  3. 在括号之后添加As子句，以指定返回值的数据类型。

  4. 将过程的代码语句放在Function语句和End Function语句之间。

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

    以下 Function 过程计算直角三角形的最长边或斜边，给定其他两边的值。

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

    下面的示例演示了典型的调用hypotenuse。

    Dim testLength, testHypotenuse As Double
testHypotenuse = Hypotenuse(testLength, 10.7)

另请参阅