《Visual Basic程序设计 第3版 教学课件 吴昌平 第4章》.pdfVIP

第 4 章 选择结构 4.1 块If 4.2 Else If语句 4.3 行If语句 4.4 Select Case语句 温 馨 提 示 本文档为 PDF 格式课件，不能运用教学演示， 需要 PPT 格式的课件 ，请 访问 尚辅网 ： 更多课件等您拿。 快速获得课件方法：在淘宝店铺查找输入： 教 学配套课件中心 ；或是直接输入地址 ： 惊喜超出您的想象！ 直接联系获取课件QQ: 349134187 旺旺：源汇雅馨 扫一扫绝对免费获得课件：订阅尚辅网微信公众 号 一扫课件到手！！！！！！ 在程序设计中经常需要根据不同的情 况采用不同的处理。例如，一元二次方程 的求根问题，要根据判别式小于零或大于 等于零的情况，采用不同的数学表达式进 行计算。对于这类问题，必须借助选择结 构。 本章主要介绍实现选择结构的语句。 包括：行If语句、块If语句、 Else If语 句、Select Case语句，以及选择结构在程 序设计中的应用。 4.1 块If 4.1.1 块If的格式、功能 格式： If 条件 then 语句块1 [ Else 语句块2] End If 说明： 1．“条件”一般为关系表达式 或逻辑表达式。 通常把关系表达式或逻辑表达 式的值为真时，称为条件满足；值 为假时，称为条件不满足。反之亦 然。 2．语句块1、语句块2分别是 “条件”满足或不满足时，处理方 法的描述，可以是若干个语句。 3．If …Then 、Else、End If 是VB 的保留字。 功能： 块If首先判断“条件”，其值为真时， 执行语句块1；为假时执行语句块2。当缺 省[Else…]中的内容时，该选择结构只对 条件满足的情况进行处理。执行过程如图 4-1所示。 条件满足？ T F 语句块1 语句块2 End If下一语句 图4.1 块If执行过程 【例4.1】火车站行李费的收费标准是 50公斤以内（包括50公斤）0.20元/公斤， 超过部分0.50元/公斤。编写程序，要求根 据输入的任意重量，计算出应付的行李费。 根据 题意计算公式如下： Weight×0.2 weight≤50 Pay＝ (Weight－50)×0.5＋50×0.2 weight＞50 程序代码如下： 计算按钮代码 Private Sub Command1_Click() Dim weight as single,pay as single weight= Text1.Text