PPT中基于VBA文本交互实现.docVIP

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
PPT中基于VBA文本交互实现

PPT中基于VBA文本交互实现   摘 要:文本是多媒体课件的重要组成元素之一,是学生获取知识的主要来源。本文采用VBA与控件相结合的技术,对PPT课件中的文本实现交互进行了设计与操作,使PPT课件中的文本能够克服单一的呈现形式,呈现多样化的表达,更好地适应教与学的需要,为教学课件的开发与完善提供有益的参考。   关键词:PPT课件;VBA ;控件;文本交互   中图分类号:G434 文献标识码:A文章编号:1673-8454(2010)16-0067-03       一、文本交互的必要性   多媒体课件通常由文本、图形、图像、声音、视频、动画等元素组成,但不是每一个课件都需要包含所有的元素,而文本却是每一个课件中都不可缺少的,是课件内容组成的基础,是学生获取知识的主要来源。PPT课件中的文本一般都是输入或粘贴在幻灯片上,播放时以一段段篇幅呈现,除了设置一些自定义动画效果外,表现形式单一,更缺乏交互性,难以达到良好的知识传授效果,学生观看久了也会疲劳厌倦。在PPT课件中适当增加文本的表现形式,实现一定的人机交互,会起到意想不到的作用。利用PowerPoint自带的VBA和控件,即可实现交互的功能。   VBA(Visual Basic for Applications)是微软公司在其开发的各种应用程序中共享的通用自动化语言。控件是一种可视化部件,集合在控件工具箱中,在PowerPoint中选择“视图/工具栏/控件工具箱”即可打开。   本文以《信息与信息技术》课程中“信息”这一部分内容的PPT课件为例,具体阐述PPT课件中基于VBA的两种文本交互的相关操作。      二、文本切换交互的实现   《信息与信息技术》课程中“信息”这一部分内容,引用“感觉剥夺实验”,得出“信息是人类生存和发展的基本条件与基本需求” 的结论。PPT课件中的这部分内容,使用文本切换的方式表现实验前和实验后两种不同的实验现象。文本切换实例如图1,具体制作流程如下:   1.页面控件放置   (1)放置切换按钮。选择“控件工具箱”中“切换按钮”控件,在“感觉剥夺实验”的课件页面上,按住鼠标左键拖出一个切换按钮( ToggleButton1)。   (2)放置命令按钮。选择 “命令按钮”控件,在“感觉剥夺实验”课件页面的下方,拖出一个命令按钮(CommandButton1)。   (3)放置标签。选择“标签”控件,在切换按钮下方,拖出第一个标签(Label1)。在命令按钮左边,拖出第二个标签(Label2)。   2.控件属性设置   (1)设置切换按钮属性。选中切换按钮右击鼠标,在弹出的菜单中选择“属性”。在“属性”对话框中,Caption项对应的内容为切换按钮名称,改默认的“ToggleButton1”为“实验结果”。通过Font项设置名称的字体、字形和大小。   (2)设置命令按钮属性。将Caption项对应的内容改为“结论”。   (3)设置标签属性。分别将两个标签Caption项对应的内容清除。   3.代码编辑   (1)双击“实验结果”切换按钮,在Private Sub ToggleButton1_Click()与End Sub之间输入代码:    Private Sub ToggleButton1_Click()    If ToggleButton1.Value = True Then    Label1.Caption = 实验前,大多数被测者以为能利用这个机会好好睡一觉,或者考虑论文课程计划。    Else    Label1.Caption = 实验后,被测者报告说,在实验过程中,对任何事情都不能进行清晰的思考。    End If    End Sub   点击“实验结果”切换按钮,标签1显示实验前的现象,再次点击,标签1显示实验后的现象,文本切换交互就是以切换按钮控件对标签内的文本内容进行切换显示。   (2)双击“结论”命令按钮,在Private Sub CommandButton1_Click()与 End Sub之间输入代码:    Private Sub CommandButton1_Click()    Label2.Caption = InputBox(人类生存和发展的基本条件与基本需求, 结论, )    End Sub   点击“结论”按钮,跳出对话框,填写结论答案,并在标签2中显示。   三、文本下拉交互的实现   《信息与信息技术》课程中“信息”这一部分内容,知识点“物质、能量、信息是人类在世界上生存与发展的三大要素” 是引用“野外生存训练”得出的。在PPT课件中,应用列表框和组合框控件实现下拉式交互效果,生动表现 “物质、能量、信

文档评论(0)

erterye + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档