[VBA程序]：为什么vb的字符合并运算符“&”运行效率很低

god

为什么vb的字符合并运算符“&”运行效率很低

&的运行效率比加减乘除低多了，有兴趣的做个循环运算，相差十几倍，我用写硬盘文件的方式来合并字符串都要快得多，这是什么原因？大家有什么更好的方法合并字符串？因为我要做大量的字符串合并运算。

efan2000

涉及到内存分配的原因，A=A & B，它要先分配一个容纳A和B长度的内存空间，然后执行字符串连接的操作，最后释放原来A的内存空间。所以，对于大量的＆操作时，要预先分配一块足够大的空间。如：

2. 
   
3.   [FONT=courier new]
   
4. Sub test()
   
5.     Dim A As String
   
6.     Dim B As String
   
7.     B = "1234567890"
   
8.     Dim i As Integer
   
9.     Debug.Print Now
   
10.     For i = 1 To 10000
    
11.         A = A & B
    
12.     Next
    
13.     Debug.Print Now
    
14.     A = String(100000, Chr(0))
    
15.     For i = 1 To 10000
    
16.         Mid(A, (i - 1) * Len(B) + 1, Len(B)) = B
    
17.     Next
    
18.     Debug.Print Now
    
19. End Sub
    
20. 测试结果：
    
21. 2004-06-03 14:35:14
    
22. 2004-06-03 14:35:19
    
23. 2004-06-03 14:35:19
    
24.   [/FONT]
    

<br />   [FONT=courier new]<br /> Sub test()<br />     Dim A As String<br />     Dim B As String<br />     B = "1234567890"<br />     Dim i As Integer<br />     Debug.Print Now<br />     For i = 1 To 10000<br />         A = A & B<br />     Next<br />     Debug.Print Now<br />     A = String(100000, Chr(0))<br />     For i = 1 To 10000<br />         Mid(A, (i - 1) * Len(B) + 1, Len(B)) = B<br />     Next<br />     Debug.Print Now<br /> End Sub<br /> 测试结果：<br /> 2004-06-03 14:35:14 <br /> 2004-06-03 14:35:19 <br /> 2004-06-03 14:35:19<br />   [/FONT]<br />

god

你真是太厉害了，
我比较了一下，两个速度相差大约150倍
你的电脑有点慢呢，恐怕是奔3吧。