VB_if_语句的应用精品PPT课件
合集下载
vb课件If语句
VB程序结构及基本语句 第二节
选择结构
If语句
• 11、If变…量T的he赋n值语句(单分支结构) If<表达式> Then <语句块>
End if 或 If<表达式> Then <语句块>
执行过程流程图：
• 1、变量的赋值
表达 式
true
语句块
false
If语句
2 If…Then…Else 语句(双分支结构) If<•表1、达变式量>的赋Th值en <语句块1>
1、变量如何赋值 • 1、[变le量t]变的赋量值名=表达式
[对象名].属性名=表达式 例：Form1.width=300
n=2
n = n +1
x=1:y=2:z=3
2、程序如何进行 • 1、顺变序量的执赋行值，执行完当前语句
后，在执行下一条，依次执 行。 例：a%=22
b!=22 c$=asdfad Print“a=”;a,“b=”;b print “c=”;c
… ElseIf<表达式n> then <语句块n>
Else <语句块n+1>
End If
执行过程流程图：
• 表1达、式变量的赋fa值lse 1
表达式
true
2
true
false
表达式 n
true
语句块1
语句块2
语句块n
false 语句块n+1
Select Case 语句(多分支结构)
Select Case 测试表达式 Ca•se1、表变达量式的1赋值 <语句块1> Case 表达式2 <语句块2>
vb if语句的用法
vb if语句的用法VBif语句是VisualBasic编程语言中最常用的控制语句之一。
它允许程序员根据一个或多个条件来执行不同的代码块。
在本文中，我们将介绍VB if语句的用法，包括语法、示例和常见问题。
语法VB if语句的基本语法如下：If condition Then'执行代码块1Else'执行代码块2End If其中，condition是一个逻辑表达式，它可以是任何返回True或False的表达式。
如果condition为True，则执行代码块1；否则执行代码块2。
另外，还可以使用多个if语句来实现更复杂的逻辑判断。
例如： If condition1 Then'执行代码块1ElseIf condition2 Then'执行代码块2ElseIf condition3 Then'执行代码块3Else'执行代码块4End If在这个例子中，如果condition1为True，则执行代码块1；如果condition1为False，但condition2为True，则执行代码块2；以此类推。
如果所有条件都为False，则执行代码块4。
示例以下是一个简单的VB if语句的示例：Dim num As Integernum = 5If num > 0 ThenMsgBox('num是一个正数。
')ElseIf num < 0 ThenMsgBox('num是一个负数。
')ElseMsgBox('num是零。
')End If在这个示例中，我们首先声明了一个变量num，并将其赋值为5。
然后，我们使用if语句来检查num的值。
如果num大于0，则弹出一个消息框，显示“num是一个正数”。
否则，如果num小于0，则弹出一个消息框，显示“num是一个负数”。
最后，如果num等于0，则弹出一个消息框，显示“num是零”。
VB程序设计第2版教学课件47块If语句实现嵌套
表达式真？ 真(非0)(0)
语句块1
语句块2
语句块3
End If
条件1成立？
成立(True)
不成立(False)
条件2成立？
成立(True)
语句组1
语句组2
不成立(False)
语句组3
2
块If语句嵌套格式
【说明】
【示例】
① 每一个块结构都要完整，必须以If开 始，以End If结束。 ② 内层嵌套的块结构中除了满足该层规 定的条件外，还必须满足外层结构中相 应位置的条件。
界面设计
3
块If语句嵌套应用
Private Sub Command1_Click()
代码设计
Dim a As Integer, b As Integer, c As Integer, min As Integer
a = Val(Text1.Text)：b = Val(Text2.Text)： c = Val(Text3.Text)
依据道路交通安全违法行为的严重程度，一次记分的分值 为:12分、6分、3分、2分、1分五种
条件1成立？
成立(True)
不成立(False)
条件2成立？
成立(True)
不成立(False)
语句组1
语句组2
语句组3
if语句嵌套格式
【格式】
if (表达式1） 语句块1；
else if (表达式2) 语句块2； else ……
Else Text1.Text = Str(x) Label5.ForeColor = vbRed
End If End Sub
机动车驾驶人在一个记分周期内未达到12分的，且没有违 法未处理的记录(一般指C1)，在下一个记分周期开始时将会 将原先的记分清0。如果有违法未处理的记录的情况，那么 此次记录所扣的分值将积累到下一年，直到违法记录消除。
vb if语句
VB选择结构
——IF语句
求绝对值
1、函数Abs( ) 2、程序语句
IF语句英译汉:
If the weather is good tomorrow, then I will go to the park.
If · · · · · · then · · · · · · (如果· · · · · · 那么· · · · · · )
If
x<5 y=x*4
Then
If
Else
x>= 5
Then
y=x*4*0.8 y=x*4
Else
y=x*4*0.8
End If
End If
或：If x>=5 Then y=x*4*0.8 Else y=x*0.4
IF习题
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为关系表达式
IF习题
2.电梯的最大容量为13人，在此范围内电梯能正常运行 ，超出了这个范围电梯将发出警报。（ c ） Dim a as integer a=inputbox(“请输入进入电梯的人数”) ? If a<=13 ? then print “正常运行” ? Else print “发出警报” ? end if A.if…….then……end if……else B.then……if……else……end if C.if……then……else……end if D.if……else……then……end if
If the weather is good tomorrow, then I will go to the park, else I have to stay at home.
VB中的IF语句(一)
end if print y
分支嵌套——双分支嵌套双分支
if 条件1 then
语句1
else
分
if 条件2 then
支 结 构 1
分
语句2
支 结
else
构 2
语句3
end if
end if
注意：每一层的end if结束本层判断。
小结
单分支结构
选
双分支结构
择
结
构
嵌套分支结构
if 条件 then 语句A
_a_=_-_a
end if
print a
Print 意为打印，是输出 语句。
例2：从键盘分别输入两个不相等的数到变量a、b，输出
其中较大的数。
if _a_>_b_ then
_p_r_in_t a
a>b
else
_p_r_in_t b
end if
练习1：输入两个不相等的数a，b，比较大小，将 大数放在a中，小数放在b中，然后输出a，b
if _a_<_b_ then t_=_a_: _a_=_b_: _b_=_t
end if
VB程序代码中一行可 以写多个语句，语句 间用冒号隔开。
嵌套分支结构
• 在分支结构的一个分支上再加入一个分支结构。 • 类型有多种，比如：单分支嵌套单分支、双分支嵌套双分
支等
嵌套分支结构
开始
表达式1？ T
表达式2? T
流程图
小说开头和结尾
细节描写的作用如下：
①刻画人物性格\ 追求\爱好。 ②深化主题。 ③推动情节的发展\营造一种氛围 。 ④渲染时代气氛、地方特色。 ⑤典型的环境细节，渲染人物心情\心理活动。 ⑥暗示影射。
分支嵌套——双分支嵌套双分支
if 条件1 then
语句1
else
分
if 条件2 then
支 结 构 1
分
语句2
支 结
else
构 2
语句3
end if
end if
注意：每一层的end if结束本层判断。
小结
单分支结构
选
双分支结构
择
结
构
嵌套分支结构
if 条件 then 语句A
_a_=_-_a
end if
print a
Print 意为打印，是输出 语句。
例2：从键盘分别输入两个不相等的数到变量a、b，输出
其中较大的数。
if _a_>_b_ then
_p_r_in_t a
a>b
else
_p_r_in_t b
end if
练习1：输入两个不相等的数a，b，比较大小，将 大数放在a中，小数放在b中，然后输出a，b
if _a_<_b_ then t_=_a_: _a_=_b_: _b_=_t
end if
VB程序代码中一行可 以写多个语句，语句 间用冒号隔开。
嵌套分支结构
• 在分支结构的一个分支上再加入一个分支结构。 • 类型有多种，比如：单分支嵌套单分支、双分支嵌套双分
支等
嵌套分支结构
开始
表达式1？ T
表达式2? T
流程图
小说开头和结尾
细节描写的作用如下：
①刻画人物性格\ 追求\爱好。 ②深化主题。 ③推动情节的发展\营造一种氛围 。 ④渲染时代气氛、地方特色。 ⑤典型的环境细节，渲染人物心情\心理活动。 ⑥暗示影射。
大学vb 第3章 选择结构(If语句)
BMI<19，偏轻 19≤BMI≤23，标准 BMI>23，超重
未超
End If
语句应用
问题3：希望程序给出重、轻和标准三种提示 。
If BMI > 23 Then
超重
ElseIf
Else BMI>=19
Then
标准 偏轻
End If
演示
……
ElseIf 温暖 Then 挤挤眼
跺跺脚
Else
伸伸腰 End If
语句应用（体重测试）
体重指数BMI 10000* 体重公斤 身高厘米
2
BMI<19，偏轻 19≤BMI≤23，标准 BMI>23，超重
语句应用
问题1：希望程序给出超重的提示 。
If BMI > 23 Then 超重
End If
BMI<19，偏轻 19≤BMI≤23，标准 BMI>23，超重
语句应用
问题2：希望程序给出超重和未超两种提示 。 If BMI > 23 Then 超重 Else Else If BMI <= 23 Then 未超 超重 End If
BMI<19，偏轻 19≤BMI≤23，标准 BMI>23，超重
If 语句：
单分支（一种执行结果） 双分支（两种执行结果选一） 多分支（多种执行结果选一）
下次课内容：
3.4 分支（选择）结构
实验作业：
实验作业5
如果 当前输入的密码=系统保存的密码 那么 登录成功 如果 当前输入的密码<>系统保存的密码 那么 重新登录
数学中比较的例子： 分段函数
未超
End If
语句应用
问题3：希望程序给出重、轻和标准三种提示 。
If BMI > 23 Then
超重
ElseIf
Else BMI>=19
Then
标准 偏轻
End If
演示
……
ElseIf 温暖 Then 挤挤眼
跺跺脚
Else
伸伸腰 End If
语句应用（体重测试）
体重指数BMI 10000* 体重公斤 身高厘米
2
BMI<19，偏轻 19≤BMI≤23，标准 BMI>23，超重
语句应用
问题1：希望程序给出超重的提示 。
If BMI > 23 Then 超重
End If
BMI<19，偏轻 19≤BMI≤23，标准 BMI>23，超重
语句应用
问题2：希望程序给出超重和未超两种提示 。 If BMI > 23 Then 超重 Else Else If BMI <= 23 Then 未超 超重 End If
BMI<19，偏轻 19≤BMI≤23，标准 BMI>23，超重
If 语句：
单分支（一种执行结果） 双分支（两种执行结果选一） 多分支（多种执行结果选一）
下次课内容：
3.4 分支（选择）结构
实验作业：
实验作业5
如果 当前输入的密码=系统保存的密码 那么 登录成功 如果 当前输入的密码<>系统保存的密码 那么 重新登录
数学中比较的例子： 分段函数
VB程序设计课件第6讲IF语句
IF语句的常见应用场景
IF语句在程序开发中有着广泛的应用。常见的应用场景包括输入验证、条件 判断、循环控制以及错误处理等。
编写高效的IF语句程序
为了编写高效的IF语句程序，我们可以使用简洁的逻辑和最小化的代码，避免冗余和重复的判断，提高程序执 行效率。
IF语句与其他控制语句的比较 与应用
除了IF语句，还有其他控制语句如SWITCH、FOR和WHILE等。了解它们之 间的区别和适用场景，可以根据实际需求选择最合适的控制语句。
实际案例：使用IF语句设计计 算器程序
我们可以利用IF语句设计一个简单的计算器程序，根据用户输入的运算符和 操作数，实现基本的数学运算功能。
实际案例：使用IF语句设计游 戏程序
使用IF语句可以实现游戏中的条件判断和逻辑操作。通过IF语句，我们可以实 现游戏规则、关卡切换、角色互动等功能。
实际案例：使用IF语句设计数 据库查询程序
数据库查询程序是常见的应用场景之一。通过IF语句，我们可以根据用户的 查询条件，从数据库中获取相应的数据。
避免IF语句的滥用
IF语句虽然强大，但滥用IF语句会导致代码的复杂性和可读性降低。我们需要 遵循简洁和清晰的编程原则，避免不必要的IF语句。
IF语句的优缺点
IF语句的优点是灵活性和可读性高，可以根据不同的条件执行不同的代码块。 缺点是嵌套层级过多时可读性变差，效率有一定影响。
If 条件 Then 执行代码块 End If
为什么需要IF语句？
IF语句可以使程序根据不同的条件采取不同的行动，从而实现灵活的控制流 程。它为程序提供了判断和决策的能力，增加了程序的逻辑性和实用性。
IF语句的执行流程
当程序遇到IF语句时，首先评估条件表达式的真假。如果条件为真，则执行IF代码块；否则，跳过IF代码块， 继续执行下一个语句。
VB中的IF语句精
a>b
else
_p_ri_n_t b
end if
练习1：输入两个不相等的数 a，b，比较大小，将 大数放在 a中，小数放在 b中，然后输出 a，b
if _a_<_b_ then
_t=_a_:_a_=_b_:_b_=_t
end if
VB程序代码中一行可 以写多个语句，语句 间用冒号隔开。
嵌套分支结构
开始 输入身高 cm 和 体 重 kg
体重± 10%标准体重
输出“恭喜， 标准身材！”
结束
输出“不太 标准诶”
开始
顺序结构
输入身高
cm 和 体 重
正
kg
确
no
的
体重± 10%标准体重
应
选
该 是 这
yes
输出“恭喜， 标准身材！”
输出“不太
择
标准诶”
结
构
样
的
结束
循环结构
测试体重标准与否的完整依据： 标准体重（公斤）= 身高（厘米）- 110 ?标准体重 ±10%为 理想体重 ?超过标准体重10%为 超 重 ?超过标准体重20%为 轻度肥胖 ?超过标准体重30%为 中度肥胖 ?超过标准体重50%为 重度肥胖
end if
例1：输入一个数到变量a，输出它的绝对值（不用绝对值
函数）
a = inputbox()
if _a_<_0_ then
a<0
_a_=_-_a
end if
print a
Print 意为打印，是输出 语句。
例2：从键盘分别输入两个不相等的数到变量a、b，输出
其中较大的数。
if _a_>_b_ then _p_ri_n_t a
VB课件
F
使用ElseIF: x=Val(txtX.Text) If x>=0 Then y=1+x ElseIf x>=-1Then y=1-2x Else y=1-3x End If TxtY.Text=y
x>=-1？ T y 1-2x
y 1-3x
输出y
二、Select Case语句 语句
条件1 条件2 程序流程图 A1块 A1块
ElseIf <条件 条件3> Then 条件 [<语句序列 语句序列3>] 语句序列
…… [Else [其他语句序列 其他语句序列]] 其他语句序列 End If
1+x (x>=0) 例子： y= 1-2x (-1=<x<0) 1-3x (x<-1)
输入x
x>=0？ T y 1+x
F
x=Val(txtX.Text) If x>=0 Then y=1+x Else If x>=-1 Then y=1-2x Else y=1-3x End If End If TxtY.Text=y
第四章、选择结构程序设计 第四章、 一、IF语句 语句
1.一般格式 一般格式 语法格式 : 单行条件判断： 单行条件判断： If <条件 Then [<语句序列 条件> 语句序列1>] [Else <语句序列 语句序列2>] 条件 语句序列 语句序列 块结构： 块结构： If <条件 Then 条件> 条件 [<语句序列 语句序列1>] 语句序列 [Else [<语句序列 语句序列2>]] 语句序列 End If
例子：y=
1+x (x>=0) 1-2x (-1=<x<0) 1-3x (x<-1)
使用ElseIF: x=Val(txtX.Text) If x>=0 Then y=1+x ElseIf x>=-1Then y=1-2x Else y=1-3x End If TxtY.Text=y
x>=-1？ T y 1-2x
y 1-3x
输出y
二、Select Case语句 语句
条件1 条件2 程序流程图 A1块 A1块
ElseIf <条件 条件3> Then 条件 [<语句序列 语句序列3>] 语句序列
…… [Else [其他语句序列 其他语句序列]] 其他语句序列 End If
1+x (x>=0) 例子： y= 1-2x (-1=<x<0) 1-3x (x<-1)
输入x
x>=0？ T y 1+x
F
x=Val(txtX.Text) If x>=0 Then y=1+x Else If x>=-1 Then y=1-2x Else y=1-3x End If End If TxtY.Text=y
第四章、选择结构程序设计 第四章、 一、IF语句 语句
1.一般格式 一般格式 语法格式 : 单行条件判断： 单行条件判断： If <条件 Then [<语句序列 条件> 语句序列1>] [Else <语句序列 语句序列2>] 条件 语句序列 语句序列 块结构： 块结构： If <条件 Then 条件> 条件 [<语句序列 语句序列1>] 语句序列 [Else [<语句序列 语句序列2>]] 语句序列 End If
例子：y=
1+x (x>=0) 1-2x (-1=<x<0) 1-3x (x<-1)
VB中的IF语句
猜：
VB 编 程
By——
1.赋值语句
⑴ 给变量赋值
格式：变量名=表达式
Dim v As Integer Dim book As String*8 设置属性值：对象名.属性 =表达式 Dim sum As Single v=26 如: Label1.Caption= " hi " v=v+1 Text1.Text=A book="VB程序设计" sum=v*123.4+56.7
表达式1？ T 表达式2? T 语句块 F
结束
结束
单分支嵌套单分支
双分支嵌套双分支
例3：已知分段函数y=
分支结构1
1 , x>0 0 , x=0，输出y的值。 -1 , x<0
if
____ x<0 then 分支结构2 ____ y=-1
elseif ____ x=0 then ____ y=0 else ____ y=1 end if end if print y
分支嵌套——双分支嵌套双分支
条件1 then 语句1 elseif 条件2 then 语句2 else 语句3 end if end if if
分 支 结 构 1
分 支 结 构 2
注意：每一层的end if结束本层判断。
练习2：
购买地铁车票，若乘1—4站，3元/位；若乘5—9 站，4元/位；若乘10站以上，5元/位；输入人数 person、站数n，输出应付款pay。
2019/2/22
Mark=Text1.Text If Mark >= 90 Then Print "优" ElseIf Mark >= 60 Then Print “通过" Else Print “未通过" End If
VB 编 程
By——
1.赋值语句
⑴ 给变量赋值
格式：变量名=表达式
Dim v As Integer Dim book As String*8 设置属性值：对象名.属性 =表达式 Dim sum As Single v=26 如: Label1.Caption= " hi " v=v+1 Text1.Text=A book="VB程序设计" sum=v*123.4+56.7
表达式1？ T 表达式2? T 语句块 F
结束
结束
单分支嵌套单分支
双分支嵌套双分支
例3：已知分段函数y=
分支结构1
1 , x>0 0 , x=0，输出y的值。 -1 , x<0
if
____ x<0 then 分支结构2 ____ y=-1
elseif ____ x=0 then ____ y=0 else ____ y=1 end if end if print y
分支嵌套——双分支嵌套双分支
条件1 then 语句1 elseif 条件2 then 语句2 else 语句3 end if end if if
分 支 结 构 1
分 支 结 构 2
注意：每一层的end if结束本层判断。
练习2：
购买地铁车票，若乘1—4站，3元/位；若乘5—9 站，4元/位；若乘10站以上，5元/位；输入人数 person、站数n，输出应付款pay。
2019/2/22
Mark=Text1.Text If Mark >= 90 Then Print "优" ElseIf Mark >= 60 Then Print “通过" Else Print “未通过" End If
高中信息技术VB【if语句ppt】
条件 成立 语句块1 语句块2 不成立
【课堂小结】
条件 Then 语句块1
开始
随堂 练习 知识 回顾 知识 延伸
结束
流程图
第三节——程序的选择结构
新课 导入 知识 讲解
随堂 练习 知识 回顾 知识 延伸
一、怎样实现对用户名以及密码 的分别判断； 二、image图像框和picturebox 图片框有什么区别； 三、实现让密码以“*”的方式 呈现。
第三节——程序的选择结构
新课 导入 知识 讲解 程序可以通过If语句完成对条件的判断、选择。
VB语言 单分支结构 双分支结构
流程图 true false
If 条件 Then 语句块1
随堂 练习 知识 回顾 知识 延伸
条件
【Else
语句块2】
语句块1
语句块2
End If
演示
第三节——程序的选择结构
新课 导入 知识 讲解
QQ登录
QQ登录时，
VB语言 条件
随堂 练习 知识 回顾 知识 延伸
如果输入账号和密码都正确， 语句块1
那么显示登录成功， Else
End If 语句块1 语句块 2 语句块 2 否则显示输入有误。
If 条件 Then
第三节——程序的选择结构
新课 导入 知识 讲解
QQ登录 If 输入账号和密码都正确 Then 显示登录成功
else please put your left hand.
If you enjoy running every morning ，
授课教师：杨 丹 授课对象：高一（10班）
第三节——程序的选择结构
新课 导入 知识 讲解
QQ登陆界面
用if语句怎么来实现呢？
【课堂小结】
条件 Then 语句块1
开始
随堂 练习 知识 回顾 知识 延伸
结束
流程图
第三节——程序的选择结构
新课 导入 知识 讲解
随堂 练习 知识 回顾 知识 延伸
一、怎样实现对用户名以及密码 的分别判断； 二、image图像框和picturebox 图片框有什么区别； 三、实现让密码以“*”的方式 呈现。
第三节——程序的选择结构
新课 导入 知识 讲解 程序可以通过If语句完成对条件的判断、选择。
VB语言 单分支结构 双分支结构
流程图 true false
If 条件 Then 语句块1
随堂 练习 知识 回顾 知识 延伸
条件
【Else
语句块2】
语句块1
语句块2
End If
演示
第三节——程序的选择结构
新课 导入 知识 讲解
QQ登录
QQ登录时，
VB语言 条件
随堂 练习 知识 回顾 知识 延伸
如果输入账号和密码都正确， 语句块1
那么显示登录成功， Else
End If 语句块1 语句块 2 语句块 2 否则显示输入有误。
If 条件 Then
第三节——程序的选择结构
新课 导入 知识 讲解
QQ登录 If 输入账号和密码都正确 Then 显示登录成功
else please put your left hand.
If you enjoy running every morning ，
授课教师：杨 丹 授课对象：高一（10班）
第三节——程序的选择结构
新课 导入 知识 讲解
QQ登陆界面
用if语句怎么来实现呢？
VB中的IF语句
VB 编 程
授课对象：高一学生 授 课 人 ：黄小君
用来解决有关选择 结构的问题。
VB中的选择语句 ——IF语句
单分支结构
If 条件 语句A End If
Then
(本节课的重点)
选择结构
双分支结构
If 条件 Then 语句A Else 语句B End If
嵌套分支结构
选择结构与选择语句
是否为真？
If
语句块
条件 Then 语句A End If
If和end if 要成对出现
If
条件 Then 语句Ate Sub Command1_Click() If MsgBox("你真的要退 出吗?", vbOKCancel, "退 出") = vbOK Then End End If End Sub
退出为真？
否
是
退出
流程图
单分支结构
‘石头用数字“1”表示，剪刀用“2”表示，布用 “3”表示
电脑出剪刀， 你出石头
否
是
你赢了
流程图
Private Sub Option1_Click() Dim c As String, d As String, e As String 调取图片的路径 Dim a As Integer c = App.Path & "/1.jpg" d = App.Path & "/2.jpg" e = App.Path & "/3.jpg" 电脑随机出数（1,2,3） a = Int((3 * Rnd) + 1) Picture1(1).Picture = LoadPicture(App.Path & "\" & a & ".jpg")
授课对象：高一学生 授 课 人 ：黄小君
用来解决有关选择 结构的问题。
VB中的选择语句 ——IF语句
单分支结构
If 条件 语句A End If
Then
(本节课的重点)
选择结构
双分支结构
If 条件 Then 语句A Else 语句B End If
嵌套分支结构
选择结构与选择语句
是否为真？
If
语句块
条件 Then 语句A End If
If和end if 要成对出现
If
条件 Then 语句Ate Sub Command1_Click() If MsgBox("你真的要退 出吗?", vbOKCancel, "退 出") = vbOK Then End End If End Sub
退出为真？
否
是
退出
流程图
单分支结构
‘石头用数字“1”表示，剪刀用“2”表示，布用 “3”表示
电脑出剪刀， 你出石头
否
是
你赢了
流程图
Private Sub Option1_Click() Dim c As String, d As String, e As String 调取图片的路径 Dim a As Integer c = App.Path & "/1.jpg" d = App.Path & "/2.jpg" e = App.Path & "/3.jpg" 电脑随机出数（1,2,3） a = Int((3 * Rnd) + 1) Picture1(1).Picture = LoadPicture(App.Path & "\" & a & ".jpg")
vb if语句 课件 选择结构
块格式：
If <条件> Then [A组语句]
Else [B组语句]
END If
等价于： If score >= 90 Then print“优秀”：print“恭喜你！”Else Print“加油！”
4.2.1 If 条件语句
8
三、多分支（If…Then…ElseIf）
格式：
if <条件1> Then
[ A组语句] [Elseif <条件2> Then
[ B组语句 ] [Elseif <条件3> Then
[ C组语句 ] …… [Else [N组语句 ]
End If
10
思考题
用键盘输入一字符，判断该字符是小写字母、大写字母、 数字字符还是其他字符，并作相应的显示。
4.2.1 If 条件语句 11
[B组语句] END If
条件 T A组语句
F
B组语句
4.2.1 If 条件语句
7
➢ 单行语句（双分支）
单行语句：
if <条件> then <语句序列A> else <语句序列B>
例
If score>=90 then
print “优秀”
print “恭喜你！”
Else
print “加油！”
End if
注意 ElseIf 的写法 可以有任意多个Elseif子句；else放最后，最多一个
。
9
4.2.1 if条件语句
小
If 结构
结
一.单分支（If…Then 结构 ） 二. 双分支（If…Then…Else 结构） 三. 多分支（If…Then…ElseIf 结构）
VB中的IF语句(精)
判断的顺序改 变一下能够有 更大的优化， 再试一下
VB程序代码中一行可 以写多个语句，语句 间用冒号隔开。
嵌套分支结构
• 在分支结构的一个分支上再加入一个分支结构。
• 类型有多种，比如：单分支嵌套单分支、双分支嵌套双分 支等
嵌套分支结构
开始
开始 F
表达式 1？ T F 表达式 2？ T 语句块1 语句块2 语句块2
表达式1？ T 表达式2? T 语句块 F
流程图
程序代码
• • • • • • • • • • if n<=4 then pay=3*person else if n<=9 then pay=4*person else pay=5*person end if end if print pay
小结
if
单分支结构
条件 then 语句A end if if 条件 then 语句A else 语句B end if 条件1 then 语句1 else if 条件2 then 语句2 else 语句3 双分支嵌套双分支 end if end if if
猜：
V the weather is good tomorrow, then I will go to the park.
If · · · · · · then · · · · · · (如果· · · · · · 那么· · · · · · )
• If the weather is good tomorrow, then I will go to the park, else I have to stay at home.
结 束
开 始
顺序结构 正 确 的 应 该 是 这 样 的
输入身高 cm 和 体 重 kg
VB程序设计语句ppt课件
–
〈语句块n+1〉］
–
End Select
【例5.5】用户在文本框Text1中分别输入：Dot，Line，Box，Circle，在窗
体上分别画一个点、一条线、一个矩形、或一个圆等图形，然后在End
10
Select语句出口。
可编辑课件PPT
沈 阳 工 程 学 院－信息管理系
5.3 循环语句
5.3.1 For循环
沈 阳 工 程 学 院－信息管理系
IIf函数
例如：
–
If x>10 Then
–
r=1
–
Else
–
r=2
–
End If
而用IIf函数来代替,可以使程序大大简化。
–
r=IIf(x>10,1,2)
【例5.2】某大学实行按学分收费，如果不超过12学分，应缴纳 学费为4000元，如果超过12学分，每超过1学分，加收500元学费。 输入学分U，输出学分U和应缴纳的学费T。
– 格式：result=IIf(〈条件〉，〈True部分〉，〈False部 分〉)
– 功能：当〈条件〉为真时，IIf函数返回“True部分”，而当 〈条件〉为假时，IIf函数返回“False部分”。
– 说明：result函数的返回值，〈True部分〉、〈False部分〉 及结果变量的类型要一致。
7
可编辑课件PPT
5.2 条件语句
VB提供了多种形式的条件语句来实现选择结构。 对条件进行判断，根据判断结果，选择执行不 同的分支。
4
可编辑课件PPT
沈 阳 工 程 学 院－信息管理系
5.2.1 分支结构
1.单分支结构(If…Then语句)格式：
3章VB课件
Do While True For I = 1 To 100 Num = Int(Rnd * 100) Select Case Num Case 10: Exit For Case 50: Exit Do Case 64: Exit Sub End Select Next I
Loop End SubN来自xt i演示4.3 2D array and multi-dimensional array
2. Find the maximum and its index of row, column?
?? Use variable Max to store the maximum，row,col to store its index
e.g. Output the bigger one of two data. IF X>Y Then
Print X Else
Print Y End If Or:
IF X>Y Then Print X Else Print Y
Conditional If sentence
例3.5 设计一个求解一元二次方程的程序，要求考虑实
' 建立无穷循环。 ' 循环 100 次。 ' 生成一个0~99的随机数。
'退出 For...Next 循环。 '退出 Do...Loop 循环。 ' 退出子过程。
Chapter 4. Array and its applications
Example1：
Input 10 data and output their mean.
4.2.3 Basic opera第tion五s o章f 1D arr数ay 组
3. Find the maximum and its index Dim Max As Integer, iMax As Integer Max = A(1): iMax = 1 For i = 2 To 10 If A(i) > Max Then Max = A(i) iMax = i End If Next i Print "A(" & iMax & ")="; A(iMax)
Loop End SubN来自xt i演示4.3 2D array and multi-dimensional array
2. Find the maximum and its index of row, column?
?? Use variable Max to store the maximum，row,col to store its index
e.g. Output the bigger one of two data. IF X>Y Then
Print X Else
Print Y End If Or:
IF X>Y Then Print X Else Print Y
Conditional If sentence
例3.5 设计一个求解一元二次方程的程序，要求考虑实
' 建立无穷循环。 ' 循环 100 次。 ' 生成一个0~99的随机数。
'退出 For...Next 循环。 '退出 Do...Loop 循环。 ' 退出子过程。
Chapter 4. Array and its applications
Example1：
Input 10 data and output their mean.
4.2.3 Basic opera第tion五s o章f 1D arr数ay 组
3. Find the maximum and its index Dim Max As Integer, iMax As Integer Max = A(1): iMax = 1 For i = 2 To 10 If A(i) > Max Then Max = A(i) iMax = i End If Next i Print "A(" & iMax & ")="; A(iMax)
VB中的IF语句(一)
语句块语句块2开始表达式语句块1结束语句块2表达式语句块2开始表达式语句块1结束语句块2开始表达式语句块1结束开始表达式语句块1结束语句块2例3
猜：
VB 编 程
Uç—— Uç—— 王晓媛
IF语句英译汉: IF语句英译汉: 语句英译汉
• If the weather is good tomorrow, then I will go to the park.
a = inputbox("") if a<0 a<0 ____ a=-a ____ end if print a
Print 意为打印，是输出 语句。
then
例2：从键盘分别输入两个不相等的数到变量a、b，输出 从键盘分别输入两个不相等的数到变量a
其中较大的数。 其中较大的数。
if
a>b ____ print ____ a
then
a>b
else print ____ b end if
练习1：输入两个不相等的数a，b，比较大小，将 输入两个不相等的数a 输入两个不相等的数 比较大小， 大数放在a 小数放在b 然后输出a 大数放在a中，小数放在b中，然后输出a，b
if
a<b ____
then
t=a: a=b: b=t __________ end if
If ······then ······ (如果······那么······)
• If the weather is good tomorrow, then I will go to the park, else I have to stay at home.
If······ then······ else······ (如果······那么······否则······)
猜：
VB 编 程
Uç—— Uç—— 王晓媛
IF语句英译汉: IF语句英译汉: 语句英译汉
• If the weather is good tomorrow, then I will go to the park.
a = inputbox("") if a<0 a<0 ____ a=-a ____ end if print a
Print 意为打印，是输出 语句。
then
例2：从键盘分别输入两个不相等的数到变量a、b，输出 从键盘分别输入两个不相等的数到变量a
其中较大的数。 其中较大的数。
if
a>b ____ print ____ a
then
a>b
else print ____ b end if
练习1：输入两个不相等的数a，b，比较大小，将 输入两个不相等的数a 输入两个不相等的数 比较大小， 大数放在a 小数放在b 然后输出a 大数放在a中，小数放在b中，然后输出a，b
if
a<b ____
then
t=a: a=b: b=t __________ end if
If ······then ······ (如果······那么······)
• If the weather is good tomorrow, then I will go to the park, else I have to stay at home.
If······ then······ else······ (如果······那么······否则······)
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
练习
p当x=5,y=2时，求下面表达式的结果。
x<5 and x>0 or not x>y and x*2>5
false and true false
not true false and
true true
false
or
false
逻辑运算的优先级：not—> and —>or
任务
说明：
1、输入体重（kg）和身 高（m） 2、BMI是体重指数 BMI=体重/身高*身高 3、BMI在18.5~23.9之间 体重是正常的，否则是不 正常的。
You Know, The More Powerful You Will Be
谢谢大家
荣幸这一路，与你同行
It'S An Honor To Walk With You All The Way
演讲人：XXXXXX 时 间：XX年XX月XX日
true and true = true
false and true=false
or (或者)
两个表达式中只要有一个为真时，结果就为真；
只有当两个表达式的值都为假（false）时，结果才为假
false or false = false
false and ture =true
表达式中可能包括
算术运算、关系运算和逻辑运算等多种基本运算， 以及这些基本运算所涉及的数据（变量和常量）。
算术运算 关系运算 逻辑运算
高
低
练习
由下列条件写出相应的VB逻辑表达式 1、条件“-3<x<3”写作逻辑表达式：
x>-3 and x<3 2、判断整型变量k是正的奇数的逻辑表达式：
k >0 and k mod 2 =1 3、判断变量a、b均不为0的逻辑表达式：
a*b<>0 a<>0 and b<>0
选择结构
选择语句
if 条件 then 语句A
end if
If和end if 要成对出现
if 条件 then 语句A
else 语句B
end if
例1：输入一个数到变量a，输出它的绝
对值（不用绝对值函数）
a = inputbox("")
if _a_<_0_ then
a<0
_a_=_-_a
end if
print a
End If Print y; "元"
关系运算与关系表达式
Ø关系运算符：用于比较表达式大小关系
＝、<>、 ＜、<=、＞、 >= 当x=5,y=2时，求下面关系表达式的结 果。 x=5 x<=5 x>=0 x<>y x*2>5
关系运算与关系表达式
dim 变量名 as boolean
Ø逻辑类型只有两种结果：
Print 意为打印，是输出 语句。
例2：从键盘分别输入两个不相等的数
到变量a、b，输出其中较大的数。
if _a_>_b_ then
_p_r_in_t a
a>b
else
_p_r_in_t b
end if
购买水果问题：
I<f判w断<条5件> Then y=<5语*w句1>
Else y=<5语*句w2*>0.8
会选择的语句
——IF 语句
最新消息
据可靠消息，附近新开了一家水果店，出售各类水果， 色香味俱全，最近对芒果进行促销，根据顾客购买的数量调 整芒果销售的价格。如顾客一次购买5斤以下按原价5元出售 ，一次5斤以上（含5斤）时则可以在原价的基础上打8折。
（条件语句（if 语句）就是为解决此类问题而设计的。）
Ø True（表示结果为真）
Ø False（表示结果为假）
当x=5,y=2时，求下面关系表达式的结果。 x=5 true x<=5 true x<0 false x<>y true x*y>10 false
购买水果问题：
0<w<5
If w < 5 Then y=5*w Else y = 5*w*0.8 End If Print y;”元”
在VB程序中能直接书写0<w<=5吗？
w>0 And w<5
逻辑运算与逻辑表达式
Ø逻辑运算符：三种常用逻辑运算 Ønot （逻辑非，取相反的逻辑值） Øand （逻辑与，同时满足条件） ØOr （逻辑或，满足某个条件）
基本运算 非 与 或
运算符 Not And Or
表达式
表示式的值
not（3>2）
分析问题：
w表示苹果重量， y表示应付金额；
5斤以下：y=w*5； 5斤以上：y=w*5*0.8
设计算法： ① 输入苹果重量w的值；
② 判断w>=5的值是true还是flase
③ 计算应付金额y，如果w>=5的值 是true，则y=w*3*0.8；否则为y=w*3
④ 输出应付金额y
什么是IF条件语句
False
(25>=10) anr (25<2)
False
逻辑运算与逻辑表达式
Not (取反)
取原始逻辑值相反的值 not true = false not false = true
and (并且)
只用当两个表达式的值都为真（true）时，结果才是真。
说明：
1、输入体重（kg）和身 高（m）
2、BMI是体重指数
BMI=体重/身高*身高
3、BMI在18.5~23.9之间 体重是正常的，否则是不 正常的。
开始
输入体重和 身高
BMI=体重 /身高*身高
true
false
18.5<=BMI<=23.9
体重正常
体重不正常
结束
写在最后
经常不断地学习,你就什么都知道。你知道得越多,你就越有力量 Study Constantly, And You Will Know Everything. The More