共用方式為


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)