Cómo usar vb para encontrar la circunferencia y el área de un círculo
Es decir: Circunferencia = 2πr o πD
Área: s=πr o s=π(d/2)?< / p>
Programa, prepare un cuadro de texto 1 para usted, usado para ingresar el radio del círculo
Cuadro de texto 2, usado para mostrar la circunferencia resultante
Cuadro de texto 3, usado Agregue dos botones 1 al área de resultados de visualización
, que se usan para calcular la circunferencia y el área del círculo respectivamente.
Defina la constante π y el radio r
Luego agregue el cálculo y muestre el código de resultado en el evento del botón1.
Algoritmo: Clase Pública Form1
Const P = 3.14
Sub Botón Privado1_Click(ByVal remitente Como System.Object, ByVal y Como System.EventArgs) Maneja el Botón1 .Haga clic en
TextBox2.Clear() 'Borrar resultados de cálculos anteriores
TextBox3.Clear() 'Borrar resultados de cálculos anteriores
Si TextBox1.Text lt ;gt ; String.Clear() 'Borrar resultados de cálculos anteriores
If TextBox1.Text
Dim r As Double = TextBox1.Text
'Lo anterior es la combinación de estas dos partes Dim r As Double
' r=TextBox1.Text
TextBox2.Text = 2 * P * r
'Determina si un radio es entró. Text = 2 * P * r
TextBox3.Text = P * r * r
Else
MsgBox("Ingrese el radio del círculo") p>
Finalizar si
Finalizar sub
Finalizar clase