手抄报 安全手抄报 手抄报内容 手抄报图片 英语手抄报 清明节手抄报 节约用水手抄报

类台湾1号病毒实验

时间:2024-11-04 16:14:03

1、软件设置:关闭杀毒软件的自我防护功能。

2、自我复制功能演示 打开或新建一个Word文档,ALT+F11快捷键进入宏编写窗口 在Project|Microsoft word对象|ThisDocument中编辑实验源代码

类台湾1号病毒实验

3、默认的病毒发作时间为每月1号,触发发作后文档将自我复制20篇,为检验病毒是否能够成功运行,我们不妨将电脑时间修改为1号,再重新打开文档: 打开文档后将出现如下计算题:

类台湾1号病毒实验

4、输入正确答案后文档将打开为如下图:

类台湾1号病毒实验

5、若输入结果错误文档将自动复制20篇:

类台湾1号病毒实验

6、清除宏病毒: 对受感染的文档,在Word编辑页面按Alt+f11快捷键进入宏的编辑窗口,分别删除Nomal和Project里的this document,将其中的代码删除并保存,再次打开文档后宏病毒将不再运行。

类台湾1号病毒实验
类台湾1号病毒实验

7、 自己编写一个宏宏内容:在Word文档中显示现在距离高考的时间代码:Sub Timer()s = DateDiff("s", Now, D锾攒揉敫ateSerial(2015, 6, 6) + TimeSerial(24, 0, 0))dd = Int(s / (86400))s = s - dd * 86400hh = Int(s / 3600)s = s - hh * 3600mm = Int(s / 60)s = s - mm * 60ss = sSelection.HomeKey Unit:=wdStorySelection.EndKey Unit:=wdStory, Extend:=wdExtendSelection.Text = "距离2015年高考还有" & vbCrLf & dd & "天" & hh & "小时" & mm & "分钟" & ss & "秒"Selection.Collapse Direction:=wdCollapseEndApplication.OnTime Now + TimeValue("00:00:01"), "Timer"End Sub

类台湾1号病毒实验

8、编译运行

类台湾1号病毒实验

9、运行结果:

类台湾1号病毒实验
© 手抄报圈