VB用什么代码可以确保梦幻西游正在运行？

简单啊~~有很多思路，但我是VB刚学，没办法写出来~]

你可以通过检查进程嘛~~

或者通过检查句柄~~我记得以前做了个QQ群骂人的工具~

就是检查到 上面有发现 “群”字```就开始执行一写程序``

这个简单
用个TIMER控件
不断的检查更新程序的进程是否运行
如果运行直接杀掉就OK了
不会的话给我发站内信息
呵呵

不好啊～不更新很多资料看不到啊～还是乖乖更新吧

我的思路是看看梦幻西游的进程运行了没。
我们假设梦幻西游的进程名为my.exe

需要的控件：一个label1，一个command

完整的代码我都写好嘞：直接复制就行嘞：

Function CheckApplicationIsRun(ByVal szExeFileName As String) As Boolean
On Error GoTo Err
Dim WMI
Dim Obj
Dim Objs
CheckApplicationIsRun = False
Set WMI = GetObject("WinMgmts:")
Set Objs = WMI.InstancesOf("Win32_Process")
For Each Obj In Objs
If InStr(UCase(szExeFileName), UCase(Obj.Description)) <> 0 Then
CheckApplicationIsRun = True
If Not Objs Is Nothing Then Set Objs = Nothing