如果問題就這么結束，那么也就不會有這篇文章。怪我手賤，在Google中輸入“vbs sort”，回車，看到一段代碼，頓時淚流滿面。

代碼如下:

Set outputLines = _

CreateObject("System.Collections.ArrayList")

'add lines

outputLines.Add output

outputLines.Add output

outputLines.Sort()

For Each outputLine in outputLines

stdout.WriteLine outputLine

Next

System.Collections.ArrayList不是.NET里面的類嗎？在VBS中可以使用.NET中的類？事實證明，大約的確是可以的，不過僅限于很少一部分，至于是哪些，自己想吧。

一個示例程序：

代碼如下:

Set ArrayList = _

CreateObject("System.Collections.ArrayList")

Randomize

For i = 1 To 10

n = Int(100 * Rnd + 1)

out = out & n & " "

ArrayList.Add n

Next

WScript.Echo out

WScript.Echo "============================="

ArrayList.Sort()

out = ""

For Each i In ArrayList

out = out & i & " "

Next

WScript.Echo out

當然了，不是每個系統(tǒng)上都裝有.NET Framework的，這種沒有移植性的代碼還是少寫的好。不過有特殊需要的朋友，主要先安裝.net組件。讓腳本可以做更多的事。