标题:[求助] VB6内存溢出
取消只看楼主
William1949
Rank: 3Rank: 3
等 级:新手上路
威 望:8
帖 子:109
专家分:0
注 册:2009-3-17
结帖率:70%
 问题点数:0 回复次数:1 
[求助] VB6内存溢出
程序代码:
Private Type ExtData
    Date            As Long
    Rec(1 To 13)    As Single
End Type
Private ExtRec()     As ExtData

Private Sub Form_Load()
    ReDim ExtRec(4096, 1895) As ExtData
End Sub


2017-02-05 10:48
William1949
Rank: 3Rank: 3
等 级:新手上路
威 望:8
帖 子:109
专家分:0
注 册:2009-3-17
得分:0 
回复 2楼 风吹过b
请问:

“17*4097*1896” 的 17 是什么?

17*4097*1896 应该等于:132054504。 “131957808字节”怎么算?

 我要上改成:ReDim ExtRec(4096, 1712) As ExtData,就不会溢出了,
我要读一个数据文件,共有1895个记录,每个记录的字段长度是4096

多谢!
2017-02-05 11:34



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-473996-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 1.349941 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved