(共21张PPT)
Vb选择结构程序设计
复习旧知
1.下列句子中，
不是赋值语句。
A.
A=
"
123
"
+
"
456
"
B.
Text1.Text=
"你好！
"
C.
r=val(Text1.Text)
D.
x+1=y
D
2.显示下图所示输入框的语句是
。
A.
A
=
InputBox("请输入一个正整数",
"示例"
,"1")
B.
A
=
InputBox("示例",
"请输入一个正整数"
,"1")
C.
A
=
InputBox
("1","示例",
"请输入一个正整数"
)
D.
A
=
InputBox("请输入一个正整数",
"示例")
A
3.当执行以下程序段后，在窗体上将显示（
）。
Private
Sub
Commandl_Click(
)
Print
"
VB
"
Print
"
Hello!
"
；
Print
"
VB
"
End
Sub
A.???VB
Hello!
VB
B.????VB
Hello!VB
C.????VB
Hello!
VB
D.
VB
Hello!
VB
B
体验游戏程序
代码分析
Private
Sub
Command1_Click()
Dim
price
As
Integer
price
=
val(Text1.Text)
If
Then
MsgBox
"猜低了，再试试!"
If
Then
MsgBox
"猜高了，再试试!"
If
Then
MsgBox
"猜对了，你真厉害!"
End
Sub
price
<
7899
price
>
7899
price
=
7899
选择结构就是在程序运行时,对程序的走向进行选择,以便决定
执行哪种操作.
If
price
<
7899
Then
MsgBox
"猜低了，再试试!“
If……then……的流程图
这种只对条件满足时的情况进行处理，我们称为选择结构中的单分支结构。
Price<7899?
猜低了，再试试
真
假
判断条件
条件判断
语句块
真
假
单分支语法格式
单分支语法格式：
行if格式
块if格式
（1）If
<条件表达式>
Then
<语句块>
（2）If
<条件表达式>
Then
<语句块>
End
If
这里的条件表达式是关系表达式或逻辑表达式,其值只有真或假两种，当表达式的值为真时，视为条件成立。
语句块可以是赋值语句（a=3）、输出语句(print、msgbox)、结束语句(end)等。
关系运算符
功能
关系运算符
功能
小于
>=
大于等于
<=
小于等于
=
等于
>?
大于
<>?
不等于
关系表达式是用关系运算符将算术表达式或字符表达式连接起来的式子。
关系表达式
逻辑值
a<>b
a
<=
(b
+
20)
a>b
a=b
"a"
>
"b"
"a"<>"b"
a变量中的值为100、b变量中的值为20。
写出表达式的逻辑值。
True
False
True
False
False
True
常见ASCII码的大小规则：0~9
1）数字比字母要小。如
“7”<“F”；
2）数字0比数字9要小，并按0到9顺序递增。如
“3”<“8”
；
3）字母A比字母Z要小，并按A到Z顺序递增。如“A”<“Z”
；
4）同个字母的大写字母比小写字母要小32。如“A”<“a”
。
几个常见字母的ASCII码大小：
“A”为65；“a”为97；“0”为
48
条件表达式
逻辑表达式是用逻辑运算符连接起来的式子。
逻辑运算符
功能
And
逻辑运算符连接的两个表达式同时为“真”时则逻辑表达式为“真”
Or
逻辑运算符连接的两个表达式只要有一个为“真”时则逻辑表达式为“真”
Not
将逻辑运算符后面的表达式的值取反
a变量中的值为100、b变量中的值为20。
逻辑表达式
逻辑值
a>200
And
b=20
a>=100
And
b>10
a>200
Or
b=20
a>=100
Or
b>10
False
True
True
True
条件表达式
If
price
=
7899
Then
MsgBox
"猜对了，你真厉害“
If
price
<
7899
Then
MsgBox
"猜低了，再试试“
If
price
>
7899
Then
MsgBox
"猜高了，再试试“
If
price
=7899
then
MsgBox
"猜对了，你真厉害“
Else
MsgBox
“猜错了,再试试"
If
price
=
7899
Then
MsgBox
"猜对了，你真厉害“
三个单分支
两个单分支
一个双分支
语法之间的转换
If
price
<>
7899
Then
MsgBox
"猜错了，再试试"
（1）If
<条件表达式>
Then
<语句1>
Else
<语句2>
（2）If
<条件表达式>
Then
<语句块1>
Else
<语句块2>
End
If
双分支语法格式：
条件满足
条件不满足
双分支语法格式
单分支结构
双分支结构
判断条件
语句块
真
假
判断条件
语句块1
真
假
语句块2
单分支结构只对判断条件为真的情况进行处理，双分支结构既对判断条件
为真的情况进行处理，同时也对判断条件为假的情况也进行处理，所以双分
支结构也就多了else部分的内容。
两种结构对比分析
测试练习
1．语句If
x=1
Then
y=1,下列说法正确的是（
）。
A、x=1和
y=1
均为赋值语句
B、x=1和
y=1均为关系表达式
C、x=1为关系表达式，y=1为赋值语句
D、x=1为赋值语句，y=1为关系表达
2.电梯的最大容量为13人，在此范围内电梯能正常运行，超出了这个范围电梯将发出警报,依次填入下方横线上的代码是（
）
Dim
a
as
integer
a=val(inputbox(“请输入进入电梯的人数”))
a<=13
print
“正常运行”
print
“发出警报”
A.if…….then……end
if……else
B.then……if……else……end
if
C.if……then……else……end
if
D.if……else……then……end
if
C
C
3.以下程序段运行后，分别输入5和6，则输出字符的排列顺序是（
）
I=val(inputbox(“请输入I的值”))
If
I
<6
then
Print
“#”
;
Else
Print
“
”
End
if
A.
#
B.#
C.##
D.
B
4.下列逻辑表达式中，能正确表示条件”x,y,z全是偶数“的是（
）.
A、（x+y+z)
mod
2=0
B、
x
mod
2=0
or
y
mod
2
=0
or
z
mod
2=0
C、
x
mod
2=0
And
y
mod
2
=0
And
z
mod
2=0
D、
(x+y+z)
mod
2=1
C
测试练习
5、三角形三条边为a、b、c(a>b)，下列逻辑表达式中，能正确判断a、b、c能否构成三角形的关系式是（
）
A、
a+b>c
B、
a+b>c
or
a+c>b
or
b+c>a
C、
a+b>c
And
a+c>b
And
b+c>a
D、
a-b测试练习
C
总结
If
<
条件表达式>
Then
<语句块>
If
<条件表达式>
Then
<语句块1>
Else
<语句块2>
End
If
单分支结构：
双分支结构：
If
<
条件表达式>
Then
<语句块>
End
If
If
<条件表达式>
Then
<语句块1>
Else
<语句块2>
True
False
Price<7899?
If语句的嵌套：
If
<条件1>
Then
<语句组1>
Else
If
<条件2>
Then
<语句组2>
Else
<语句组3>
End
if
End
if
Price=7899?
True
False
在vb程序中把代码补充完整并调试运行，得出结果后再选择答案
。
5.走路可以减肥，平地甩手走20分钟内（含20分钟）消耗的能量为6卡每分钟，超过20分钟消耗的能量为7.9卡每分钟。走路的分钟数43分钟，输出共消耗的能量。（
）
Dim
t,n
as
single
t=val(inputbox(“请输入t的值“))
if
then
else
end
if
print
“n=”;n
A．258卡
B.339.7卡
C.439.7卡
D.301.7卡
上机练习
1）一个行if语句必须在一行上写完，没有endif；而一个块if语句的Then、else后面必须换行，最后由endif结束（elseif是一个整体）；?
2）一个行if语句仅能判断两种情况，而一个块if语句可判断多种情况；?
3）行if语句的else部分，块if语句的elseif和else部分可以没有，即条件不符合，什么也不执行就结束if语句；?
4）行if语句中只能是“语句”，即单个赋值语句，而块if语句中是“语句块”，可以是多个赋值语句和其它语句；
行if语句和块if语句?
?
在计算机中，所有的数据在存储和运算时都要使用二进制数表示（因为计算机用高电平和低电平分别表示1和0），例如，像a、b、c、d这样的52个字母（包括大写）以及0、1等数字还有一些常用的符号（例如
、#、@等）在计算机中存储时也要使用二进制数来表示，而具体用哪些二进制数字表示哪个符号，当然每个人都可以约定自己的一套（这就叫编码），而大家如果要想互相通信而不造成混乱，那么大家就必须使用相同的编码规则，于是美国有关的标准化组织就出台了ASCII编码，统一规定了上述常用符号用哪些二进制数来表示?[2]??。
美国标准信息交换代码是由美国国家标准学会(American
National
Standard
Institute
,
ANSI
)制定的，是一种标准的单字节字符编码方案，用于基于文本的数据。它最初是美国国家标准，供不同计算机在相互通信时用作共同遵守的西文字符编码标准，后来它被国际标准化组织（International
Organization
for
Standardization,
ISO）定为国际标准，称为ISO
646标准。适用于所有拉丁文字字母?[3]??。
返回《VB程序设计——选择结构》教学设计
课
题
?VB程序设计——选择结构
■教材分析
选择控制结构是程序的三个基本结构中的一个重要结构，计算机的逻辑判断能力就是通过选择结构来完成的。条件语句中的“条件”是用关系表达式、逻辑表达式来描述的。程序中能否实现正确的“选择”决定于关系表达式或逻辑表达式的正确描述。关系表达式与逻辑表达式是本节中教学的重点与难点。
用选择结构编写简单的程序解决具体问题是在学生已经掌握了程序设计数据的表示与处理的基础上，理解了顺序结构的前提后提出的。通过本课的学习，可以促进学生对问题解决方法和思想的理解与掌握，从而提升学生的问题解决能力，让学生在按照一定的流程解决问题的过程中，去体会和理解程序设计的思想。
■学情分析
学生在前面的课上对vb程序设计已经有了一定的基础，学生的分析、综合能力及独立思考能力、分析解决问题的能力都有了一定的水平，在教师的有效引导下，有能力进行自我探究，如果用一种学生比较感兴趣的，能够贴近学生日常生活的例子来分析选择结构的话，那么学生会比较感兴趣。
■教学目标
1.知识与技能
1.了解选择结构的基本概念。
2.了解关系表达式与逻辑表达式的概念。
3.能利用VB中的条件语句实现简单的选择结构。
2.过程与方法
经历实践、分析、归纳，掌握IF语句的格式和功能。
3.情感态度与价值观
运用半成品加工策略，完善程序，发展学生思维的逻辑性及严谨的学习态度。
4.行为与创新
培养学生利用计算机的反馈作用进行探究学习的能力。
■课时安排
安排1课时。
■教学重点与难点
1.教学重点
让学生学会使用VB语言的If分支语句，掌握分支判断程序结构，来解决实际问题，并且培养学生的探索、创新能力。
2.教学难点
对解决问题的方法和步骤的理解，并能根据实际问题写出程序代码。
■教学过程
教学
环节教师与学生活动
导入新课
新课讲解复习旧知，引入新课
1．下列句子中，
不是赋值语句。
A.
A=”123”
+”456”
B.
Text1.Text=“你好！”
C.
r=val(Text1.Text)
D.
x+1=y
2.
显示下图所示输入框的语句是
。
A.
A
=
InputBox("请输入一个正整数",
"示例"
,"1")
B.
A
=
InputBox("示例",
"请输入一个正整数"
,"1")
C.
A
=
InputBox
("1","示例",
"请输入一个正整数"
)
D.
A
=
InputBox("请输入一个正整数",
"示例")
3.当执行以下程序段后，在窗体上将显示（
）。
Private
Sub
Commandl_Click(
)
Print
“VB”
Print“Hello!”；
Print
“VB”
End
Sub
A.???VB
Hello!
VB
B.??VB
Hello!VB
C.??VB
Hello!
VB
D.
VB
Hello!
VB
体验游戏程序，学习新知
三、代码分析
新课讲解
五、条件表达式
讲解关系表达式是用关系运算符将算术表达式或字符表达式连接起来的式子。
关系运算符功能关系运算符功能<小于>=大于等于<=小于等于=等于>大于<>不等于
1.a变量中的值为100、b变量中的值为20。写出表达式的逻辑值。
关系表达式逻辑值a<>bTruea
<=
(b
+
20)Falsea>bTruea=bFalse“a”
>
“b”False“a”<>”b”True
讲解逻辑表达式是用逻辑运算符连接起来的式子。
逻辑运算符功能And逻辑运算符连接的两个表达式同时为“真”时则逻辑表达式为“真”Or逻辑运算符连接的两个表达式只要有一个为“真”时则逻辑表达式为“真”Not将逻辑运算符后面的表达式的值取反
2.a变量中的值为100、b变量中的值为20。
逻辑表达式逻辑值a>200
And
b=20Falsea>=100
And
b>10Truea>200
Or
b=20Truea>=100
Or
b>10True
新课讲解
六、双分支语法格式
学生
练习
1．语句If
x=1
Then
y=1,下列说法正确的是（C
）。
A、x=1和
y=1
均为赋值语句
B、x=1和
y=1均为关系表达式
C、x=1为关系表达式，y=1为赋值语句
D、x=1为赋值语句，y=1为关系表达
2.电梯的最大容量为13人，在此范围内电梯能正常运行，超出了这个范围电梯将发出警报。（C）
Dim
a??as
integer
a=val(inputbox(“请输入进入电梯的人数”))
.
a<=13
print
“正常运行”
print
“发出警报”
A.if…then…end
if…else?
?B.then…if…else…end
if
C.if…then…else…end
if?
?
D.if…else…then…end
if
3.以下程序段运行后，分别输入5和6，则输出字符的排列顺序是（??B
）
I=val(inputbox(“请输入I的值”))
If
I
<6
then
Print
“#”
；
Else
Print
“
”
End
if
A.
#?
??
?B.#
?
???C.##?
??
?D.
4.下列逻辑表达式中，能正确表示条件“x,y,z全是偶数”的是（
C
）.
A、（x+y+z)
mod
2=0
B、
x
mod
2=0
or
y
mod
2
=0
or
z
mod
2=0
C、
x
mod
2=0
And
y
mod
2
=0
And
z
mod
2=0
D、
(x+y+z)
mod
2=1
5、三角形三条边为a、b、c(a>b)，下列逻辑表达式中，能正确判断a、b、c能否构成三角形的关系式是（
C
）
A、
a+b>c
B、
a+b>c
or
a+c>b
or
b+c>a
C、
a+b>c
And
a+c>b
And
b+c>a
D、
a-b课堂小结
上机
练习在vb程序中把代码补充完整并调试运行，得出结果后再选择答案
。
5.走路可以减肥，平地甩手走20分钟内（含20分钟）消耗的能量为6卡每分钟，超过20分钟消耗的能量为7.9卡每分钟。走路的分钟数43分钟，输出共消耗的能量。（
）
Dim
t,n
as
single
t=val(inputbox(“请输入t的值“))
if
t〈=20
then
n=6
t
else
n=6
20+（t-20）
7.9
end
if
print
“n=”;n
A．258卡
B.339.7卡
C.439.7卡
D.301.7卡
2