如何监视指定标题的EXE程序是否在运行!

Question

例如 c:\a.exe    标题为"播放列表"
步骤:
首先检测c:\a.exe是否在运行,如果在运行
然后检测它的标题是否为"播放列表"
如果是 sure=true 否则为false!

Answer 1

'先添加一个Timer控件Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Sub Form_Load()
Timer1.Interval = 1000
End SubPrivate Sub Timer1_Timer()
plist = FindWindow(vbNullString, "播放列表")
If plist <> "0" Then
sure = True
MsgBox plist
Else
sure = False
End If
End Sub

Answer 2

楼上的正解,通过findwindow来做!