以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]求助关于电脑里是否已打开QQ进程的函数以及打开指定路径程序  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=44649)
--  作者：zhengboxin
--  发布时间：2014/1/6 9:54:00
--  [求助]求助关于电脑里是否已打开QQ进程的函数以及打开指定路径程序

我想判断下我的电脑是否已打开QQ，IF代码该如何写,如果没打开，则打开D:\\QQ.exe

 

帮助里没有关于这方面的说明，只能再次麻烦各位老师了，谢谢
--  作者：Bin
--  发布时间：2014/1/6 9:58:00
--  
Dim ps As  System.Diagnostics.Process() = System.Diagnostics.Process.GetProcessesByName("QQ")
If ps.length>0 Then
    MessageBox.show("已经打开")
else
   Dim Proc As New Process \'定义一个新的Process
Proc.File = "D:\\QQ.exe" \'指定要打开的文件
Proc.Start()
End If
--  作者：有点酸
--  发布时间：2014/1/6 10:00:00
--  

这是你自己的的答案，之前你贴出来的：

system.diagnostics.process.GetProcessesByName("QQ")(0).kill

这样就可以了，之前有人提过，我找到了

 

 

整理一下可就是你要的：

if  system.diagnostics.process.GetProcessesByName("QQ").Length = 0 Then

    http://www.foxtable.com/help/topics/0353.htm

end if

 
--  作者：zhengboxin
--  发布时间：2014/1/6 10:01:00
--  
嗯，谢谢Bin老师了，没有疑问了，祝您生活愉快，身体健康
--  作者：zhengboxin
--  发布时间：2014/1/6 10:03:00
--  
嗯，谢谢，我不知道这函数有哪些属性，按Table没有反应