内容正文:
复习
Private Sub Command1_Click()
t1 = Val(Text1.Text)
t2 = Val(Text2.Text)
If t1 > t2 Then
big = t1
Else
big = t2
End If
Text3.Text = big
End Sub
IF语句 (条件语句)
If – Then – Else格式 (P81)
If < 条件 > then
< 语句块1 > Else
< 语句块2 >
End If
If t1 > t2 Then
big = t1
Else
big = t2
End If
If – Then – Else条件语句执行过程 (P81)
条件是否成立
语句块1
语句块2
条件语句的下一语句
是
否
分支结构
条件语句的应用
1.天气报告程序
2.成绩等级程序
读懂程序
仿照编写程序
3.理解逻辑运算符的含义
1.天气报告程序(P82)
If Val (Text1.Text) > 10 Then
Image1.Picture = LoadPicture("c:\qt.jpg")
Else
Image1.Picture = LoadPicture("c:\yt.jpg")
End If
2.成绩等级程序
要求输入学生学号和成绩后报告学生成绩等级
如何设计程序界面?
如何设计程序代码?
合格/不合格
2.成绩等级程序
If Val (Text2.Text) >= 60 Then
Text3.Text = “合格”
Else
Text3.Text = “不合格”
End If
逻辑运算符及其含义
Not 8=3
True
False
True
逻辑运算的值为布尔型的值True或False。
逻辑运算符
关系运算优先于逻辑运算
P84 表2-5-2
8=3 And 8>3
8=3 Or 8>3
运算符 含义 例子 运算结果
not 非运算(取反)
and 与运算(而且)
or 或运算(或者)
读程序写结果
读程序写结果
读程序写结果
小结
条件语句的应用非常广泛:
天气报告
成绩等级
快递收费
手机话费
超市购物结算
……
快递收费程序
Dim w, f A