VB.NET中,利用API杀掉Excel进程的方法
'objExcel:Microsoft.Office.Interop.Excel对象
Private Sub KillExcel(ByVal objExcel As Object)
Try
If objExcel IsNot Nothing Then
Dim lProcessIdAddr As Integer
Dim iPID As Integer
iPID = GetWindowThreadProcessId(objExcel.Hwnd, lProcessIdAddr)
System.Diagnostics.Process.GetProcessById(lProcessIdAddr).Kill()
End If
Catch ex As Exception
End Try
End Sub