记一次VB Windows程序的启动和退出处理

退出VB应用程序，连带退出指定的进程

Private Sub proExit_Click()

   Shell "cmd /c taskkill /f /im process.exe"   

   Unload Me

End

End Sub

应用启动cmd程序，不显示cmd窗口

Private Sub startDemonProcess()

On Error Resume Next

   Dim ProcessPath As String

   ProcessPath = App.Path & "\process.exe"

   Dim RetVal

   RetVal = Shell(ProcessPath, vbHide)  '参数vbHide用于设置不显示启动的程序窗口

End Sub