请大神赐教，关于VBA字符变量容量问题

yrzd7777 · 发表于 2024-9-12 10:29

我现在处理一个json数据，这个数据比较大，我得先读入到变量里再解析，以前处理没有任何问题。但这几天处理的数据有点大，有100多M，读入时会提示接收数据的变量内存溢出，我看了介绍说字符变量最大可以是两亿，但我这个还不到两亿，当然以后也可能处理超过两亿的数据。现在的问题是数据读不进变量就没法处理，如果拆分成多个变量接收的话，解析就会出问题，因为分割的部分不是完整的json格式，请大神们给支个招，我也是学习不深入，想不到解决办法。

大灰狼1976 · 发表于 2024-9-12 12:35

试过5亿都没问题啊

Sub test()
Dim s As String
s = String(500000000, "1")
MsgBox Len(s)
End Sub

复制代码

kevinchengcw · 发表于 2024-9-12 13:29

会不会是其他原因

yrzd7777 · 发表于 2024-9-12 15:56

我也不清楚为什么我这里才刚超一亿就不行了。

yrzd7777 · 发表于 2024-9-12 16:06

我这个office是32位的2010版本，与这个有关系？

smuuwl · 发表于 2024-9-12 16:25

挺好奇，什么业务操作，有上亿长度字符串。

yrzd7777 · 发表于 2024-9-12 16:35

我用另一台机器试了，office2016，64位，确实9亿也没有问题。不过就是针对我这台机器来说，不升级office的话还有什么变通的方法吗？

kevinchengcw · 发表于 2024-9-12 16:45

上百兆的Json文本也是奇葩，可以自己写个分段读取进行解析的代码

yrzd7777 · 发表于 2024-9-13 07:52

楼上的能给个分段解析json的例子吗，分段读取我会，我上面图片里就是分段读取的数据，怎么分段解析呢？分段读取的我都不清楚字符截取到哪里了，截取的字符也不符合json格式，没法解析，请老师给个思路或来一小段简单的例子。

kevinchengcw · 发表于 2024-9-13 08:17

yrzd7777 发表于 2024-9-13 07:52
楼上的能给个分段解析json的例子吗，分段读取我会，我上面图片里就是分段读取的数据，怎么分段解析呢？分段 ...

分成能读取的合适长度，先对段内完整的json内容进行提取替换，使总长度减小，建立替换内容的对照表，再读取后面的拼接上来继续提取替换，最终总的json文本长度大幅减小，达到可直接处理的长度即可
比如：
{"a":"一段n万字符长度的文本"}
替换为
{"a":"$1$"}
对照表里有记录
$1$=一段n万字符长度的文本

大体就是这个意思
你的json那么长，估计有很多很长的文本内容吧

		自动登录	找回密码
密码			免费注册

[求助] 请大神赐教，关于VBA字符变量容量问题