Programacion C
Enviado por izamars • 17 de Febrero de 2015 • 340 Palabras (2 Páginas) • 182 Visitas
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Label2.Text = "Escribe la base del triangulo"
Label3.Text = "Escribe la altura del triangulo"
Label4.Text = "AREA"
Button1.Text = "CALCULAR"
Button2.Text = "LIMPIAR"
Button3.Text = "SALIR"
Label4.Visible = False
TextBox3.Visible = False
Button2.Enabled = False
Button3.Enabled = False
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Label4.Visible = True
Button2.Enabled = True
Button3.Enabled = True
TextBox3.Visible = True
TextBox3.Text = (Val(TextBox1.Text) * Val(TextBox2.Text)) / 2
Button1.Enabled = False
End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
TextBox1.Clear()
TextBox2.Clear()
Label4.Visible = False
TextBox3.Visible = False
Button2.Enabled = False
Button3.Enabled = False
Button1.Enabled = True
Button3.Enabled = True
End Sub
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
End
End Sub
End Class
...