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