如何：建立傳回值的程式 （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)
   

另請參閱

• 程式
• 子程式
• 財產程序
• 運算子程式
• 程序參數和自變數
• Function 陳述式
• 如何：傳回程序的值
• 如何：呼叫傳回值的程序