@H_403_0@退出VB应用程序,连带退出指定的进程
@H_403_0@Private Sub proExit_Click()
@H_403_0@Shell "cmd /c taskkill /f /im process.exe"
@H_403_0@Unload Me
@H_403_0@End
@H_403_0@End Sub
@H_403_0@
@H_403_0@应用启动cmd程序,不显示cmd窗口
@H_403_0@Private Sub startDemonProcess()
@H_403_0@On Error Resume Next
@H_403_0@Dim ProcessPath As String
@H_403_0@ProcessPath = App.Path & "\process.exe"
@H_403_0@Dim RetVal
@H_403_0@RetVal = Shell(ProcessPath,vbHide) '参数vbHide用于设置不显示启动的程序窗口
@H_403_0@End Sub