Ayuda en la elaboracion D 1 programa q muestre 1 triangulo DPndiendo de los valo

Iniciado por luix87, 29 Agosto 2009, 07:11 AM

0 Miembros y 1 Visitante están viendo este tema.

luix87

Hola a todos los del foro estoy intentando hacer un programa que me pida los 3 lados de un triangulo y que me muestre el triangulo equilátero: si todos los lados son iguales, isósceles si al menos dos lados son iguales y escaleno si no tiene dos lados iguales.
Lo estoy haciendo en interfaz grafica con el .net 2005

La duda de mi parte esta en como hacer que me verifique cada uno de los valores de los textbox, estoy utilizando un Select Case pero no encuentro la forma, soy novato en esto y espero que me puedan ayudar. El codigo que he hecho por el momento es el siguiente:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim a As Boolean
        Dim isoceles As New isoceles
        Dim equilatero As New equilatero
        Dim escaleno As New escaleno
        Select Case a
            Case 1
                If TextBox1.Text = TextBox2.Text And TextBox2.Text = TextBox3.Text Or TextBox1.Text = TextBox3.Text Then
                    'equilatero.Show()

                    'a = True
                Else
                    equilatero.Show()
                End If
        End Select

la parte que dice "equilatero.show" es un formulario que cree que me mostrara la imagen del triangulo equilatero, espero que me puedan ayudar :'(

43H4FH44H45H4CH49H56H45H

de forma no muy buena puede ser asi:

Código (vbnet) [Seleccionar]

       If (Val(TextBox1.Text) = Val(TextBox2.Text) And Val(TextBox1.Text) = Val(TextBox3.Text)) Then
           Me.Text = "iguales"
       ElseIf (Val(TextBox1.Text) < Val(TextBox2.Text) And Val(TextBox1.Text) < Val(TextBox3.Text)) Then
           Me.Text = "lado 1 menor"
       End If

lo mejor seria sacar la media de los valores y deacuerdo a ello en un select case mostrar el form adecuado.

El tema debe ir a .NET

-R IP
:0100
-A 100 
2826:0100 MOV AH,09
2826:0102 MOV DX,109
2826:0105 INT 21
2826:0105 MOV AH,08
2826:0105 INT 21
2826:0107 INT 20
2826:0109 DB 'MI NICK ES CODELIVE.$' 
2826:0127 
-R BX
:0000
-R CX
:20
-N CODELIVE.COM
-W

raul338

aca te hace va a hacer falta trigonometria aca  :rolleyes:

Antes del select case no veo que asignes A, por lo que creo que no entrara....

Una recomendacion es, que primero dibujes la base (sea el triangulo que sea: si es isoceles dibuja el lado que no es igual, si es escaleno dibuja el mas largo....)

y despues a partir de la mitad de la base hacia arriba (altura) dibujas los otros dos lados.....