Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim plist() As Process
Dim ppo As System.Diagnostics.Process
plist = Process.GetProcesses
For Each ppo In plist
If ppo.ProcessName = "POWERPNT" Then
ppo.Kill()
End If
Next
End Sub
End Class
vb.net 结束ppt程序
最新推荐文章于 2022-07-29 14:54:03 发布