关于内存释放的问题,解决不了了

cqbonny 2003-12-19 02:34:53
Dim SendByte() As Byte
SendByte这个东西怎么释放,大家给点意见。
...全文
9 点赞 收藏 10
写回复
10 条回复
切换为时间正序
请发表友善的回复…
发表回复
xiaoxinghappy 2003-12-19
数组用 Earse 释放
回复
脆皮大雪糕 2003-12-19
同意冰的做法,我以前也以为vb会自动清理,其实不然。更加严重的是,如果你的对象中含有动态数组并且没有显式释放,那么你的对象将无法释放,即使用set object=nothing也没有用。我以前做的一个项目就是因为这个原因能够在短时间内将内存全部吃光,找了半个月才发现问题所在
回复
LemonRain 2003-12-19
晕~~~
回复
cqbonny 2003-12-19
shwen(shwen) 就是没有释放呀,好郁闷

程序运行了一个星期,用了内存1.5G
回复
shwen 2003-12-19
不用释放,VB会自动释放为动态数组分配的内存。
回复
cqbonny 2003-12-19
PrettyMurphy(土豆) :不行
回复
SoHo_Andy 2003-12-19
实例
Private Sub Command1_Click()
Dim n As Long
Dim arrBytes() As Byte

Open "d:\draw.ico" For Binary As 1
n = LOF(1)
ReDim arrBytes(1 To n) As Byte
Get 1, , arrBytes
Close 1

Erase arrBytes

End Sub
回复
PrettyMurphy 2003-12-19
set SendByte=nothing 不行?
回复
cqbonny 2003-12-19
Erase SendByte

这样写?????
回复
SoHo_Andy 2003-12-19
Erase 数组名[,数组名...]
回复
发动态
发帖子
VB基础类
创建于2007-09-28

7451

社区成员

VB 基础类
申请成为版主
社区公告
暂无公告