PowerPoint2003控件工具箱和VBA代码2009.7如何打开“控件工具箱”单选框复选框命令按钮文本框34单选框属性“Caption”输入我们所需要的内容,就可以做出适合我们的单选项了。“BackStyle”在右侧的下拉列表中选择“0-fmBackStyleTransparent”,可以使做出的单选项背景透明。“Font”输入框,可以设置字体、字号等格式。“Forecolor”输入框,则可以设置颜色。5单/多项选择题是非判断题文本框65、郑和下西洋最远到达哪些地方?2、郑和七次下西洋必经的第一个海峡是什么海峡?3.如果你是郑和,要从南海进入印度洋必定经过哪个海峡?6、郑和下西洋对明朝乃至中国历史做出了哪些贡献?4、地图上的天方在今天的哪个国家?1、郑和下西洋的起点在哪?起、止时间?根据刚才的路线演示,分男女生抢答问题。刘家港1405——1433台湾海峡马六甲海峡沙特阿拉伯红海一带和非洲东海岸每题10分,抢答错误扣掉相应分值!加强了中国与各国的友好和经济交流,推动了华侨移居南洋,促进南洋的开发605857郑和(马三宝)1371—1433明成祖朱棣(dì)1360~1424多行文本框明成祖:郑和,朕想派遣一支船队到西洋去访问各国,由你来率领,你看如何?郑和:圣上对我恩重如山,三宝纵使肝脑涂地也无以报答,三宝愿意效命!明成祖:好!朕所以要派船队出使西洋,有两个原因:一是,今日四8EnterKeyBehavior属性:设为True时允许使用回车键换行。MultiLine属性:设为True时允许输入多行文字ScrollBars属性:利用滚动条来显示多行文字内容,其中1-fmScrollBarsHorzontal为水平滚动条;2-fmScrollBarsVertical为垂直滚动条;3-fmScrollBarsBoth为水平滚动条与垂直滚动条均存在。当文字不超出文字框时,滚动条设置无效,当文字超出文字框时,则出现一个可拖动的滚动条。BackColor用来设置文字框的背景颜色。Font用来设置字体。9SSC精英团队的宗旨(按顺序)填空题10IfTextBox1.Value=服务ThenMsgBox不错,你填对了!,vbOKOnly,填空题ElseMsgBox不对吧?再想想!,vbOKOnly,填空题TextBox1.Text=11为人类提供了经济、便利的书写材料,有利于文化的普及和传播;加快了文化的传播,改变了只有“上等人”才能读书的状况;为环球航行和发现美洲创造了必要的条件,促进了世界贸易的发展。改变了作战方式,帮助资产阶级摧毁封建堡垒,加速了欧洲乃至全世界近代化的进程;以下是关于四大发明贡献的论述,请你把对应的发明填入空格内!造纸术查看结果查看结果查看结果查看结果12•命令按钮VBA法1、在相应的演示文稿中,用文本框输入填空题的题目内容2、再单击工具条上的“命令按钮”按钮,然后在幻灯片合适位置上拖拉出一个按钮来3、双击插入的命令按钮,进入VBA编辑窗口,在“PrivateSubCommandButton1_Click()”和“EndSub”语句之间,输入下述代码:IfTextBox1.Text=“历史Thenhd=MsgBox(你填对了,vbOKCancel,结果)Elsehd=MsgBox(你填错了,vbOKCancel,结果)EndIf历史结果13serve是分享Share是服务create是开拓是非判断题14单选15代码的第一句是设置提示框及提示信息的。而第二句代码则是在单击B选项后使其它各选项恢复到未选中状态。“OptionButton*”(*为1、2、3、4)分别表示我们制作出的四个单选项。它是以单选项制作顺序排列的。在“属性”对话框的“名称”处可以查到它。在“PrivateSubCommandButton1_Click()”和“EndSub”语句之间MsgBox(恭喜您,答对了!)OptionButton2.Value=FalseAndOptionButton3.Value=FalseAndOptionButton4.Value=False16多选选项A选项B选项C选项D按钮