下载本文档
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、杭州市电子信息职业学校课时授课计划课题:条件判断结构 共2课时教学目标:1. 熟练掌握行IF语句的基本格式。2. 能熟练运用行IF语句。1 复习给出程序如下:帮助学生回忆顺序结构的定义语句,赋值语句以及输出语句,并点出顺序语句的特点是依次执行,从上至下。二引入之前学习的顺序结构是从第一行开始,自上而下的逐行运行每条代码,但是,程序语言编程一门技巧性特别强的专业技术,具有其独特的创作性和灵活性,如果从自始至终都是死板没有变通,那么使得整个程序缺乏灵动和活力。创设情境:现在专业课都是在实训楼上,如果所有人全部都死死等着坐电梯,那么可能有一半的同学会上课迟到。但是,如果上课的楼层较低的同学觉得坐电梯
2、人太多,会选择爬楼梯。这就是人对实际状况的一种判断,如果始终一条道走到黑,肯定不是一个聪明人做的事情,其实VB编程也是一个道理。今天我们就来学习下VB中的判断语句,顺序、选择、循环三大结构中的选择结构。3 新课教学IF语句在VB中有三种叫法:选择语句、分支语句、判断语句格式:功能:当条件表达式成立时,执行关键字THEN 后面的语句1,否则执行关键字后面的语句2注意事项:1<ELSE 语句2>是可选项,需根据实际情况而定。2当关键字THEN或ELSE后的语句不止一条时,必须在语句之间使用冒号“:”。3条件表达式可以是任何运算结果为逻辑型数据的关系表达式或逻辑表达式,当值为True,则
3、条件成立,反之,当表达式的值为False,则条件不成立。举例:1 期中考试快到了,老爸答应,只要这次VB的成绩能考到80分以上,就给我买一台IPhone 4,要是在80分以下,就为我提供各种板栗。2. 请人吃饭,但是对方有个条件,消费在10元以下的不考虑,10元以上的才去。Dim cost As Integercost = 11If cost > 10 Then Print "答应和你去吃饭" Else Print "就不去了"一 区块式IF语句IF语句的种类:IF语句根据格式的不同,有分为行IF语句和块IF语句格式:功能:当条件表达式成立时,执行
4、关键字THEN 后面的语句序列1,否则执行关键字后面的语句序列2。无论执行语句序列1还是执行语句序列2,执行完以后都要执行END IF后面的语句。说明:1 条件表达式的要求及含义与行IF语句完全相同。2 语句序列1和语句序列2由一条多条语句组成。3 关键字ELSE及其后的语句序列2是可选项,可有可无。4 关键字IFTHEN和关键字ELSE IF 必须成对使用,缺一不可。举例:例1:上述例题1用区块式IF语句可以改为:例2:根据我校学生到实训楼,乘坐电梯规则,按照所去楼层的高低,来选择是否乘坐电梯,用块IF语句来表示,写成VB程序.ClsDim flow As Stringflow = Inpu
5、tBox("请输入您要去的楼层!", "目的地对话框", 1)If flow < 6 ThenPrint "您的教室在低楼层,应该走楼梯到达!"ElsePrint "您的教室在高楼层,请文明乘坐电梯!"End If二 学生练习1 从键盘任意输入两个数,求其中的最小数。行IF语句:Private Sub Form_Activate()Dim a As Single, b As Single,a = InputBox("请输入第一个变量的值")b = InputBox("请输入第二个
6、变量的值")if a>b then print”最小数为:”;b else print “最小数为:”;aend sub 块IF语句Private Sub Form_Activate()Dim a As Single, b As Singlea = InputBox("请输入第一个变量的值")b = InputBox("请输入第二个变量的值")if a>b then print”最小数为:”;belse print “最小数为:”;aend ifend sub 2 从键盘输入三个数,求其中的最大数和最小数Private Sub Fo
7、rm_Activate()Dim a As Single, b As Single, c As Single, mas As single, min as singlea = InputBox("请输入第一个数")b = InputBox("请输入第二个数")c = InputBox("请输入第三个数")if a>b then max=a:min =b Else Max = b: min = aif max<b then max=bif min >b then min =bif max<c then max=c
8、if min >c then min =cprint “max=”;max,”min=”;minend sub3、从键盘输入三个数,将这三个数,按照从小到大的顺序,依次放入变量a,b,c三个变量中,并依次输出这三个变量。Private Sub Form_Activate()Dim a As Integer, b As Integer, c As Integer, d As Integera = InputBox("请输入第一个数", "输入框")b = InputBox("请输入第二个数", "输入框")c = InputBox("请输入第三个数", "输入框")If a > b Then d = a:a = b:b = dIf
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 头发和头皮用化妆制剂产业链招商引资的调研报告
- 布莱尔盲文手机产品供应链分析
- 乐谱产品供应链分析
- 家养宠物用毯产品供应链分析
- 公寓管理行业经营分析报告
- 同声传译服务行业经营分析报告
- 农业智能施肥机行业相关项目经营管理报告
- 移动电话用屏幕保护膜产品供应链分析
- 外文模板印刷用产品供应链分析
- 分成格的漆器餐盘产业链招商引资的调研报告
- 挖掘机检验报告.doc
- 口腔诊疗前、中、后牙椅消毒流程(全)
- 拌合站设备安装实施方案
- 如何指导学生创作科学微电影
- 欧姆龙PLC指令集讲义
- 印刷厂技术参数一览表
- 红色沉稳大气商务通用微立体企业公司介绍公司简介公司产品宣传营销策划方案动态ppt模板
- 贴坡式混凝土挡墙浇筑施工方案(完整版)
- 园林景观施工界面划分(参考模板)
- 长沙市中小学创新教育专业委员会常务理事单位表【直接打印】
- 环氧乙烷的易燃、易爆、易自聚和毒害性
评论
0/150
提交评论