Compartilhar via


Como criar um procedimento que retorne um valor (Visual Basic)

Você usa um procedimento Function para retornar um valor para o código de chamada.

Para criar um procedimento que retorna um valor

  1. Fora de qualquer outro procedimento, use uma instrução Function, seguida por uma instrução End Function.

  2. Na instrução Function, siga a palavra-chave Function com o nome do procedimento e, em seguida, a lista de parâmetros entre parênteses.

  3. Siga os parênteses com uma cláusula As para especificar o tipo de dados do valor retornado.

  4. Coloque as instruções de código do procedimento entre as instruções Function e End Function.

  5. Use uma instrução Return para retornar o valor ao código de chamada.

    O procedimento Function a seguir calcula o lado mais longo, ou hipotenusa, de um triângulo direito, considerando os valores dos outros dois lados.

    Function Hypotenuse(side1 As Double, side2 As Double) As Double
        Return Math.Sqrt((side1 ^ 2) + (side2 ^ 2))
    End Function
    

    O exemplo a seguir mostra uma chamada típica para hypotenuse.

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

Confira também