[VBS] Ordenar numeros en un script

Problema:

Realizar un script que genere de diez numeros aleatorios positivos, los muestre según se generaron y que los muestre ademas ordenados de menor a mayor.

Esto es lo que tengo y me queda ordenarlos que no caigo como es xD.Gracias.

 
DIM array(10)

for i=1 to 10
	array(i) =int(rnd*10)
next

for i=1 to 10
	cadena=array(i)&","&cadena
next

msgbox(cadena)

Saludos.