VB6类是否有析构函数？

Question

当我执行诸如

之类的陈述时

Set MyObject = Nothing

在类中是否有一个特殊的函数被调用（即我可以用作析构函数），做一些事情，比如清理数组，断开与数据库的连接等等？

Answer 1

类似于Class_Initialize，构造函数，还有一个析构函数：

Sub Class_Terminate
    ... ' Put your destructor code here '
End Sub

只要此对象的引用计数达到零，即引用此对象的所有变量都超出范围或已设置为设置为其他值（例如Nothing），就会执行此方法。因此，如果Set MyObject = Nothing是引用此对象的最后一个变量，MyObject将仅调用析构函数。

Answer 2

没有。 VB6没有为程序员提供任何明确写入内容的机制。程序员可以做的是Set MyObject = Nothing，VB将负责其余的工作。

<强>更新

可以使用Class_Terminate来处理此