基于VBAPowerPoint中图像链接交互实现.docVIP

基于VBAPowerPoint中图像链接交互实现 　　在PowerPoint课件制作中,适当使用图片可以形象地说明教学内容,图片运用恰当,会让人有“一图胜千言”的感觉。当前PowerPoint课件中主要通过直接插入、粘贴和超链接方式呈现图片,但交互性不够强。特别是教师在使用多张图片时,需要前后翻动,操作不方便,学生在此过程中也容易眼花缭乱,不利于知识的建构。通过VBA控件实现PowerPoint课件中图像的链接交互能很好地避免这一不足。本文以《信息与信息技术》课程中的“信息技术革命”为内容,在课件中基于VBA技术实现图像链接交互来具体阐述操作步骤。 　　 　　一、什么是VBA技术 　　 　　VBA的英文全称是Visual Basic for Applications,它是微软公司在其开发的各种应用程序中共享的通用自动化语言。同Visual Basic相比,VBA不能将程序编译成可执行的文件,其他功能则基本相似。在PowerPoint中,选择“视图/工具栏/Visual Basic”,即可打开“Visual Basic”浮动面板,单击Visual Basic编辑器图标进入VBA编辑环境后可以直接进行编程。 　　如果对VB语言不太熟悉,则可以通过VBA控件进行人机交互操作。控件是一种可视化部件,能起到与用户进行交互的作用。PowerPoint程序自带VBA控件,所有控件集合在控件工具箱中。可以单击“Visual Basic” 面板上的控件工具箱图标,或者选择“视图/工具栏/控件工具箱”打开“控件工具箱”面板。 　　 　　二、PowerPoint中图像链接交互的实现 　　 　　《信息与信息技术》课程中“信息技术革命”内容的PowerPoint课件中拟采用五幅图片,辅助说明信息技术发展的五个不同发展阶段:“语言的使用”、“文字的创造”、“印刷术的发明”、“电报、电话、广播、电视的发明与普及”、“计算机技术与现代通信技术的普及应用”,具体操作如下。 　　(一)设置命令按钮 　　1.拖出命令按钮。选择“控件工具箱”中“命令按钮”控件,在PowerPoint幻灯片内,按住鼠标左键拖出一个命令按钮。系统默认所拖按钮上面的名称为“CommandButton1”。 　　2.设置命令按钮属性。选中所拖按钮右击鼠标,在弹出的菜单中选择“属性”。在“属性”对话框中,Caption项对应的内容为按钮名称,改默认的“Com mandButton1”为“语言的使用”。通过Font项设置命令按钮上名称的字体、字形和大小。Height与Width项对应的数值为按钮的宽和长,也可直接调节命令按钮的大小和位置。 　　3.重复1和2的操作,依次设置其余4幅图片对应的命令按钮,并将命令按钮摆放至幻灯片的合适位置。 　　(二)设置图像链接 　　1.选定图像显示区域。选择“控件工具箱”中“图像”控件,在命令按钮所在幻灯片内拖出显示图像的区域。 　　2.设定图像显示区域属性。选中所拖图像显示区域右击鼠标,在弹出菜单中选择“属性”。在“属性”对话框中设定Height与Width的数值,确定图像显示区域的大小(不是图像的大小),通过调节Top与Left对应的数值来控制图像显示的位置。 　　3.导入图像。在图像显示区域“属性”对话框中点击Picture项,选择图片路径导入“语言的使用”相应的图片,图片导入后系统默认名称为“Image1”。需要注意的是,如果导入的图片尺寸与图像显示区域相差较大,则需要通过图像处理软件修改大小后再导入。 　　4.重复1、2和3的操作,依次设置另外四幅图像。导入的4张图片名称系统按序分别默认为Image2、Image3、Image4、Image5。 　　(三)编辑代码 　　双击幻灯片上的命令按钮或点击Visual Basic编辑器图标进入VBA编辑环境后进行代码编辑。 　　1.在第一个Private Sub与End Sub之间输入代码: 　　Private Sub CommandButton1_Click() 　　Image1.Visible = True 　　Image2.Visible = False 　　Image3.Visible = False 　　Image4.Visible = False 　　Image5.Visible = False 　　End Sub 　　即点击“语言的使用”命令按钮,则链接显示图片Image1,图片Image2、Image3、Image4、Image5隐藏。 　　2.在第二个Private Sub与End Sub之间输入代码: 　　Private Sub CommandButton2_Click() 　　 Image2.Visible = True