欢迎来到天天文库
浏览记录
ID:62156215
大小:17.00 KB
页数:5页
时间:2021-04-19
《PPT制作的一些代码.doc》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、个人收集整理勿做商业用途工具栏(滚动文本):(垂直滚动文本:EnterKeyBehavior:TrueMultiLine:TrueScrollBars:2—fmScrollBarsVertical)(横向滚动文本:ScrollBars:1-fmScrollBarsHorizontal)“工具”菜单--“宏”命令宏:运行一个“宏"(VBA程序,VisualBasicForApplication程序)录制新宏:记录一个“宏"程序,记录完点击停止键停止这个被记录的“宏程序”。安全性:“宏病毒”的防范方法,可以设为高、中、低不同的档次。VisualBasic编辑器:打开VBA编辑器窗
2、口,编辑录制或编写的VBA程序。Microsoft脚本编辑器:打开MicrosoftDevelopmentEnvironment脚本编辑器窗口,用来将当前的PowerPoint文件转化为HTML语言网页文件,并可进行编辑。插入Flash动画:三种方法:①“插入对象”法②“超链接”法③“控件”法(ShockwaveFlashObject;EmbedMovie:True)利用命令按钮控制Flash动画:个人收集整理勿做商业用途开始:shockwaveFlash1.Playing=True暂停:shockwaveFlash1。Playing=False前进:shockwaveFla
3、sh1。FrameNum=shockwaveFlash1.FrameNum+100(shockwaveFlash1。Playing=True)后退:shockwaveFlash1。FrameNum=shockwaveFlash1。FrameNum—100(shockwaveFlash1。Playing=True)返回:shockwaveFlash1.FrameNum=1结束:shockwaveFlash1.FrameNum=shockwaveFlash1.TotalFrames4。常见视频文件格式及播放器:RealVideo文件:AVI文件:MPEG文件:Microsoft流
4、媒体文件:QuickTime文件:插入视频:三种方法:①“插入对象”法/“插入影片”法②“超链接”法③“控件”法个人收集整理勿做商业用途WindowsMediaPlayerRealPlayerG2Control(Controls:ImagewindowControlplanel播放器/按钮)AppleQuickTimeControl2.05.MicrosoftWeb浏览器,命令按钮双击命令按钮,进入VBA编辑窗口,在光标闪烁处,输入如下语句:WebBrowser1.Navigate"http://www。baidu.com"("绝对路径。htm")1。3.6VBA制作交互式练
5、习题1.开始:ShockwaveFlash1。Playing=True暂停:ShockwaveFlash1.Playing=False快进ShockwaveFlash1。FrameNum=ShockwaveFlash1。FrameNum+60后退:ShockwaveFlash1。FrameNum=ShockwaveFlash1。FrameNum—60返回:ShockwaveFlash1。FrameNum=1结束:ShockwaveFlash1。FrameNum=ShockwaveFlash1.TotalFrames-30个人收集整理勿做商业用途判断正误按纽:IfOptionB
6、utton2.Value=TrueThenMsgBox”选择正确。”,vbOKOnly,”结果”ElseMsgBox”选择错误!正确答案是“B"!”,vbOKOnly,”提示”EndIf重新选择按纽:OptionButton1。Value=FalseOptionButton2.Value=FalseOptionButton3。Value=FalseOptionButton4.Value=False复选框的选择按纽:IfCheckBox1.Value=TrueThenMsgBox"选择错误!”,vbOKOnly,"提示"ElseIfCheckBox2。Value=TrueAnd
7、CheckBox3.Value=TrueAndCheckBox4。Value=TrueThenMsgBox”恭喜您,选择正确!”,vbOKOnly,"结果”ElseMsgBox"抱歉,没有完全选对,加油哦!”,vbOKOnly,”提示”个人收集整理勿做商业用途EndIfEndIf
此文档下载收益归作者所有