office系列 word编辑软件
电脑
1 软件设置:关闭杀毒软件的自我防护功能。
自我复制功能演示 打开或新建一个Word文档,ALT+F11快捷键进入宏编写窗口 在Project|Microsoft word对象|ThisDocument中编辑实验源代码
输入正确答案后文档将打开为如下图:
若输入结果错误文档将自动复制20篇:
清除宏病毒: 对受感染的文档,在Word编辑页面按Alt+f11快捷键进入宏的编辑窗口,分别删除Nomal和Project里的this document,将其中的代码删除并保存,再次打开文档后宏病毒将不再运行。
1、 自己编写一个宏宏内容:在Word文档中显示现在距离高考的时间代码:Sub Timer()s = DateDiff('s', Now, DateSerial(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
编译运行
运行结果: