3.13 选择结构程序设计初步.ppt

N
?
请正确输入h和l的值
鸡 兔 同 笼 流 程 图
Y
输出c和r的值
结束
2019年8月23
感谢你的观看
14
判断一个数是自然数
判断一个数x为是否为整数 如果 int(x)=x ,则 x就是一个整数。
判断一个数是否为非负数 方法一：如果x>=0,则 x就是一个非负数。 方法二：如果 abs(x)=x ,则 x就是一个非负数
感谢你的观看
20
小 结
开始
Y
条件
执行a
N 执行b
结束
块if结构 If 条件 then
语句系列1 Else
语句系列2 End if
行if结构 If 条件 then 语句系列1 else 语句系列2
开始
Y
条件
块if结构 If 条件 then
语句系列1
执行a
N
行if结构
End if
2019年8月23
结束 If 条件感谢t你he的n观语看句
ElseIf fs >= 60 Then Label6.Caption = "及格！"
Else Label6.Caption = "不及格！"
End If
fs >= 60要不要写成”fs >= 60 and fs<90”?
2019年8月23
感谢你的观看
12
鸡兔同笼问题的研究
问题描述：
一笼子里关着兔子和鸡，兔子和鸡共有h只，腿一共 有L条，请你求出兔有几只，鸡有几只。
要求：
如果求出来的鸡或兔子数量不是自然数，那么显示 “请输入正确数值”，并把几个输入文本框内容清空， 否则分别输出鸡和兔的数量。
以对话框的形式提示信息： Msgbox “请输入正确的总数与腿数”
2019年8月23
感谢你的观看
13
开始 输入h和l的值
r=(l-2*h)/2 c=h-r
表达式的值
相等
=
7
不相等 <>
7
小于
<
7
大于
>
7
小于等于 <=
7
大于等于 >=
7
A =0 A <>0 “abc”< “ace” A >13 A<=20 A>=32
False True True False True False
2019年8月23
感谢你的观看
17
课堂练习
a.若小于18则为营养状况 较差
2019年8月23
感谢你的观看
4
算法的三种基本结构
顺序结构 选择（分支）结构 循环结构
2019年8月23
感谢你的观看
5
分 支 结
构
开始
Y
条件
执行a
N 执行b
结束
【方式 2】
开始
Y
条件
执行a
N
结束
开始
Y 条件
N
执行a
Y 条件
执行b
2019年8月23
【方式 1】 感谢你的观看 结束
N 执行C
2019年8月23
感谢你的观看
9
开始 Y 条件
Y 执行a
N 条件
执行b
结束
2019年8月23
N 执行C
块if结构 If 条件 then
语句系列1 Elseif 条件 then
语句系列2 Else
语句系列3 End if
If fs >= 90 Then
Label6.Caption = "优秀！"
ElseIf fs >= 60 Then Label6.Caption = "及格！"
21
3.13 选择结构程序设计初步
2019年8月23
感谢你的观看
1
读程序：指出错误
Dim h As Single Dim w As Single Dim b As Single b=w/h h = Val(Text1.Text) w = Val(Text2.Text) Label4.Caption = Str(b)
2019年8月23
感谢你的观看
2
读程序：指出错误
Private Sub Command2_Click() Label4.Caption = 你好中国
End Sub
为什么没有任何显示？
2019年8月23
感谢你的观看
3
区分输入输出语句
输入：
– H=val(text1.text)
输出：
– Label3.caption=str(c) – Text1.text=str(c) – List1.add str(c)
Else
Label6.Caption = "不及格！"
End If
感谢你的观看
10
思考：
小于90并且大于等于60的表达式要怎么写？
90 > fs >= 60
✘
fs >= 60 and fs<90
✔
2019年8月23
感谢你的观看
11
思考：
If fs >= 90 Then Label6.Caption = "优秀！"
感谢你的观看
7
思考
什么情况下会出现：“块if没有end if”？
什么情况下不能用“行if”？
If len(sfz) <> 18 Then msgbox ("请正确输入！") exit Sub
End If
2019年8月23
感谢你的观看
8
开始
Y
条件
执行a
结束
N 执行b
块if结构 If 条件 then
b.若在18--23.9之间则为 标准
c.若大于23.9者，即可诊 断为肥胖症营养过剩。
2019年8月23
提示
感谢你的观看
计算结果
18
基本要求
采用“块if”的写法。 If语句中，不能出现“:”。 让代码的缩进符合要求。
2019年8月23
感谢你的观看
19
进阶要求
2019年8月23
Abs(x) 取绝对值
Abs(-5.5)的返回值为5.5
Exp(x) 求e的X次方
Log(X) 求以e为底的X的对数
Exp(Log(4))的返回值是4 Log(Exp(6))的返回值是6
2019年8月23
感谢你的观看
16
关系运算符:返回的值为True或False
A=10
基本运算 运算符 优先级 表达式
语句系列1 Else
语句系列2 End if
If Mid(sfz, 17, 1) Mod 2 = 0 Then s = s + "女"
Fra Baidu bibliotekElse s = s + "男"
End If
行if结构 If 条件 then 语句系列1 else 语句系列2
If Mid(sfz, 17, 1) Mod 2 = 0 Then s = s + "女" Else s = s + "男"
【方式 3】 6
开始
Y
条件
执行a
N
结束
2019年8月23
块if结构 If 条件 then
语句系列1 End if
If len(sfz) <> 18 Then msgbox ("请正确输入！")
End If
行if结构 If 条件 then 语句
If h = 0 Then msgbox ("请正确输入！")
判断一个数x是非负整数 如果int(abs(x))=x,则x就是自然数
2019年8月23
感谢你的观看
15
VB常用数学函数
函数名 函数的功能 Sqr(x) 求x的算术平方根
示例 Sqr(16)的返回值为4
Int(x) 向下取整，取不大于x的 int(5.6)的返回值为5
最大整数
int(-5.6)的返回值为-6