How to: Create a Procedure that Returns a Value (Visual Basic)
You use a Function
procedure to return a value to the calling code.
To create a procedure that returns a value
Outside any other procedure, use a
Function
statement, followed by anEnd Function
statement.In the
Function
statement, follow theFunction
keyword with the name of the procedure, and then the parameter list in parentheses.Follow the parentheses with an
As
clause to specify the data type of the returned value.Place the procedure's code statements between the
Function
andEnd Function
statements.Use a
Return
statement to return the value to the calling code.The following
Function
procedure calculates the longest side, or hypotenuse, of a right triangle, given the values for the other two sides.Function Hypotenuse(side1 As Double, side2 As Double) As Double Return Math.Sqrt((side1 ^ 2) + (side2 ^ 2)) End Function
The following example shows a typical call to
hypotenuse
.Dim testLength, testHypotenuse As Double testHypotenuse = Hypotenuse(testLength, 10.7)