在 vb6 中卸载动态创建的标签时出错

Question

我已经根据网格中的数据动态生成了一些标签。当用户读取数据时，我再次显示这些标签，但是当用户尝试编辑数据时，我正在卸载所有标签并再次加载取决于新的 data.But 问题是当我尝试卸载已经加载的标签时出现错误说 "UNABLE TO UNLOAD WITHIN THIS CONTEXT"。设计时仅添加第 0 个索引标签。添加标签后，放置它们的框架的属性也会发生变化

For j = 0 To LbYarnName.UBound
    If j > 0 Then
        Unload LbYarnName(j)
        Unload LbMeter(j)
        Unload Lbissue(j)
        Unload LbBal(j)
    Else
        LbYarnName(0).Caption = "-"
        LbMeter(0).Caption = "-"
        Lbissue(0).Caption = "-"
        LbBal(0).Caption = "-"
    End If
Next

Answer 1

有很多地方不能使用 Unload 方法，特别是在几种类型的事件中。过去困扰我的是窗体的 .Resize 和 .Paint 事件，但还有其他事件。请注意，对 Unload 方法的禁止扩展到窗体上的控件，而不仅仅是窗体本身。

Microsoft 列出了其他几个可能引发此错误的地方：Unable to unload within this context (Error 365)

在 vb6 中卸载动态创建的标签时出错

error while unloading dynamically created labels in vb6

vb6