últimos mensajes de: josezamp

Hola gente! Estoy desarrollando un código que tiene el siguiente enunciado:

a) Sumar los elementos de un vector.
b) Devolver si un número ingresado es positivo, negativo o cero.
c) Ordenar los elementos de una matriz en forma ascendente.
Utilizar procedimientos y funciones para realizar los incisos a, b y c. Todos los resultados deben imprimirse en el programa principal.

Por lo que mi código va quedando de la siguiente manera:

Código

Module Module1
 
    Sub Main()
        Dim vector(5, 2) As String ' declaro la matriz
        Dim suma As Integer
        Call valores(vector, suma)
        For i = 1 To 5
            Console.WriteLine("Valor ingresado en el vector {0} = {1} y es {2}", i, vector(i, 1), vector(i, 2))
        Next
        Console.WriteLine("Suma de los valores ingresados: {0}", suma)
        Console.ReadLine()
    End Sub
    Sub valores(ByRef vector, ByRef suma)
        suma = 0
        For i = 1 To 5
            Console.Write("Escriba el valor para el vector {0}º: ", i)
            vector(i, 1) = Console.ReadLine ' ingreso los valores para la matriz
            Select Case vector(i, 1)
                Case Is < 0
                    vector(i, 2) = "menor que cero"
                Case Is > 0
                    vector(i, 2) = "mayor que cero"
                Case Is = 0
                    vector(i, 2) = "igual a cero"
            End Select
        Next
        For i = 1 To 5
            suma = suma + vector(i, 1) ' sumo los elementos del vector
        Next
 
    End Sub
 
End Module

Pero no sé qué método utilizar para que el programa ordene la matriz en forma ascendente ¿Algún consejo?
Desde ya, gracias