高级办公软件实验报告

实 验 报 告姓 名： 刘 欢 学 号： 10111010 专 业： 市场营销 班 级： 10管11 课 程： 高级办公软件 江 苏 师 范 大 学 管 理 学 院高级办公软件课程实验报告实验序号04实验名称Word宏与自动图文集指导老师宋庆军实验地点2#324实验日期时间2012/10/31一、实验目的及要求1. 掌握利用宏自动删除回车符和空行的方法；2. 掌握让ord开口说话的方法；3. 掌握关于标注与不标注按钮的制作的方法。二、实验环境Windows xp、MS Office 2003三、实验内容与步骤（一）利用宏自动删除回车符和空行1.运行Word，并新建一个文件。打开“工具”菜单栏，选择“宏”，在二级菜单中选择“录制新宏”2.出现“录制宏”对话框，随便为宏取个名按“确定”即可，这时会出现一个悬浮“停止录”工具，宏录制就已经开始了。3.打开“编辑”菜单栏，选择“替换”，出现“查找和替换”对话框。4.用鼠标在“查找内容”栏内点一下，再点击“高级”，再按“特殊字符”，选择两次“手动换行符”，在“替换为”栏内选“特殊字符”的“段落标志”，再选全部替换，点击“确定”。5.紧接着，用鼠标在“查找内容”栏内点一下，输入一个空格。用鼠标在“替换为”栏中点一下，删除里面的全部内容，什么都不输入。再点击“全部替换”，点击“确定”。(删除所有的空格)6.关闭“替换”对话框，在“编辑”菜单栏中选“全选”，再在“格式”中选“段落”，打开“段落”对话框，在“缩进和间距”的“特殊格式”选“首行缩进”，“度量值”为两个字符。在字体中选“宋体”、字号中选“小四号字”。这一步骤是设置字体、字号和进行排版7.在悬浮的“停止录”工具条上按“停止”钮，到此宏录制的工作结束（二）让ord开口说话1.建立窗体启动Word，单击菜单“工具宏Visual Basic编辑器”，也可以按快捷键Alt+F11切换到Visual Basic编辑器窗口;单击菜单“插入用户窗体”，系统建立一个默认样式的用户窗体。对窗体可拖动其右、下边的小方框来可改变大小，本例中根据功能需要将窗体拖为扁长形状。单击菜单“视图属性窗口”，在属性窗口中修改窗体的几个主要属性值。在属性列表中选定“名称”属性，输入“Xiaohua”，然后选定“Caption”属性，输入“开心一刻”。现在，我们便能看到一个标题为“开心一刻”的窗体了。2.建立控件创建文本框：在“工具箱”中选择“AB|”样式的按钮，在窗体上拖动建立一个文本框，并用鼠标调整其位置、大小，若需精确调整，也可在属性窗口中调整“Height”、“Width”等属性值。很关键的一点是要将“MultiLine”属性值设为“True”，它的作用是使文本框能显示多行文本。 创建命令按钮：在“工具箱”中选择命令按钮（鼠标悬停会显示“命令按钮”字样），在窗体上的文本框右边拖动建立一个命令按钮，调整好大小并修改其“Caption”属性值为“下一条”，接着依次建立“关闭”、“关于”创建复选框：在“工具箱”中选择复选框按钮，在窗体上的文本框下方单击鼠标左键，便创建了一个复选框，修改其“Caption”属性值为“下次启动时不显示”。 创建标签：可在窗体的空余部分以“标签”的形式显示作者等信息。3.编写代码 单击菜单“视图代码”或按F7键，即切换到代码窗口，可在代码窗口的声明部 分（顶端空白区域）开始录入代码。接下来要编写进入、离开窗体时、单击“下一条”、“关闭”等按钮时的事件过程，当发生事件时将调用公用的Sub过程来执行功能。4.完善功能创建宏的方法是：单击菜单“工具宏”，在“宏名”文本框中输入宏名“Autoexec”，接着单击“创建”，录入完成以下代码：Sub Autoexec() autoexec Macro 宏在 2006-9-24 由 宋庆军 录制 On Error GoTo err 出错处理 Open “d:xiaohua.d1 For Input As #1 Input #1, Ask$ 读取判断因子 Close #1 If Ask$ = yes Then Xiaohua.Show 若判断因子为yes则运行xiaohua窗体err: End SubSub 笑话() Xiaohua.Show xiaohua为第一步中建立的窗体名称End Sub单击“工具自定义”，选择“命令”选项卡，在“类别”框中找到“宏”，将右边的“命令”框中“Normal.NewMacros.笑话”拖入菜单“工具”中，并对拖入的命令点右键，在“命名”文本框中重命名为“开心一刻”。5. 至此，全部工作完成。当Word启动时就能看到笑话了，平时要阅读笑话时，单击菜单“工具开心一刻”即可。若选中了“下次启动时不显示”复选框，以后也可随时使用它的菜单命令来恢复显示。续表一(三)关于标注与不标注按钮的制作 1.建内容为和的两个自动图文集选择插入 符号，在“字体”列表中选择“Wingdings”在找到插入文档空白中 将分别保存在“自动图文集”中：选择“”，按Alt+F3，为自动图文集的词条命名为“不标注”。用相同的方法为“”建立一个自动图文集，名字为“标注”在文档中删除上述二个符号2.录制两个插入自动图文集的宏： 选择“工具”“宏”“录制新宏”，输入“宏名”：“插入不标注符号”，保存在当前文件，按确定。选择“插入”“自动图文集”“正文”，选“不标注”，停止录制宏。完成录制“插入不标注符号”的操作。按上述方法再录制一个“插入标注符号”的宏3.制作调用两个宏的按钮选择“插入”“域”，在“类别”中选“文档自动化”，在“域名”中选择“MacroButton”,在宏名中选“插入标注符号”，在显示文字中填入“不标注”，即域代码为“MacroButton 插入标注符号 不标注”。用同样的方法制作一个“标注”的按钮，其域代码为 “MacroButton 插入不标注符号 标注”选择刚插入的第二个域，按Alt+F9，选择择最后一项“不标注”，按F3，把“不标注”转换为，把“标注”转换为，再按一次Alt+F94.使二按钮合二为一，相互调用选域符号“”，按Alt+F3，输入“不标注”，然后选“是”。 用同样的方法，选“”，按Alt+F3，输入“标注”，然后选“是”。续表二5.选择，剪切后分别复制到Urgent、For Review等前。四、实验体会与建议1.老师说让word开口讲笑话，我当时特别奇怪，word怎么会讲笑话呢？通过这次实验课，在老师的指导下，我真的让word开口讲笑话了，很有成就感；2.以前看到标注不标注符号觉得很神奇，从未想过自己也可以做出来，而且还可以做出各种形式的图片转换，通过自己的手做出来的东西才真的属于自己。五、老师评语老师签名： 日期： 成绩：