预览加载中,请您耐心等待几秒...
1/10
2/10
3/10
4/10
5/10
6/10
7/10
8/10
9/10
10/10

亲,该文档总共15页,到这已经超出免费预览范围,如果喜欢就直接下载吧~

如果您无法下载资料,请参考说明:

1、部分资料下载需要金币,请确保您的账户上有足够的金币

2、已购买过的文档,再次下载不重复扣费

3、资料包下载后请先用软件解压,在使用对应软件打开

课件单选题制作(方法二) Powerpoint中用VBA实现课件中的智能交互(实现单选等) PowerPoint中的VBA可以实现很多复杂的交互,但很多老师面对VBA编程,都会觉得无从下手。所以本期我们为大家安排了一个关于PowerPoint中VBA的小专题,以后在课件中实现交互就不会那么费劲了。VBA基础说到VBA编程,就不得不提到控件工具箱,我们需要利用其中的控件搭建需要的环境。1.显示控件工具箱在PowerPoint中选择菜单“视图/工具栏/控件工具箱”。2.控件工具箱(如图1)中常用按钮的介绍 (1)复选框(CheckBox):可以选择多个选项,常用来设计多选题; (2)文本框(TextBox):可以输入文本,常用来设计填空题; (3)命令按钮(CommandButton):用来确定选择或输入,也可设计超级链接; (4)单选框(OptionButton):只能选中一个选项,常用来设计单选题或判断题;(5)标签(Label):用来显示文字信息。3.插入控件的方法单击控件工具箱上的工具按钮,然后在幻灯片中拖动到适当大小即可。4.进入VBA的方法双击幻灯片中的控件或用菜单命令“工具/宏/Visualbasic编辑器”即可进入VBA编程状态。5.控件的主要属性及设置方法进入VBA后,需要在“属性”窗口中对控件的属性进行设置。如果没有出现“属性”窗口,按F4键即可调出该窗口。下面我们就不同的控件,来说明常用属性的设置方法。(1)复选框AutoSize:有两个值,True表示根据字的多少调整复选框的大小,False表示复选框为固定大小;BackColor:设置复选框的背景颜色,单击该属性框出现下拉按钮,选择“调色板”选项卡后选择颜色;Caption:控件的名称,把默认值删除再重新输入新名称;Font:设置字体、字号及字形,单击该属性框出现按钮,单击该按钮出现字体对话框,再在对话框中设置;Forecolor:设置字的颜色,设置方法同BackColor;Height:复选框的高度,直接输入数字即可;Width:复选框的宽度,直接输入数字即可;Value:复选框的值,True为选中,False则相反。(2)文本框AutoSize、BackColor、Font、ForeColor、Height、Width等属性的设置方法同复选框;Value:文本框的值,用来保存输入的文本;TextAlign:设置文本对齐方式。(3)单选框属性设置同复选框。(4)标签除Value外,其他同复选框。(5)命令按钮同标签。6.消息框MsgBox的功能 我们常用消息框显示一些交互的信息,如图2所示的消息框用下面的语句可实现:Msgbox("这是一个例题",VbYesNo,"示例")多选题的制作1.题目的设计同单选题2.选项:用复选框(CheckBox),其他设置同单选题。3.[查看答案]命令按钮:因为是多选题,答案有多个,所以要书写多个条件,条件之间用and连接,表示同时满足这几个条件,例如第一、三、五的选项是正确的,则需要输入如下语句:IfCheckBox1.Value=TrueAndCheckBox3.Value=TrueAndCheckBox5.Value=TrueThen给出正确的提示信息同单选题else给出错误的提示信息同单选题endif填空题的制作1.题目的设置同单选题,填空的地方用文本框。2.判断正误:因为是填空题,所填答案是文本,所以条件书写为:ifTextBox1.value="正确的文本"then给出正确的提示信息同单选题else给出错误的提示信息同单选题endif注意:正确的文本一定要用半角双引号括起来,如几个空一起判断,方法同多选题。 3.[重新填空]命令按钮:需要完成如下语句的设置:PrivateSubCommandButton2_Click()TextBox1.Value="请双击后填入你的答案!"EndSubPrivateSubTextBox1_DblClick(ByValCancelAsMSForms.ReturnBoolean)TextBox1.Value=""EndSub单选题的制作例如我们要设计如图1所示的选择题。1.题目可用文本框,也可用标签。如果用文本框,直接输入文本即可。如果用标签,插入后双击该标签启动VBA,修改Caption属性为“5X-15=0的解是:”,再根据需要修改其他属性(如颜色等)。2.选项插入一单选框,修改其Caption属性为“0”,其他属性可自行修改。其他的单选项可复制制作好的单选框,然后再修改它们的Caption属性。 3.查看答案命令按钮在此使用命令按钮,我们可根据单选框的Value属性的值来判断答案,如正确选项(单选框)的Value的值为True,则为该题选择正确,否则为选择错误,我们还