HOW TO:建立傳回值的程序 (Visual Basic)
使用 Function 程序,將值傳回給呼叫程式碼。
若要建立傳回值的程序
在任何其他程序之外,使用後面緊接 End Function 陳述式 (Statement) 的 Function 陳述式。
在 Function 陳述式中,於 Function 關鍵字後面緊接著程序名稱,然後是用括號括住的參數清單。
在括號後面緊接著 As 子句,以指定傳回值的資料型別。
將程序的程式碼陳述式放在 Function 與 End Function 陳述式之間。
使用 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:呼叫傳回值的程序 (Visual Basic)