2.3的选择结构教程.ppt

如何利用选择结构解决生活中的问题？ 2.3 程序的选择结构 信息技术——算法与程序设计 主要内容：条件语句 知识回顾： VB的赋值 1 VB程序的输入、输出 2 VB程序的常用控件 3 顺序结构 练习检测： 下列句子中， 不是赋值语句。 A. A=”123” +”456” B. Label1.Caption=“你好！” C. r=val(Text1.text) D. x+1=y D 显示下图所示输入框的语句是 。 A. A = InputBox(请输入一个正整数, 示例 ,1) B. A = InputBox(示例, 请输入一个正整数 ,1) C. A = InputBox (1,示例, 请输入一个正整数 ) D. A = InputBox(请输入一个正整数, 示例) A 当执行以下程序段后，在窗体上将显示（ ）。 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 如何利用选择结构解决生活中的问题？ 2.3 程序的选择结构 信息技术——算法与程序设计 主要内容：条件语句 计算机是如何当主持人的？ 问题1 Private Sub Command1_Click() Dim price As Integer price = val(Text1.Text) If Then msgbox “猜对了，你真厉害！ If Then msgbox “猜错了，再试一试！ End Sub price = 7180 price 7180 任务一 价格竞猜程序填空。 体会条件语句是如何进行条件判断的。 关系表达式的值的数据类型为逻辑型，其值为True或False。 If 条件 Then 语句组1 Price=7180 True False 条件成立吗？ Msgbox “猜对了 “ 任务布置: 任务二 价格竞猜程序改写。 思考如何用一个IF语句完成价格竞猜程序。 If price = 7188 Then Label4.Caption = 猜对了，你真厉害！ If price 7188 Then Label4.Caption = “猜错了，再试试！” Price=7180 条件语句的格式与流程图： True False If 条件 Then 语句组1 Else 语句组2 End If If 条件 Then 语句组1Else 语句组2 格式1： 格式2： 条件成立吗？ Msgbox “猜对了 “ Msgbox “猜错了 “ 猜高了！ 猜低了！ If then Else End If Private Sub Command1_Click() Dim price As Integer price = val(Text1.Text) price = 7180 msgbox “猜对了，你真厉害！ “ msgbox “猜错了，再试一试！ “ End Sub 程序填空： Price7180 True False Price7180 If语句的嵌套： If 条件1 Then 语句组1 Else If 条件2 Then 语句组2 Else 语句组3 End if End if Price=7180 True False 任务布置: 任务三 完善价格竞猜程序。 用if语句的嵌套解决三分支问题。 练习一 完善QQ登录程序。 练习二 高速公路收费程序设计。 练习三 庆阳出租车计费程序。 实践练习： 格式二：If 条件 Then 程序段1 Else 程序段2 End if 条件语句的两种格式 格式一：If 条件 Then 程序段1 Else 程序段2 （P44：某商场为了对苹果进行促销，规定购买2千克以上可以在原价每千克1.5元的基础上打8折。请设计一个程序计算购买x千克苹果的应付款。） 1、商场