标题:用 load 方法加载的控件,在窗体关闭时,如何释放呢?(有可能不全load)
只看楼主
ggyy66
Rank: 1
等 级:新手上路
帖 子:427
专家分:0
注 册:2007-8-14
结帖率:86.25%
已结贴  问题点数:20 回复次数:3 
用 load 方法加载的控件,在窗体关闭时,如何释放呢?(有可能不全load)
用 load 方法加载的控件,在窗体关闭时,如何释放呢?(有可能不全load)

我动态加载控件,但是不一定一定加载,所以关闭窗体时不好判断是不是已经加载了,
所以不知如何释放资源。
Option Explicit

Private Sub cmdadd_Click()
    Dim i As Integer
    Dim cmdw As Integer
    cmdw = cmd1(0).Width
    cmd1(0).Visible = True
    For i = 1 To 10
        Load cmd1(i)
        cmd1(i).Top = cmd1(i - 1).Top
        cmd1(i).Left = cmd1(i - 1).Left + cmdw + 10
        cmd1(i).Visible = True
    Next
End Sub

Private Sub Form_Unload(Cancel As Integer)

'''下列代码有错误:   
    Dim i As Integer
'    For i = 1 To 10
'        Debug.Print i
'        If cmd1(i) Is Nothing Then
'            Debug.Print "unload"
'            Unload cmd1(i)
'        Else
'            Debug.Print "no unload"
'        End If
'    Next

End Sub
搜索更多相关主题的帖子: load 加载 控件 窗体 释放 
2009-08-02 22:38
三断笛
Rank: 10Rank: 10Rank: 10
等 级:贵宾
威 望:31
帖 子:1621
专家分:1617
注 册:2007-5-24
得分:5 
直接把窗体unload就可以了
2009-08-02 23:09
ggyy66
Rank: 1
等 级:新手上路
帖 子:427
专家分:0
注 册:2007-8-14
得分:0 
以下是引用三断笛在2009-8-2 23:09的发言:

直接把窗体unload就可以了

动态加载的控件会自动释放吗?
我担心存在内存泄露的问题出现.

2009-08-03 09:40
三断笛
Rank: 10Rank: 10Rank: 10
等 级:贵宾
威 望:31
帖 子:1621
专家分:1617
注 册:2007-5-24
得分:15 
unload会自动卸载窗体上的控件
2009-08-03 12:40



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




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

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