The following code shows how you can kill a process using vb6 code. 
Example
Private Sub cmdKill_Click()
‘ Usage:
Dim pID As Long
Dim i As Integer
Dim strExe As String
strExe = “calc.Exe”
For i = 0 To 4
pID = Shell(strExe, vbNormalFocus)
Next i
‘Five instances of notpade.exe is now created
Debug.Assert False
MsgBox “It is ” & _
KillApp(strExe) & _
” that all instances of ” & [...]