Actividades 1 2 3


Universidad Autónoma de Nuevo León
Escuela Industrial y Preparatoria Técnica
Álvaro Obregón.Actividades 1, 2 y 3.
Unidad de Aprendizaje: Programación.
Maestro: Héctor Francisco Berrones Cortez.
Alumno: Esteban Salvador Villarreal Salinas.
Matricula: 1741979.
Especialidad: TIC_EPW
Grupo: 3L3Aula: 133.

Elabora un Programa que muestre el tipo de triangulo según sus lados.


Public Class Form1

Private Sub btnCalcular_Click(sender As Object, e As EventArgs) Handles btnCalcular.ClickDim Lados As Integer
Lados = (txtLados.Text)
Select Case Lados
Case 3
MsgBox("Este Triangulo es Equilatero")
Case 2MsgBox("Este Triangulo es Escaleno")
Case 4
MsgBox("Este triangulo es Isoceles")



End Select
End Sub

Private Sub btnLimpiar_Click(sender As Object, e AsEventArgs) Handles btnLimpiar.Click
txtLados.Text = ""

End Sub

Private Sub btnSalir_Click(sender As Object, e As EventArgs) Handles btnSalir.Click
End
End Sub
End ClassElabora un Programa que muestre si la persona es bebe, niño, joven, adulto.





Public Class Form1

Private Sub btnVerificar_Click(sender As Object, e As EventArgs) Handles btnVerificar.ClickDim edad As Integer
edad = Val(txtEdad.Text)
Select Case edad
Case 0 To 2
MsgBox("Es un Bebe")
Case 3 To 12
MsgBox("Es unNiño")
Case 13 To 21
MsgBox("Es un Joven")
Case 21 To 50
MsgBox(" Es un Adulto")

End Select

End Sub

Private SubLimpiar_Click(sender As Object, e As EventArgs) Handles Limpiar.Click
txtEdad.Text = ""

End Sub

Private Sub Salir_Click(sender As Object, e As EventArgs) Handles Salir.Click
End...