1、,如何利用选择结构解决生活中的问题？,2.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(请输入一个正整数,
2、 示例),A,当执行以下程序段后，在窗体上将显示（ ）。Private Sub Commandl_Click( ) Print “VB” Print“Hello!”； Print “VB”End SubA.VB Hello! VBB.VB Hello!VBC.VB Hello! VB D. VB Hello! VB,B,如何利用选择结构解决生活中的问题？,2.3 程序的选择结构,信息技术算法与程序设计,主要内容：条件语句,计算机是如何当主持人的？,Private Sub Command1_Click() Dim price As Integer price = val(Text1.Text)
3、If Then msgbox “猜对了，你真厉害！ If Then msgbox “猜错了，再试一试！End Sub,price = 7180,price 7180,True,False,条件成立吗？,Msgbox “猜对了 “,任务布置:,If price = 7188 Then Label4.Caption = 猜对了，你真厉害！If price 7188 Then Label4.Caption = “猜错了，再试试！”,条件语句的格式与流程图：,True,False,If Then Else End If,If Then Else ,格式1：,格式2：,条件成立吗？,Msgbox “猜对
4、了 “,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 Then Else If Then Else End ifEnd if,Price=7180,True,False,任务布置:,实践练习：,格式二：If Then Else End if,条件语句的两种格式,格式一：If Then Else ,（P44：某商场为了对苹果进行促销，规定购买2千克以上可以在原价每千克1.5元的基础上打8折。请设计一个程序计算购买x千克苹果的应付款。）,1、商场打折程序设计,作业布置,2、猜拳游戏程序设计,（P49：编一个程序，让计算机同我们一起玩剪刀、钉锤、布游戏。如果人输了，则输出”LOSE”；人赢了，则输出”WIN”；人与计算机 平了，则输出”DEUCE”。）,
