瑞星卡卡安全论坛

如何用vb6结束进程

'Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long

Public Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long

Dim winHwnd As Long

    Dim RetVal As Long

    winHwnd = FindWindow(vbNullString, "字符叠加系统")

    If winHwnd <> 0 Then

        RetVal = PostMessage(winHwnd, &H10, 0&, 0&)

        If RetVal = 0 Then

             
        End If

    Else

       
    End If

假如说我想结束iexplorer.exe进程怎么写？