文档介绍：*
*
第四章选择结构
运算符与表达式
依次结构
If语句
多条件选择语句
选项按钮
复选框
*
*
算术运算符与算术表达式
d y mod400=0
*
*
依次结构
依次结构是程序中最基本的一种结构，顾名思义是依据依次向下执行，一条语句执行完毕之后接着执行下一条语句的结构。
*
*
Private Sub Command1_Click()
Dim a As Integer,b As Integer
a=12
Print “a=”; a
b=2*a
Print “b=”; b
End Sub
结果：a=12
b=24
*
*
单行选择语句If…Then…Else
单行选择语句的语法格式为：
If <条件> Then 语句序列1 [Else 语句序列2]
If语句
条件
语句序列1
语句序列2
真
假
条件表达式的结果为一个布尔值；可以是关系表达式；布尔表达式；数值表达式，非0值为True，0为False；字符串表达式，只允许出现包含数字的字符串。
*
*
分析：当x≥2时，用公式y＝x3－9来求y的值；当x<2时，用公式y＝x2＋5x-6来计算y的值。
例【4-3】根据以下分段函数，任意输入一个x值，求出y值。
*
*
x
≥
2
y
=
x
3
－
9
y
＝
x
2
＋
5
x
-
6
真
假
输入
x
值
输出
y
值
*
*
Private Sub Command1_Click( )
Dim x As Single
x = Val()
If x >= 2 Then y = x ^ 3 - 9 Else y = x ^ 2 + 5 * x - 6
= y
End Sub
*
*
IIF语句也是单条件选择结构语句，其语法格式为：
IIF(条件，语句序列1，语句序列2)
其中：语句序列1是条件为真时要执行的语句块部分，语句序列2是条件为假时要执行的语句块部分。
If x >= 2 Then y = x ^ 3 - 9 Else y = x ^ 2 + 5 * x - 6
利用IIF语句可将改其写成如下形式：
y=IIF(x>=2, x ^ 3 – 9,x ^ 2 + 5 * x – 6)
IIF语句
*
*
其语法格式如下：
If <条件> Then
[<语句序列1>]
[Else
[<语句序列2>]]
End If
块结构条件语句If…Then…Else…End If
当If语句中的语句序列要包含多条语句时，接受块结构条件语句。
If x >= 2 Then
y = x ^ 3 - 9
Else
y = x ^ 2 + 5 * x – 6
End If
块结构中的If语句必需以End If结束
*
*
If语句的嵌套是指语句序列1或语句序列2本身又是一个If语句。
语法格式：If <条件1> Then
If <条件2> Then
<语句序列1>
Else
<语句序列2>
End If
Else
<语句序列3>
End If
If语句的嵌套
*
*
条件2
条件1
*
*
例：铁路托运行李，从甲地到乙地，规定每张客票托运费计算方法是行李重量不超过50kg时，，超过50kg而不超过100kg时，，超过100kg时，。编写程序，输入行李重量，计算并输出托运的费用。
分析：设行李重量为wkg，应付运费为x元，则运费公式为：
*
*
Private Sub Command1_Click()
Dim w As Single, x As Single
w = Val()
If w <= 50 Then
x = * w
Else
If w <= 100 Then
x =