HOW TO：建立傳回值的程序

更新：2007 年 11 月

使用 Function 程序，將值傳回給呼叫程式碼。

若要建立傳回值的程序

1. 在任何其他程序之外，使用後面緊接 End Function 陳述式 (Statement) 的 Function 陳述式。

2. 在 Function 陳述式中，於 Function 關鍵字後面緊接著程序名稱，然後是用括號括住的參數清單。

3. 在括號後面緊接著 As 子句，以指定傳回值的資料型別。

4. 將程序的程式碼陳述式放在 Function 與 End Function 陳述式之間。

5. 使用 Return 陳述式，將值傳回給呼叫程式碼。

   下列 Function 程序會在已知其他兩邊值的情況下，計算直角三角形的最長邊 (也稱為斜邊)。

   Function hypotenuse(ByVal side1 As Single, ByVal side2 As Single) As Single
       Return Math.Sqrt((side1 ^ 2) + (side2 ^ 2))
   End Function
   

   下列範例顯示 hypotenuse 的典型呼叫。

   Dim testLength, testHypotenuse As Single
   testHypotenuse = hypotenuse(testLength, 10.7)
   

請參閱

工作

HOW TO：傳回程序的值

HOW TO：呼叫傳回值的程序

概念

Visual Basic 中的程序

Sub 程序

Property 程序

運算子程序

程序參數和引數

參考

Function 陳述式 (Visual Basic)