ppt制作技巧-连线题_第1页
ppt制作技巧-连线题_第2页
ppt制作技巧-连线题_第3页
ppt制作技巧-连线题_第4页
ppt制作技巧-连线题_第5页
全文预览已结束

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、v1.0可编辑可修改连线题的制作云南扬子步骤1新建空白ppt,用艺术字添加题目。步骤2单击控件工具箱命令按钮,拖由三个命令按钮,分别修改属 性中caption为重做、关闭音乐、显示帮助;单击控件工具箱 单选按钮,拖由八个单选按钮,把相应的文字和图片拖到合 适的位置:再通过单击控件工具箱标签按钮,拖由一个标签 按钮,修改属性中caption为空,再通过绘图里的对其与分布 里的对齐,把各个对象调节好。步骤3修改各个控件的属性,三个命令按钮依次修改名称为cmdl、cmd2、cmd3;八个单选按钮依次修改名称为 Opt1、Opt2、Opt3、Opt4、Opt5、 Opt6、Opt7、Opt8;标签按钮

2、修改名称为 Lbl1。步骤4双击显示帮助按钮,进入代码编辑窗口,在Private Sub Cmd3_Click() 和End Sub中间粘贴如下代码:If ="显示帮助"Then="点击图下的小圆,然后点击单词上面的小圆!="隐藏帮助"Else=""="显示帮助"End If步骤5双击关闭音乐按钮,进入代码编辑窗口,在Private Sub Cmd2_Click()和End Sub中间粘贴如下代码:If ="关闭音乐"Then=0=0="打开音乐"Else=100=

3、100="关闭音乐"End If步骤6双击重做按钮,进入代码编辑窗口,在Private Sub Cmd1_Click()和End Sub中间粘贴如下代码:SlideShowWindows(1).=False2v1.0可编辑可修改=False=False=False=False=False=False=False步骤7双击Opt5按钮,进入代码编辑窗口,在Opt5后选择GotFocus项,在PrivateSub Opt5_GotFocus(弄口 End Sub中间粘贴如下代码:If = True ThenSlideShowWindows(1). 372, 210, 300,

4、370Else=FalseEnd If步骤8Sub Opt6_GotFocus饰口 End Sub中间粘贴如下代码:If = True ThenSlideShowWindows(l). 530, 210, 375, 370Else=FalseEnd If步骤9双击Opt7按钮,进入代码编辑窗口,在Opt7后选择GotFocus项,在PrivateSub Opt7_GotFocus侪口 End Sub中间粘贴如下代码:If = True ThenSlideShowWindows(1). 297, 210, 452, 370Else=FalseEnd If步骤10双击Opt8按钮,进入代码编辑窗口,在Opt8后选择GotFocus项,在PrivateSub Opt8_GotFocus饰口 End Sub中间粘贴如下代码:If = True

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论