VBS中的字符串连接的性能问题
来源: 阅读:1463 次 日期:2016-07-07 15:05:02
温馨提示: 小编为您整理了“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倍,但是还是比&快多了,而且用起来比数组方便。

总结:&连接符号的效率是比较低的,在连接少量字符串时可以使用,但是在大量字符串连接时应该使用Join函数+数组。

更多信息请查看脚本栏目
由于各方面情况的不断调整与变化, 提供的所有考试信息和咨询回复仅供参考,敬请考生以权威部门公布的正式信息和咨询为准!
关于我们 | 联系我们 | 人才招聘 | 网站声明 | 网站帮助 | 非正式的简要咨询 | 简要咨询须知 | 加入群交流 | 手机站点 | 投诉建议
工业和信息化部备案号:滇ICP备2023014141号-1 云南省教育厅备案号:云教ICP备0901021 滇公网安备53010202001879号 人力资源服务许可证:(云)人服证字(2023)第0102001523号
云南网警备案专用图标
联系电话:0871-65317125(9:00—18:00) 获取招聘考试信息及咨询关注公众号:hfpxwx
咨询QQ:526150442(9:00—18:00)版权所有:
云南网警报警专用图标
Baidu
map