中文字幕免费精品_亚洲视频自拍_亚洲综合国产激情另类一区_色综合咪咪久久

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

代碼如下:

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中的類？事實(shí)證明，大約的確是可以的，不過(guò)僅限于很少一部分，至于是哪些，自己想吧。

一個(gè)示例程序：

代碼如下:

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

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