源码网商城,靠谱的源码在线交易网站 我的订单 购物车 帮助

源码网商城

VBS中的字符串连接的性能问题

  • 时间:2021-09-19 16:14 编辑: 来源: 阅读:
  • 扫一扫,手机访问
摘要:VBS中的字符串连接的性能问题
当然,对于少量的字符串连接,效率并没有对程序造成多大影响,现在让我们考虑一个极端的问题:将1到100000之间的所有数字连接成一个字符串。 最简单的解决方案是直接使用&连接:
[u]复制代码[/u] 代码如下:
begin = Timer For i = 1 To 100000 str = str & CStr(i) Next WScript.Echo str finish = Timer WScript.Echo finish - begin
但是这个程序在我电脑上需要运行60.648秒,效率太低。换一种方案,用数组来解决:
[u]复制代码[/u] 代码如下:
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倍。在这个问题中数组的大小是可以事先确定的,如果不能预知数组的大小就必须使用动态数组。我水平比较低,不会用动态数组,有没有更简单的方法呢?答案是有,那就是字典:
[u]复制代码[/u] 代码如下:
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函数+数组。 原文:http://demon.tw/programming/vbs-string-concatenation.html
  • 全部评论(0)
联系客服
客服电话:
400-000-3129
微信版

扫一扫进微信版
返回顶部