Visual Basic - ordenar numeros de menor a mayor

Necesito que me ayuden para ordenar los siguintes numeros:164, .06600, 217.10, 217.00, 182.56, 182,

hola Hector esto entendi
-use un text1(puse en multiline a true)
-use 2 botones(command1 y command2)
este es el codigo
======================================
Dim a As Variant
Dim b As Variant
Dim c As Variant
Dim d As Variant
Dim e As Variant

Rem mayor a menor
Private Sub Command1_Click()
Text1.Text = ""
r = Chr(13) & Chr(10)
a = 217.1
b = 217
c = 182.56
d = 182
e = 164.066
Text1.SelText = a & r & b & r & c & r & d & r & e
End Sub

Rem menor a menor
Private Sub Command2_Click()
Text1.Text = ""
r = Chr(13) & Chr(10)
a = 217.1
b = 217
c = 182.56
d = 182
e = 164.066
Text1.SelText = e & r & d & r & c & r & b & r & a
End Sub
======================================

Hola! mi duda es que como puedo hacer que en un arreglo unidimensional:
dim vector(9) as integer
Necesito que los numeros ingresados de cualquier manera, me los muestre de menor a mayor, es en Aplicación de Consola para Visual Basic 2008.
Gracias por su Atención...