怎样在退出程序时让调用的ActiveX EXE在进程中消失？

Question

自己做了一个ActiveX EXE，然后在另一个程序中调用
退出时我用的Set XXX = Nothing
可是打开任务管理起看，还是在里面运行着呢
怎么才能让它完全退出来呢？

Answer 1

程序一进入就运行c:\calc.exe(相当于你的exe),程序退出时 calc.exe同步退出,(当然进程里面也会退出)Private Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long
Private Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As Long
Private Declare Function TerminateProcess Lib "kernel32" (ByVal hProcess As Long, ByVal uExitCode As Long) As Long
Const PROCESS_TERMINATE = 1
Dim Fname$, ProID&, hProcess&Private Sub Form_Load()
   Fname = "c:\calc.exe" '改为你的 exe
   If Dir(Fname) <> "" Then ProID = Shell(Fname, vbNormalFocus)
End SubPrivate Sub Form_Unload(Cancel As Integer)
   On Error Resume Next
   If Dir(Fname) <> "" Then
      hProcess = OpenProcess(PROCESS_TERMINATE, False, ProID)
      TerminateProcess hProcess, 1
      CloseHandle hProcess
   End If
   End
End Sub

Answer 2

在activeX exe里编个 closeMe等类似的函数释放资源..

Answer 3

2楼老刘给的代码,和3楼的思路都可以,看楼主想怎么做了..ActiveX EXE实际上就是Activex DLL 只是一个有进程一个没进程而已