如何：建立傳回值的程序 (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 程序
• 屬性程序
• 運算子程序
• 程序參數和引數
• Function 陳述式
• 如何：傳回程序的值
• 如何：呼叫傳回值的程序