Programación VB. Ingrese el radio del círculo, calcule la circunferencia y el área del círculo. Por cierto, puede dibujar la imagen y escribirla en VB2005.

Private Sub Command1_Click() 'Define un procedimiento de evento llamado Command1_Click()

Const PI As Single = 3.14 'Indica que PI es una constante en el programa∏

Dim r As Single, s As Single 'Explique que las variables r y s en el programa son números reales de precisión simple

r = InputBox("r=", "Radio de entrada") 'Entrada el valor de r

p>

s = PI * r * r 'Calcula el valor de la expresión PI*r*r y asígnalo a s

c= 2 *pi*r 'Calcule la expresión 2*PI*r y asígnela a c

Imprimir "El valor del área del círculo s=" se envía al formulario actual

Imprimir "La circunferencia del círculo c=" ; c

'Fin del proceso

End Sub