溫馨提示×
您好，登錄后才能下訂單哦！
點擊 登錄注冊 即表示同意《億速云用戶服務條款》
您好，登錄后才能下訂單哦！
這篇文章將為大家詳細講解有關如何解決VBS中字符串連接的性能問題，小編覺得挺實用的，因此分享給大家做個參考，希望大家閱讀完這篇文章后可以有所收獲。
當然，對于少量的字符串連接，效率并沒有對程序造成多大影響，現在讓我們考慮一個極端的問題：將1到100000之間的所有數字連接成一個字符串。
最簡單的解決方案是直接使用&連接：
復制代碼 代碼如下:
begin = Timer
For i = 1 To 100000
str = str & CStr(i)
Next
WScript.Echo str
finish = Timer
WScript.Echo finish - begin
但是這個程序在我電腦上需要運行60.648秒，效率太低。換一種方案，用數組來解決：
復制代碼 代碼如下:
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倍。在這個問題中數組的大小是可以事先確定的，如果不能預知數組的大小就必須使用動態數組。我水平比較低，不會用動態數組，有沒有更簡單的方法呢？答案是有，那就是字典：
復制代碼 代碼如下:
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
運行時間為1.593，是數組的2倍，但是還是比&快多了，而且用起來比數組方便。
關于“如何解決VBS中字符串連接的性能問題”這篇文章就分享到這里了，希望以上內容可以對大家有一定的幫助，使各位可以學到更多知識，如果覺得文章不錯，請把它分享出去讓更多的人看到。
免責聲明：本站發布的內容（圖片、視頻和文字）以原創、轉載和分享為主，文章觀點不代表本網站立場，如果涉及侵權請聯系站長郵箱：is@yisu.com進行舉報，并提供相關證據，一經查實，將立刻刪除涉嫌侵權內容。
