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

Question

Dim SendByte() As Byte
SendByte这个东西怎么释放，大家给点意见。

Answer 1

Erase SendByte这样写？？？？？

Answer 2

set SendByte=nothing 不行？

Answer 3

实例
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

Answer 4

shwen(shwen) 就是没有释放呀，好郁闷程序运行了一个星期，用了内存1.5G

Answer 5

同意冰的做法，我以前也以为vb会自动清理，其实不然。更加严重的是，如果你的对象中含有动态数组并且没有显式释放，那么你的对象将无法释放，即使用set object=nothing也没有用。我以前做的一个项目就是因为这个原因能够在短时间内将内存全部吃光，找了半个月才发现问题所在