一个杀死EXCEL的程序

检测并处理Excel进程代码示例

最新推荐文章于 2025-06-11 22:07:18 发布

原创最新推荐文章于 2025-06-11 22:07:18 发布 · 859 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#excel #string #exe #each

vb.net 专栏收录该内容

7 篇文章

订阅专栏

博客给出一段代码，用于检测特定程序进程。通过遍历进程，获取进程名和ID，若进程名为Excel（可替换为其他程序名），则获取其开始运行时间，还可进行终止进程等操作。

Dim pTemp As System.Diagnostics.Process()
pTemp = System.Diagnostics.Process.GetProcesses()
Dim pTempProcess As System.Diagnostics.Process

For Each pTempProcess In pTemp
Dim sProcessName As String = pTempProcess.ProcessName
Dim sProcessID As Int32 = pTempProcess.Id
'将EXCEL改成你需要检测的程序名，不要加exe
If StrComp("excel", sProcessName, CompareMethod.Text) = 0 Then
Dim pProcessTemp As System.Diagnostics.Process
'得到进程的开始运行时间
Dim sStartTime As String = pTempProcess.StartTime.ToString ( )
pProcessTemp = Process.GetProcessById(sProcessID)
' MessageBox.Show
'pProcessTemp.Kill()
' pProcessTemp.Close()
End If
Next

非原创