释放Com对象的方法.

Dim obj As Object
obj = CreateObject("Excel.Application")
obj.Visible = True
obj.quit()

Marshal.ReleaseComObject(obj)