论文部分内容阅读
【中图分类号】G622 【文献标识码】A 【文章编号】2095-3089（2016）07-0222-01
PowerPoint 2010 是Microsoft Office 2010套件中的一款演示文稿图形程序，是功能强大的演示文稿制作软件。学起来既简单又容易上手，也不用掌握复杂的脚本语言就能制作出精美的演示文稿，所以用PPT制作课件就成为了大多数老师的首选。可能老师们在制作课件时都遇见过这样的问题：①把PPT课件从自己的计算机拷贝到其他计算机，原有的视频和flash就不能正常播放了。②如何正确嵌入Word和PowerPoint文档。③怎样制作智能交互的检测试题，实现智能检测，自动予以反馈和提示。在自己的日常工作就碰到了以上几个常见的问题，通过解决以上问题，总结出以下几点技巧供大家参考。
一、制作任意地方都能打开的flash
首先，在菜单栏添加【开发工具】菜单。过程是：⑴选择【文件】|【选项】命令。⑵在弹出的“PowerPoint选项”对话框中选择“自定义功能区”选项卡令，从左面的下拉位表选择 “主选项卡”，选择“开发工具”选项。⑶单击“添加”按钮，添加开发工具到右面的“主选项卡”命令菜单下。⑷选择“开发工具”复选框，单击“确定”完成 “开发工具”的添加。
其次，添加“shockwave Flash Object”控件。选择“开发工具”命令，单击“其它控件”按钮，从“其它控件”窗口中查找并选择“shockwave Flash Object”对象并确定。在窗口中拖动十字形光标绘制Flash控件。最后设置“shockwave Flash Object”控件的属性。在绘制的控件上单击右键，选择“属性”命令，在属性栏中设置嵌入影片EmbedMovie的属性值为True。在Movie属性旁的空白单元格中，输入Flash 文件的完整驱动器路径，包括文件名和扩展名.swf，这样flash随PPT文档不论被拷贝到任何地方都能正常播放。
二、嵌入Word文档的方法
为了便于教师之间的交流和学生的自学，我们都会想尽办法进行资源的整合，优化课件页面的显示内容、显示方式和显示顺序等，尽量做到大方、美观。课件应随着阅读的步伐逐渐的通过一定方式显示提示性的文字，打开相应的参考资料，引导读者顺着教师课件的思路进行学习，而不是把所有的资料一览无余的展现在读者的眼前，这样展现的资料就对读者失去了吸引力，中断了探索的欲望，所以在PPT中嵌入word文档资料就显得很有必有。
制作过程是：⑴选择【插入】|【对象】命令。⑵在弹出的【插入对象】对话框中选择“由文件创建”单选按钮，单击“浏览”按钮。⑶选择事先准备好的word参考资料，选中“显示为图标”复选框，再单击“更改图标”按钮，在弹出的“更改图标”对话框中选择一个word图标，并更改文档标题，之后单击“确定”按钮。
选中在页面上显示的word图标，选择【动画】|【添加动画】|【OLE操作动作】，弹出“添加OLE操作动作”对话框，选择“打开”，然后“确定”，如图所示。最后选择【触发】|【对象】即可完成设置。单击播放按钮，单击word图标就可以在PPT放映模式下打开word文档。
如要在同一页面上同时添加几个word文档，就要按照添加的先后顺序依次添加【OLE操作动作】，【触发】|【对象】的设置过程，顺序不能乱，否则就会出现单击的是A文档的图标，打开的却是B文档的现象。
三、用VBA制作智能检测题
VBA是 Visual Basic for Applications的简称，是高级语言Visual Basic的子集，是寄生于VB应用程序的版本。主要能用来扩展Windows的应用程式功能，使已有的Microsoft Office应用程序自动化，大幅度提高了办公效率。
如图所示的就用VBA技术制作一道判断平年和闰年的单选检测试题，要求在课件中实现以下交互功能：当学生选择A、B选项时课件能给出判断和提示，选择A选项时B选项不可用，选择B选项时A选项不可用，预防学生短时间内挨个尝试，单击“再来一次”按钮时重新选择，如图9所示。（正确答案为B选项）
具体的制作过程是：⑴插入两个水平文本框，输入标题和题干。⑵选择【开发工具】|【文本框】控件，然后在页面合适的位置拖动，绘出一个文本框按钮。⑶选择【开发工具】|【选项按钮】控件，然后在页面合适的位置拖动，绘出两个选项按钮。分别在其上单击右键，选择“属性”命令弹出属性窗口，修改“Caption”属性为“A.平年”、“B.闰年”，“Value”值都为“False”。⑷选择【开发工具】|【命令按钮】控件，在当前页面绘制一个命令按钮，在按钮上右击，在弹出的快捷菜单中选择“属性”命令，修改其“Caption”属性为：再试一次。⑸给两个选项按钮添加代码：分别双击选项按钮，弹出代码窗口，写入一下代码
Private Sub OptionButton1_Click（）
Dim year As Integer
OptionButton2.Enabled = False
year = Val（TextBox1.Text）
If year Mod 4 <> 0 And year Mod 100 <> 0 Or year Mod 400 <> 0 Then
MsgBox Str（year） & "年是平年，恭喜你答对了"
Else
MsgBox （"请仔细思考！！"）
End If
End Sub
Private Sub OptionButton2_Click（）
Dim year As Integer
OptionButton1.Enabled = False
year = Val（TextBox1.Text）
If year Mod 4 = 0 And year Mod 100 <> 0 Or year Mod 400 = 0 Then
MsgBox Str（year） & "年是润年，恭喜你答对了"
Else
MsgBox （"请仔细思考！！"）
End If
End Sub
⑹给一个命令按钮添加代码：
Private Sub CommandButton1_Click（）
OptionButton1.Value = False
OptionButton1.Enabled = True
OptionButton2.Value = False
OptionButton2.Enabled = TrueEnd Sub
PowerPoint 2010 是Microsoft Office 2010套件中的一款演示文稿图形程序，是功能强大的演示文稿制作软件。学起来既简单又容易上手，也不用掌握复杂的脚本语言就能制作出精美的演示文稿，所以用PPT制作课件就成为了大多数老师的首选。可能老师们在制作课件时都遇见过这样的问题：①把PPT课件从自己的计算机拷贝到其他计算机，原有的视频和flash就不能正常播放了。②如何正确嵌入Word和PowerPoint文档。③怎样制作智能交互的检测试题，实现智能检测，自动予以反馈和提示。在自己的日常工作就碰到了以上几个常见的问题，通过解决以上问题，总结出以下几点技巧供大家参考。
一、制作任意地方都能打开的flash
首先，在菜单栏添加【开发工具】菜单。过程是：⑴选择【文件】|【选项】命令。⑵在弹出的“PowerPoint选项”对话框中选择“自定义功能区”选项卡令，从左面的下拉位表选择 “主选项卡”，选择“开发工具”选项。⑶单击“添加”按钮，添加开发工具到右面的“主选项卡”命令菜单下。⑷选择“开发工具”复选框，单击“确定”完成 “开发工具”的添加。
其次，添加“shockwave Flash Object”控件。选择“开发工具”命令，单击“其它控件”按钮，从“其它控件”窗口中查找并选择“shockwave Flash Object”对象并确定。在窗口中拖动十字形光标绘制Flash控件。最后设置“shockwave Flash Object”控件的属性。在绘制的控件上单击右键，选择“属性”命令，在属性栏中设置嵌入影片EmbedMovie的属性值为True。在Movie属性旁的空白单元格中，输入Flash 文件的完整驱动器路径，包括文件名和扩展名.swf，这样flash随PPT文档不论被拷贝到任何地方都能正常播放。
二、嵌入Word文档的方法
为了便于教师之间的交流和学生的自学，我们都会想尽办法进行资源的整合，优化课件页面的显示内容、显示方式和显示顺序等，尽量做到大方、美观。课件应随着阅读的步伐逐渐的通过一定方式显示提示性的文字，打开相应的参考资料，引导读者顺着教师课件的思路进行学习，而不是把所有的资料一览无余的展现在读者的眼前，这样展现的资料就对读者失去了吸引力，中断了探索的欲望，所以在PPT中嵌入word文档资料就显得很有必有。
制作过程是：⑴选择【插入】|【对象】命令。⑵在弹出的【插入对象】对话框中选择“由文件创建”单选按钮，单击“浏览”按钮。⑶选择事先准备好的word参考资料，选中“显示为图标”复选框，再单击“更改图标”按钮，在弹出的“更改图标”对话框中选择一个word图标，并更改文档标题，之后单击“确定”按钮。
选中在页面上显示的word图标，选择【动画】|【添加动画】|【OLE操作动作】，弹出“添加OLE操作动作”对话框，选择“打开”，然后“确定”，如图所示。最后选择【触发】|【对象】即可完成设置。单击播放按钮，单击word图标就可以在PPT放映模式下打开word文档。
如要在同一页面上同时添加几个word文档，就要按照添加的先后顺序依次添加【OLE操作动作】，【触发】|【对象】的设置过程，顺序不能乱，否则就会出现单击的是A文档的图标，打开的却是B文档的现象。
三、用VBA制作智能检测题
VBA是 Visual Basic for Applications的简称，是高级语言Visual Basic的子集，是寄生于VB应用程序的版本。主要能用来扩展Windows的应用程式功能，使已有的Microsoft Office应用程序自动化，大幅度提高了办公效率。
如图所示的就用VBA技术制作一道判断平年和闰年的单选检测试题，要求在课件中实现以下交互功能：当学生选择A、B选项时课件能给出判断和提示，选择A选项时B选项不可用，选择B选项时A选项不可用，预防学生短时间内挨个尝试，单击“再来一次”按钮时重新选择，如图9所示。（正确答案为B选项）
具体的制作过程是：⑴插入两个水平文本框，输入标题和题干。⑵选择【开发工具】|【文本框】控件，然后在页面合适的位置拖动，绘出一个文本框按钮。⑶选择【开发工具】|【选项按钮】控件，然后在页面合适的位置拖动，绘出两个选项按钮。分别在其上单击右键，选择“属性”命令弹出属性窗口，修改“Caption”属性为“A.平年”、“B.闰年”，“Value”值都为“False”。⑷选择【开发工具】|【命令按钮】控件，在当前页面绘制一个命令按钮，在按钮上右击，在弹出的快捷菜单中选择“属性”命令，修改其“Caption”属性为：再试一次。⑸给两个选项按钮添加代码：分别双击选项按钮，弹出代码窗口，写入一下代码
Private Sub OptionButton1_Click（）
Dim year As Integer
OptionButton2.Enabled = False
year = Val（TextBox1.Text）
If year Mod 4 <> 0 And year Mod 100 <> 0 Or year Mod 400 <> 0 Then
MsgBox Str（year） & "年是平年，恭喜你答对了"
Else
MsgBox （"请仔细思考！！"）
End If
End Sub
Private Sub OptionButton2_Click（）
Dim year As Integer
OptionButton1.Enabled = False
year = Val（TextBox1.Text）
If year Mod 4 = 0 And year Mod 100 <> 0 Or year Mod 400 = 0 Then
MsgBox Str（year） & "年是润年，恭喜你答对了"
Else
MsgBox （"请仔细思考！！"）
End If
End Sub
⑹给一个命令按钮添加代码：
Private Sub CommandButton1_Click（）
OptionButton1.Value = False
OptionButton1.Enabled = True
OptionButton2.Value = False
OptionButton2.Enabled = TrueEnd Sub