浙教版信息技术九年级 第六课 选择结构程序设计 课件（共18张ppt）

课件18张PPT。第六课 选择结构程序设计（附P27练一练及借阅登录的VB源程序）九年级信息技术（VB）学习目标
掌握If语句格式
初步掌握选择结构程序设计方法If语句选择结构一般用If语句实现，使用形式如下：
If 条件 Then 语句1[Else 语句2]
或
If 条件 Then
语句1
[Else
语句2]
End If取a、b两数的较大数Private Sub Command1_Click()
Dim a, b As Single
Dim max As String
a = Text1.Text
b = Text2.Text
If a >= b Then
max = a
Else
max = b
End If
Text3.Text = max
End Sub知识林Select Case语句
当分支条件过多，我们可以用Select Case语句替代If语句。语句使用形式如下：
Select Case 变量或表达式
Case 表达式1
语句1
Case 表达式2
语句2
……
[Case Else
语句n+1]
End Select 应用程序效果图任务分析用文本框输入账号（20120101），输入密码，单击“登录”命令按钮。如果密码正确，则显示成功登录信息；反之提示密码错误。流程图如右图界面设计Label2
Label1
Text1
Text2
Command1
属性设计编写代码Private Sub Command1_Click()
If Text2.Text = "happy2014" Then
MsgBox "登录成功" '密码正确
Else
MsgBox "密码错误" '密码错误
End If
End Sub
知识林MsgBox函数
一般格式：MsgBox “内容”，样式参数，“标题”
第一个参数：显示提示信息内容。
第二个参数：样式参数，如有“确定”、“取消”按钮模式等。
第三个参数：标题栏显示的标题。
期中，第二、第三个参数可以省略。
小结选择结构
If 条件 Then 语句1[Else 语句2]
End If
或
If 条件 Then
语句1
[Else
语句2]
End if13补：ElseIf结构 If 表达式1 Then
语句块1
ElseIf 表达式2 Then
语句块2
…
ElseIf 表达式n Then
语句块n
Else
语句块n+1
End If 是语句块n+1是否表达式1为真语句块1否表达式n为真语句块n是否表达式2为真语句块2……Thank You！设计一个计算图书销售价格的程序：去书店买书，如果是会员，所有图书按9折出售；如果不是会员，不打折。练一练1 题目练一练1 VB源程序Private Sub Command1_Click()
Dim a As Single
Dim str As String
a = Text1.Text
str = Text2.Text
If str = "y" Or str = "Y" Then
Label4.Caption = a * 0.9
ElseIf str = "n" Or str = "N" Then
Label4.Caption = a
End If
End Sub设计一个相应售票价格的程序：到景点买票，儿童、老人免票，学生半票，成人全票练一练2 题目练一练2 VB源程序Private Sub Command1_Click()
Dim a, age, s As Integer
a = Text1.Text
age = Text2.Text
If age < 7 Or age >= 60 Then
s = 0
ElseIf age >= 7 And age <= 24 Then
s = a * 0.5
ElseIf age > 24 And age < 60 Then
s = a
End If
Label4.Caption = s
End Sub