String VBA字符串是不可变的吗？
我知道.NET（因此VB.NET）字符串是不可变的。但是，我在Excel 2010中使用VBA 7.0。字符串是不可变的吗？我正在做大量的字符串处理，对于少量的字符串，一些（直接）字符串操作是可以的，但我担心它不会扩展-因为从一个字符串移动到另一个字符串的每个额外字符可能会创建另一个字符串实例。而VB.NET字符串是不可变的，这是System.string、VBA（包括VB6？）强制要求的字符串可以进行变异（例如使用String VBA字符串是不可变的吗？,string,vba,excel,String,Vba,Excel,我知道.NET（因此VB.NET）字符串是不可变的。但是，我在Excel 2010中使用VBA 7.0。字符串是不可变的吗？我正在做大量的字符串处理，对于少量的字符串，一些（直接）字符串操作是可以的，但我担心它不会扩展-因为从一个字符串移动到另一个字符串的每个额外字符可能会创建另一个字符串实例。而VB.NET字符串是不可变的，这是System.string、VBA（包括VB6？）强制要求的字符串可以进行变异（例如使用Mid$）。请参阅并记录操作后的StrPtr结果 原始答案；有文档支持，与反例
Mid$StrPtr原始答案；有文档支持，与反例相反 VBA字符串是不可变的 与VB.NET一样，在不创建新字符串的情况下，无法“替换字符串的一部分”或“附加到”字符串。这是否重要——因为现代计算机非常快——取决于实际的算法、数据和环境
与.NET文档不同，VBA的此类行为参考[变得]难以追踪。从中，我们发现了这颗稀有的小宝石 单个数据值是不可变的。这意味着在VBA环境中没有可导致数据值更改为其他数据值的已定义机制
如果字符串表示“单个数据值”。它们是不可变的，除非它们表现出可变的行为，否则它们不是 例如，通过
mid$（）Dim s As String
s = "ABC"
Debug.Print s, StrPtr(s)
'// -> ABC 122899836
Mid$(s, 1, 1) = "Z"
Debug.Print s, StrPtr(s)
'// -> ZBC 122899836
s = "??" & Right$(s, 1)
Debug.Print s, StrPtr(s)
'// -> ??C 196635748
VBA字符串是可变的。Alex K的回答是错误的，但他对微软VB.Net中的
Mid（）=Mid（）=Mid（a$，1，2）=“hi”Dim n1&, start!, bigstring$
bigstring$ = Space(10 ^ 6)
start = timer() ' in vb.Net this is function with "timer = (DateTime.Now.Ticks - Today.Ticks) / 10000000.0#"
For n1 = 1 To 5000
Mid(bigstring, n1, 1) = "1"
Next
Debug.Print("Elapsed millisecs: " & (timer() - start!) * 1000.0! & " over cycle count of " & n1 - 1)
在超过1兆字节的大字符串上，此技术对于速度至关重要，因此具有可扩展性。在VBA上，它可以在不到一毫秒的时间内完成此操作。然而，在VB.Net中，它的效率低得惊人——同样的测试在3GHz CPU上需要7秒，每次迭代大约1毫秒。随着迭代次数从5000次增加到100万次，VBA仍然只需要40毫秒。VB.Net需要30分钟。提示：在VB.Net中，您可以将
Dim BigByte（）用作byteBigByte=System.Text.Encoding.UTF8.GetBytes（bigstring）Dim str As String:str=“this String”：Debug.Print VarPtr（str），strprtr（str）：Mid（str，3，2）=“at”：Debug.Print VarPtr（str），strprprtr（str）Mid（）=