Sortering af numerisk Array

Jeg håber der er nogen her der kan hjælpe mig.
Jeg har efterhånden brugt mange timer på at finde en funktion der kan sortere et numerisk array for mig.

Mit array bliver f.eks fyldt op således.
7,2,3,4,5,12,6,8,9,10,108,11

Og alle funktioner jeg kan finde til sortering sortere det efterfølgende sådanne her.
10,108,11,12,2,3,4,5,6,7,8,9

Ved brug af følgende funktion, som i øving er den output alle funktioner er kommet med jeg har kunne finde.

function SortArray1(arrShort)
dim i, j, temp
for i = UBound(arrShort) - 1 To 0 Step -1
for j= 0 to i
if arrShort(j)>arrShort(j+1) then
temp=arrShort(j+1)
arrShort(j+1)=arrShort(j)
arrShort(j)=temp
end if
next
next
SortArray = arrShort
end function

Som ikke er en numerisk sortering efter min mening for jeg har brug for den som
2,3,4,5,6,7,8,9,10,11,12,108

Nogen der kan hjælpe mig hvor jeg enten kan finde sådan en funtion henne eller hvordan den skal laves for at virke korrekt.

På forhånd tak.