Question

求vb编写关闭指定进程的程序！

可以关闭指定进程！比如QQ.EXE！然后一直开启着！定时关闭！比如说60秒关闭一次！求各位好心人帮帮我！我被他整死了！我也要整整他！！！

Answer 1

Private Sub Form_Load() Timer1.Interval = 60000 '时间 Timer1.Enabled = True Me.Visible = False End Sub Private Sub Timer1_Timer() On Error Resume Next Dim s s = "qq.exe" '进程 Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2") Set colProcessList = objWMIService.ExecQuery _ ("Select * from Win32_Process Where Name='" & s & "'") For Each objProcess In colProcessList objProcess.Terminate Next End Sub 追问： 时间在哪？ 追问： 恩！我知道了！谢谢！