主题：外部应用程序

Dim Proc As New Process '定义一个新的Process
proc.file = "C:\Users\Lenovo\AppData\Local\Google\Chrome\Application\chrome.exe"
proc.Arguments = "http://www.baidu.com"
Proc.Start()
proc.Close
msgbox(1)

老师好：如何才能关闭google浏览器呢？以上代码不能关闭google浏览器。

参考代码

Dim Proc As New Process '定义一个新的Process
proc.file = "C:\Program Files\Google\Chrome\Application\chrome.exe"
proc.Arguments = "http://www.baidu.com"
Proc.Start()
msgbox(1)

Dim ps As  System.Diagnostics.Process() = System.Diagnostics.Process.GetProcesses()
For Each p As System.Diagnostics.Process In ps
    output.show(p.processName)
    If ("chrome" = p.ProcessName)
        msgbox(p.MainWindowTitle)
        p.kill
    End If
Next