Ver Mensaje Individual
  #1 (permalink)  
Antiguo 26/10/2008, 08:48
Avatar de jesmi89
jesmi89
 
Fecha de Ingreso: agosto-2008
Ubicación: Bello - Antioquia
Mensajes: 47
Antigüedad: 15 años, 7 meses
Puntos: 0
mostrar el mayor y menor elemento de un vector

hola lo que pasa es que estoy trabajando en este proyecto de visual basic.net, en el cual necesito que lo que me haga es mostrarme el mayor y menor elmento de un vector.
Pero lo unico que consigo es que en el caso de menor me muestre siempre el ultimo elemnto ingresado , en cambio el de mostrar el mayor si me funciona.

Asi que les agradeceria si porfa me pueden dar una ayudita con esto..

Código:
Public Class Form1
    Dim b As Integer
    Dim i As Integer
    Dim c As Integer

    Dim a() As Long
    
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click


        b = TextBox1.Text
        c = TextBox1.Text

        ReDim a(b)

        For i = 1 To b
            a(i) = InputBox("Ingrese Datos")

            c = a(i)
            TextBox2.Text = TextBox2.Text & "  " & c

            If a(i) > b Then
                b = a(i)
            Else
                If a(i) < c Then
                    c = a(i)

                End If
            End If

        Next

        MsgBox("el mayor es  " & b)
        MsgBox("el menor es  " & c)

    End Sub

End Class
Gracias..