probleme avec SORT

dim i

dlist 10
' remplir la dlist par des valeurs aléatoires
for i = 1 to 10
    item_add 10 ,str$(int(rnd(80)+10))
next i
' Afficher le contemu de la dlist
print "dlist non triée"
for i = 1 to 10
    print item_read$(10,i)
next i
print "***********************************"
' trier et afficher
sort 10
print "dlist triée"
for i = 1 to 10
    print item_read$(10,i)
next i