Cómo: Crear un procedimiento que devuelve un valor (Visual Basic)

Use un procedimiento Function para devolver un valor al código que llama.

Para crear un procedimiento que devuelva un valor:

1. Fuera de cualquier otro procedimiento, use una instrucción Function, seguida de una instrucción End Function.

2. En la instrucción Function, siga la palabra clave Function con el nombre del procedimiento y, luego, la lista de parámetros entre paréntesis.

3. Siga los paréntesis con una cláusula As para especificar el tipo de datos del valor devuelto.

4. Coloque las instrucciones de código del procedimiento entre las instrucciones Function y End Function.

5. Use una instrucción Return para devolver el valor al código que llama.

   El procedimiento Function siguiente 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 Function
   

   En el ejemplo siguiente se muestra una llamada típica a hypotenuse.

   Dim testLength, testHypotenuse As Double
   testHypotenuse = Hypotenuse(testLength, 10.7)
   

Consulte también

• Procedimientos
• Procedimientos Sub
• Procedimientos de propiedad
• Procedimientos de operador
• Argumentos y parámetros de procedimiento
• Instrucción Function
• Procedimiento para devolver un valor de un procedimiento
• Procedimiento para llamar a un procedimiento que devuelve un valor