'关闭进程 Public Shared Sub KillWord() Dim AllPro As Process() = Process.GetProcesses Dim temp As Process Dim i As Integer For i = 0 To AllPro.Length - 1 If AllPro(i).ProcessName.ToLower = "****" Then (****表示你要关闭的进程名) Try AllPro(i).Kill() Catch ex As Exception Dim a As String = ex.Message Exit Sub End Try End If Next End Sub 我在想,你关掉了Sql Server.ext进程,还能还原吗?