Nota:
El acceso a esta página requiere autorización. Puede intentar iniciar sesión o cambiar directorios.
El acceso a esta página requiere autorización. Puede intentar cambiar los directorios.
Use un Function procedimiento para devolver un valor al código de llamada.
Para crear un procedimiento que devuelva un valor
Fuera de cualquier otro procedimiento, use una
Functiondeclaración, seguida de unaEnd Functiondeclaración.En la
Functioninstrucción , siga laFunctionpalabra clave con el nombre del procedimiento y, a continuación, la lista de parámetros entre paréntesis.Siga los paréntesis con una
Ascláusula para especificar el tipo de datos del valor devuelto.Coloque las instrucciones de código del procedimiento entre las instrucciones
FunctionyEnd Function.Use una
Returninstrucción para devolver el valor al código de llamada.El procedimiento
Functionsiguiente calcula el lado más largo, o hipotenusa, de un triángulo rectángulo, dados los valores de los otros dos lados.Function Hypotenuse(side1 As Double, side2 As Double) As Double Return Math.Sqrt((side1 ^ 2) + (side2 ^ 2)) End FunctionEn el ejemplo siguiente se muestra una llamada típica a
hypotenuse.Dim testLength, testHypotenuse As Double testHypotenuse = Hypotenuse(testLength, 10.7)