4.3 语句 课件（16张幻灯片）

课件16张PPT。2017“一师一优课 一课一名师”4.3 语句变量名＝表达式
对象名．属性名＝表达式
赋值语句的主要功能是将赋值号“＝”右边的
表达式的计算结果保存到左边的变量中。

在VB程序中，可以在一行上写一个语句，也可以在一行上写几个语句，一行上相邻的两个语句之间用冒号（： ）分隔。
赋值语句说一说，写一写随机产生1~100之间的整数赋值给a
Text4显示变量b的值a=Int（rnd（）*100）Text4.Text=Str（b）一、选择语句的概念及语法格式 选择结构又称为分支，判断结构。它根据条件是否成立，选择程序执行的方向，从而执行其中的一个选择。选择语句例1、
过马路时，行人要根据交通信号灯的不同情况作出不同的反应：红灯亮了，就要在路边等待，等到红灯灭了，再继续前进。 1.生活中的选择结构：请同学举例生活中的选择结构？(1)行IF语句
IF　条件表达式　then　语句1　Else　语句2
或者：　IF　条件表达式　then　语句
(2)块IF语句
If　条件表达式　Then
　语句1
ElseIf　条件表达式　Then
　语句2
……
Else
　语句n
End IF
2.VB中的选择结构：①.行IF语句： If 条件表达式 Then 语句1 Else 语句2“语句1”和“语句2”是二选一的关系，它们不可能被同时执行

If a>=b Then s=1 Else s=-1

例12：设d和count都是整数类型的变量，如果d的值在闭区间[10,100]中，则使变量count的值增加1，否则就什么也不做。

例11：设a、b是两条线断的长度，若线段a的长度大于等于线段b，则把1存储到变量s中，否则把-1存储到变量s中。。

If d>=10 and d<=100 Then count=count+1

If 　 Then

Else

End if
?②.块IF语句条件表达式语句1语句2当条件为“真”的时候，执行“语句1”当条件为“假”的时候，执行“语句2”“语句1”和“语句2”是二选一的关系，它们2者不可能被同时执行If语句格式：练习一：海伦公式.vbp自然语言描述:
第一步：
输入三边长a、b、c。
第二步：
判断是否构成三角形，若构成，则用海伦公式计算面积，否则不需要计算。(判断条件：任意两边之和大于第三边)
第三步：
输出三角形面积S，或输出“输入的数据不构成三角形”。
第四步：
结束。
VB程序代码描述：
Dim a,b,c,p,s As Single
a=Val(Text1.Text)
b= Val(Text2.Text)
c= Val(Text3.Text)
p=(a+b+c)/2
If Then

s=sqr(p*(p-a)*(p-b)*(p-c))
Text4.Text= Str(s)
Else
Text4.Text="不能构成三角形“
‘
任意两边之和大于第三边选择结束语句a+b>cEnd if and a+c>b and b+c>a 3.选择结构的程序设计： 例. 已知一元二次方程ax2+bx+c=0，编写一个VB程序，使之能 正确输出方程解。D>0时，方程有两个不同的实根 D=0时，方程有两个相同的实根 D<0时，方程没有实数根 D=b2 -4*a*c 练习二：没有实根否不同的实根x1，x2开始输入a,b,c,计算出D结束是D>0D=0是相同的实根x1，x2否需要在这里再加个D<0的条件么？Dim a, b, c, d, x1, x2 As Single
a = Val(Text1.Text)
b = Val(Text2.Text)
c = Val(Text3.Text)
d = b * b - 4 * a * c
If Then
x1 = ‘ 公式计算方程解
x2 = x1
Print x1, x2
Label4.Caption = “有两个相同的解"
Else
If Then
x1 = (-b - Sqr(d)) / (2 * a)
x2 = (-b + Sqr(d)) / (2 * a)
Print x1, x2
Label4.Caption = “有两个不同的解"
' 分支语句
Label4.Caption = "方程没有实数解"
End If
'结束语句要配对出现程序正确代码为： d = 0 d > 0End IfElse(-b) / (2 * a)四、本课小结1.什么是 选择结构2.选择结构的程序实现（格式，语法）3.如何用选择结构解决问题五、课后作业谢谢