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

另请参阅

• 过程
• Sub 过程
• Property 过程
• 运算符过程
• 过程形参和实参
• Function 语句
• 如何：从过程返回值
• 如何：调用返回值的过程