如何用VB语句结束系统进程?

'添加窗体Form1,按钮Command1,然后添加如下代码:
Private Sub Command1_Click()
    terminateProcess "notepad.exe" '结束记事本
    MsgBox "结束进程成功!"
End Sub
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'功能：结束指定名称的所有进程
'函数名：terminateProcess
'入口参数：proName，要结束的进程名
'备注：sysdzw 于 10:33 2007-08-19 提供
''''''''''''''''''''''''''''''''''''''''''''''&#