共用方式為

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

另請參閱