Author:水如烟
出现这个情形,是在重写了Finalize并在里面含有调用Com对象的代码,同时在销毁对象前没有显式释放Com对象。
解决的办法是,显式调用释放代码。
如:
Public Sub Quit()
...
End Sub
Protected Overridable Sub Dispose(ByVal disposing As Boolean)
If Not Me.disposedValue Then
If disposing Then
If gApplicationComObject IsNot Nothing Then
Me.Quit()
End If
End If
End If
Me.disposedValue = True
End Sub
Public Sub Dispose() Implements IDisposable.Dispose
Dispose(True)
GC.SuppressFinalize(Me)
End Sub
使用时:
一是
MyCom.Quit()
或是
Using MyCom
...
End Using
不知我的认识是否正确,仅供参考.