[caption id="attachment_2140" align="alignnone" width="500"] procedimentos e functions visual basic[/caption]

Quando usar uma functions no Visual Basic

• Uma functions deve ser usada quando você desejar retornar um valor para o código de chamada.
• Caso você não precise retornar um valor para o código de chamada, pode-se usar o Sub

Por exemplo: Digamos que você queira descobrir a área de um circulo através do seu diâmetro. Diâmetro: É a distância entre um lado e outro do círculo. Veja na imagem acima. O cálculo é: área = diâmetro * 3.14 O código para descobrir a área é:

Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim d2, area As Integer
d2 = Val(TextBox2.Text)
area = d2 * 3.14
Resultado.Text = area
End Sub
End Class

Estamos realizando o cálculo sem usar uma functions.

Cálcular a área de um círculo usando uma functions

Você pode tranformar o cáculo da área em uma função, nesse caso, sempre que você quiser chamar a função que realiza o cálculo para descobrir a área do círculo, basta digitar o nome da fução. Veja:

Public Class Form1

Function Area_Circulo(ByVal d As Integer) As Double
Area_Circulo = d * 3.14
Exit Function

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim d1, total As Integer
        d1 = Val(TextBox1.Text)
        total = Area_Circulo(d1) 'Chamamos a função para realizar o cálculo. Dentro do parenteses () o valor que será trabalhado'
        Label4.Text = total
    End Sub
End Function