ClubEnsayos.com - Ensayos de Calidad, Tareas y Monografias
Buscar

Programacion C


Enviado por   •  17 de Febrero de 2015  •  340 Palabras (2 Páginas)  •  154 Visitas

Página 1 de 2

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

...

Descargar como (para miembros actualizados)  txt (1.3 Kb)  
Leer 1 página más »
Disponible sólo en Clubensayos.com