请问在VB中如何关闭用shell调用的外部程序呢?
1个回答
展开全部
可以利用Shell函数调用外部程序后返回PID值的功能将程序关掉,在获得外部程序的PID后,你可以调用命令taskkill或ntsd命令关闭程序,也可以用API编程实现,这里我举个简单的例子(用ntsd命令,格式为 ntsd -c q -p pid):
Dim x '声明外部变量x,作为记录外部程序PID值的变量
Private Sub Command1_Click() '用Command1按钮调用一个外部程序
x = Shell("cmd.exe")
End Sub
Private Sub Command2_Click() '用Command2按钮调用ntsd将其关闭
Dim command As String
command = "ntsd -c q -p " & Str(x)
Shell command, vbHide
End Sub
Dim x '声明外部变量x,作为记录外部程序PID值的变量
Private Sub Command1_Click() '用Command1按钮调用一个外部程序
x = Shell("cmd.exe")
End Sub
Private Sub Command2_Click() '用Command2按钮调用ntsd将其关闭
Dim command As String
command = "ntsd -c q -p " & Str(x)
Shell command, vbHide
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询