I suggest you to use the following routine:
Usage:
' Load strEntry
' then:
BubbleSort strEntry(),1,"ASC",1,Ubound(strEntry)
You can keep it as a general sort routine for arrays that are not too big, let's say 100. For larger arrays I would suggest you to use...