Desarrollar un algoritmo que calcule el área de un cuadrado.
Solución
- Entrada: 4
- Salida: 16
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object,
ByVal e As System.EventArgs) Handles Button1.Click
Dim area As Double
Dim a As Double
a = TextBox1.Text
area = a * a
TextBox2.Text = Trim(area)
End Sub
End Class

1 comentarios:
este va apoyado de formulario?
Publicar un comentario