VBA 如何激活后台进程?

来源:百度知道 编辑:UC知道 时间:2024/06/05 14:41:43
我有个无线宽带连接程序"C:\Program Files\Chinatelecom C+W\C+WClient.exe"
运行这个宽带连接后,我一般把它最小化,这个时候他在系统后台运行,我用AppActivate "无线宽带"这个语句无法激活此窗口
然后我又用kuandailink = Shell("C:\Program Files\Chinatelecom C+W\C+WClient.exe"),去打开此应用程序显示程序已经在运行,出错了!vba进程到此无法继续下去!
请问高手有何方法解决这个问题?
我的目的是在工作结束后,激活这个后台宽带连接,并关闭连接节约上网费用!

使用以下代码申明api,要放在模块的最前面
Declare Function FindWindow Lib "User32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
使用语句完成显示:
ShowWindow FindWindow(vbNullString, "无线宽带"),5