04 选择结构.ppt

文档介绍：第4章选择结构
在程序设计中经常遇到这类问题,它需要根据不同的情况采用不同的处理方法。例如,一元二次方程的求根问题,要根据判别式小于零或大于等于零的情况,采用不同的数学表达式进行计算。对于这类问题,如果用顺序结构编程,显然力不从心。必须借助选择结构。本章主要介绍实现选择结构的语句。包括:行If语句、块If语句、 Else If语句、Select Case语句,以及选择结构在程序设计中的应用。
退出
块If
Else If语句
行If语句
Select Case语句
块If
块If的格式、功能
格式:
If 条件 then
语句块1
[ Else
语句块2]
End If
说明:
(1)“条件”一般为关系表达式或逻辑表达式。
通常把关系表达式或逻辑表达式的值为真时,称为条件满足;值为假时,称为条件不满足。反之亦然。
(2)语句块1、语句块2分别是“条件”满足或不满足时,处理方法的描述,可以是若干个语句。
(3)If…Then 、Else、End If 是VB的保留字。
功能:
(1)块If首先判断“条件”,其值为真时,执行语句块1;为假时执行语句块2。当缺省[Else…]中的内容时,该选择结构只对条件满足的情况进行处理。执行过程如图4-1所示。
【】火车站行李费的收费标准是50kg以内(包括50kg),。编写程序,要求根据输入的任意重量,计算出应付的行李费。
根据题意计算公式如下:
程序代码如下:
' "计算"按钮代码
Private mand1_Click()
Dim weight as single,pay as single
weight=
If weight > 50 Then
pay =(weight - 50)* + 50 *
Else
pay = weight *
End If
= pay
End Sub
Private mand2_Click()
= ""
= ""
End Sub
Private mand3_Click()
End
End Sub