Programa calcula el area y la longitud de una circunferencia

Sigue las formulas correspondientes esta hecho en .net

Public Class Form29

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        REM Declarar todas las variables

        Dim pi, radio, area, longitud As Integer

        REM Validar objetos de entrada

        radio = oradio.Text

        pi = opi.Text

        REM Proceso

        area = pi * radio ^ 2

        longitud = 2 * pi * radio

        REM Asignar respuesta a objeto de salida

        Label6.Text = area

        Label7.Text = longitud

    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

        'Para salir se utiliza la funcion

        If (MsgBox("Esta seguro que desea salir?", MsgBoxStyle.YesNo, "Advertencia")) = MsgBoxResult.Yes Then

            MsgBox("Gracias")

            Close()

        End If

    End Sub

  

End Class