共用方式為

如何：從程序傳回值 （Visual Basic）

程式 Function 會藉由執行 Return 語句或遇到 Exit Function 或 End Function 語句，將值傳回給呼叫端程序代碼。

使用 Return 語句傳回值

  1. 在程序的任務完成之處放置Return語句。

  2. 請在 Return 關鍵詞後加上可產生您要返回給呼叫代碼之值的表達式。

  3. 您可以在相同的程序中使用多個 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)

使用 Exit Function 或是 End Function 來傳回值

  1. 在程序的至少一個位置Function中，將值指派給程序的名稱。

  2. 當您執行 Exit Function 或 End Function 語句時，Visual Basic 會傳回最近指派給程式名稱的值。

  3. 您可以在相同的程式中有多個 Exit Function 語句，而且您可以在相同的程式中混合 Return 和 Exit Function 語句。

  4. 在End Function程序中只能有一個Function語句。

    如需詳細資訊和範例，請參閱 Function 語句中的“返回值”。

另請參閱