时间：2017-02-11 00:41作者：admin来源：未知人气：5695我要评论(0)
不用Flash，在PPT中通过简单的VBA也能通过对图片或按钮的任意拖动，实现与用户的交互效果。
实例描述：如图1所示为一个自由配对题型，要求在幻灯片放映状态下，利用鼠标将植物细胞各个部分的名称拖动到相应的位置。
实例分析：如果是在Flash中，实现元素的拖动只需要使用startDrag和stopDrag这两个函数就能轻松实现。但是，PPT中是不具备这两个函数。一般情况下，PPT的人机交互都是通过自定义动画或触发器在预先设置结果的前提下进行交互，属于被动式交互。想进行主动式的交互，就需要利用VBA来实现。
利用控件工具箱添加元素
在已做好的幻灯片中选择“视图→工具栏→控件工具箱”菜单，调出“控件工具箱”。在“控件工具箱”中选择“命令按钮”控件，在幻灯片的空白处画出一个按钮。右击这个按钮选择“属性”对话框中，把Caption属性改为按钮所要显示的标签内容（如细胞壁），可根据需要更改字体、颜色等；还可以根据需要设置一下鼠标在按钮上所显示的形状，即MousePointer属性，这里笔者选择了第15项（fmMousePointerSizeAll）十字箭头形状。按钮创建完成后，复制并粘贴5次，更改每个按钮的Caption属性，改成不同的按钮标签。最后，选中所有的按钮，选择“绘图→对齐或分布→左对齐”菜单，将所有按钮左对齐。
为按钮添加VBA代码
双击第一个按钮，这时就会进入VBA的编辑器。在第1行前回车，输入图中代码a；然后，选择对象及相应的事件，输入图中代码b。复制CommandButtton1的三个事件，把出现CommandButtton1的地方改成CommandButtton2、 CommandButtton3、 CommandButtton4、 CommandButtton5、 CommandButtton6 即可。这些按钮的代码可到http://pan.baidu.com/s/1qZc9W下载。
激活VBA代码并放映
选择“工具→宏→安全性”，把宏的安全性设置为“低”，这样您才能顺利的运行VBA代码。现在，我们放映幻灯片并拖动按钮体验一下吧！
相关阅读 PPT比例16:9如何调PPT背景如何统一更换PPT如何设置背景颜色填充PPT怎么批量添加logo图让每页都显示PPT如何设置放映方式PPT页码怎么设置格式PPT播放不全屏怎么设置PPT放映怎么去除动画PPT如何演示PPT中如何批量导入图片每页一张或多张
热门文章
PPT页码不显示 你的PPT页码为什么显示不出来？教你一招
腾讯会议共享PPT如何使用演讲者模式
如何将PPT内容从一个模板快速换到另一个模板
PPT如何添加页码，并设置页码的起始数字，以及页码的居中，PPT页码进度
最新文章
PPT比例16:9如何调
PPT背景如何统一更换
PPT如何设置背景颜色填充PPT怎么批量添加logo图让每页都显示PPT如何设置放映方式PPT页码怎么设置格式
人气排行 PPT页码不显示 你的PPT页码为什么显示不出来？教你一招腾讯会议共享PPT如何使用演讲者模式如何将PPT内容从一个模板快速换到另一个模板PPT如何添加页码，并设置页码的起始数字，以及页码的居中，PPT页码进度ppt 备注如何添加、如何显示，让自己可以看见，台下人看不见ppt 备注放映PPT幻灯片时视频下方的播放进度条很碍眼，要怎么隐藏？PPT里完美插入（嵌入）视频的三种方式图解详细教程ppt如何批量加入logo让每页显示？
盖楼回复X
(您的评论需要经过审核才能显示)
查看所有0条评论>>