第一个问题，用F9来激活命令的话太麻烦了，得用函数，我换个，首先添加个时间控件Timer，然后复制代码
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
Private Sub Form_Load()
Timer1.Enabled = True
Timer1.Interval = 1
End Sub
Private Sub Timer1_Timer()
If GetAsyncKeyState(65) = -32767 Then
If GetAsyncKeyState(17) = -32767 Then
Shell "taskkill.exe /f /im QQ.exe"
End If
End If
End Sub
你控ctrl+a就可以干掉QQ了，我没装VB，没测试，有BUG自己改。
因为没什么时间，而且没装VB，第二个我直接提示你就可以了
不用这么麻烦，你直接一个按钮调用CMD然后WMIC然后PROCESS就可以列出进程以及路径了！
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024