くだすれVB6.0以前（超初心者向け）

Sub aaa()

Dim a(10) As Integer
Dim i As Integer

a(0) = 32
a(1) = 14
a(2) = 56
a(3) = 15
a(4) = 7
a(5) = 18
a(6) = 102
a(7) = 88
a(8) = 11
a(9) = 57
a(10) = 58
'-------------------
'この間で
'-------------------
For i = 0 To 10
Debug.Print a(i)
Next
End Sub

超初心者質問ですみません。
上のようにa(10)にランダムの数字が格納されていて
これを昇順（若い順）に格納しなおしてから
表示するようなプログラムを作りたいの
ですがどのようなやり方があるでしょうか。。