Dim ps As System.Diagnostics.Process() = System.Diagnostics.Process.GetProcessesByName("excel")For Each p As System.Diagnostics.Process In ps
If p.MainWindowTitle = Nothing Then p.killNext
加好友 
发短信
Post By：2018/5/7 21:31:00 [显示全部帖子]
