如何：创建返回值的过程（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)
   

另请参阅

• 过程
• 子过程
• Property 过程
• 运算符过程
• 过程参数和实参
• 函数语句
• 如何：从过程返回值
• 如何：调用返回值的函数