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

cqbonny 2003-12-19 02:34:53
Dim SendByte() As Byte
SendByte这个东西怎么释放,大家给点意见。
...全文
44 10 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
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 数组名[,数组名...]

7,785

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧