VB6 关闭自己Shell的程序4月1日 14:15
新建From1（窗体），新建Command1-2（按钮CommandButton），代码：
Dim pid As Double
Private Sub Command1_Click()
pid = Shell("C:\windows\system32\notepad.exe")
End Sub
Private Sub Command2_Click()
Shell ("taskkill /pid " & pid)
End Sub可以打开记事本，和关闭此记事本。
全部回复（0）