算法问题：来着有份！！！

大小排序：
dim sArray() as string
dim iArray() as string
dim sTemp as stringsTemp="4，2，2.1,2.1.1,6,6.7.1........，"
sArray=Split(sTemp,",")dim i as integer 
redim iArray(ubound(sArray))
for i=0 to ubound(sArray)
    iArray(i)=sArray(i)
next' 调用排序算法对iArray数组排序