VBS中的字符串連接的性能問題

字號:


    當(dāng)然,對于少量的字符串連接,效率并沒有對程序造成多大影響,現(xiàn)在讓我們考慮一個極端的問題:將1到100000之間的所有數(shù)字連接成一個字符串。
    最簡單的解決方案是直接使用&連接:
    代碼如下:
    begin = Timer
    For i = 1 To 100000
    str = str & CStr(i)
    Next
    WScript.Echo str
    finish = Timer
    WScript.Echo finish - begin
    但是這個程序在我電腦上需要運(yùn)行60.648秒,效率太低。換一種方案,用數(shù)組來解決:
    代碼如下:
    begin = Timer
    Dim arr(100000)
    For i = 1 To 100000
    arr(i) = i
    Next
    str = Join(arr, "")
    WScript.Echo str
    finish = Timer
    WScript.Echo finish - begin
    這次只用了0.742秒,大概快了60倍。在這個問題中數(shù)組的大小是可以事先確定的,如果不能預(yù)知數(shù)組的大小就必須使用動態(tài)數(shù)組。我水平比較低,不會用動態(tài)數(shù)組,有沒有更簡單的方法呢?答案是有,那就是字典:
    代碼如下:
    begin = Timer
    Set oDic = CreateObject("scripting.dictionary")
    For i = 1 To 100000
    oDic.Add i, CStr(i)
    Next
    str = Join(oDic.Items, "")
    WScript.Echo str
    finish = Timer
    WScript.Echo finish - begin
    運(yùn)行時間為1.593,是數(shù)組的2倍,但是還是比&快多了,而且用起來比數(shù)組方便。
    總結(jié):&連接符號的效率是比較低的,在連接少量字符串時可以使用,但是在大量字符串連接時應(yīng)該使用Join函數(shù)+數(shù)組。