VB第3章第3节2-If语句.ppt

第3章 VB.NET面向对象程序设计第3节 2 选择结构语句,本节的学习内容,学点什么呢?,熟练掌握用VB语言的选择语句进行选择结构程序设计的方法,第3章 VB.NET面向对象程序设计第3节 2 选择结构语句,选择结构,双分支选择结构,单分支选择结构,第3章 VB.NET面向对象程序设计第3节 2 选择结构语句,选择结构,多分支选择结构,第3章 VB.NET面向对象程序设计第3节 2 选择结构语句,选择结构 语句,1、If 语句 2、Select 语句3、Goto 语句,第3章 VB.NET面向对象程序设计第3节 2 选择结构语句,选择结构的应用场合,当我们不知向何处走时，会抬头看看路牌，当某个方向满足了我们的要求，则会向此方向走去。在程序设计中当某条件成立，执行一段程序；某条件不成立，执行另一段程序。这就是选择结构。选择结构可使用 If 或 Select 语句完成。,第3章 VB.NET面向对象程序设计第3节 2 选择结构语句,例：计算分段函数,主要代码：If x0 Then y=Math.sin(x)+Math.sqrt(x*x+1)Else y=Math.cos(x)x3+3*xEnd If,第3章 VB.NET面向对象程序设计第3节 2 选择结构语句,结构化程序设计语句,第3章 VB.NET面向对象程序设计第3节 2 选择结构语句,3.3.2 选择结构语句 一、条件语句（If语句）功能：在程序中根据条件是否满足选择执行相应的语句。例如，若变量A的值大于变量B的值，将B的数值赋予A。If AB Then A=B,If语句的多种格式：（一）格式1（单分支结构）If 条件 Then 语句 EndIf 或：If 条件 Then 语句,第3章 VB.NET面向对象程序设计第3节 2 选择结构语句,例如：Dim x As Integer,y As Integer x=3:y=2 If x+y Then x=y 其中，If语句的条件是一个数值表达式，由于该表达式的值等于5（非0为True），因此条件满足，将y的值赋给x。,说明：(1)If语句中的条件为关系表达式、逻辑表达式、数值表达式。若数值表达式的值非0，则If语句中的条件为True；若数值表达式的值为0，则If语句中的条件为False。,第3章 VB.NET面向对象程序设计第3节 2 选择结构语句,(2)若Then后面有多个语句，则语句之间用冒号分隔（或并列多行）。例如：If xy Then MessageBox.Show(x=&x vbCrLf&y=&y):x=y 或：If xy Then MessageBox.Show(x=&x vbCrLf&y=&y)x=y EndIf该语句功能：若x的值大于y的值，输出x、y的值，然后将y的值赋给变量x。,第3章 VB.NET面向对象程序设计第3节 2 选择结构语句,(3)计算机执行If语句的过程：首先计算If和Then之间的表达式（条件），得到一个逻辑值（True或False）。若值是True（满足条件），执行Then后面的语句。接着执行If语句的后继语句。若值是False（不满足条件），不执行Then后面的语句，直接执行If语句的后继语句。,(4)If语句的流程图：,第3章 VB.NET面向对象程序设计第3节 2 选择结构语句,（二）格式2（双分支结构）If 条件 Then 语句1 Else 语句2 EndIf 或：If 条件 Then 语句1 Else 语句2说明：(1)语句中的条件、书写规则与格式1相同。,第3章 VB.NET面向对象程序设计第3节 2 选择结构语句,例如：If xy Then x=y Else y=x EndIf或：If xy Then x=y Else y=x,语句功能：若x的值大于y的值，则将y的值赋给变量x；否则将x的值赋给变量y。,第3章 VB.NET面向对象程序设计第3节 2 选择结构语句,(2)计算机执行If-Then-Else语句的过程：首先计算If和Then之间的表达式（条件），得到一个逻辑值（True或False）若值是True（满足条件），则执行Then后面的语句1。接着执行If语句的后继语句。若值是False（不满足条件），则执行Else后面的语句2，接着执行If语句的后继语句。(3)Then部分的语句和 Else部分的语句都可以是多个语句。,第3章 VB.NET面向对象程序设计第3节 2 选择结构语句,语句2,N,语句1,Y,条 件P,(4)If-Then-Else语句的流程图：,第3章 VB.NET面向对象程序设计第3节 2 选择结构语句,例：计算分段函数,单分支结构实现：y=Math.cos(x)x3+3*x If x0 Then y=Math.sin(x)+Math.sqrt(x*x+1),双分支结构实现：If x0 Then y=Math.sin(x)+Math.sqrt(x*x+1)Else y=Math.cos(x)x3+3*xEnd If,请思考：条件x0 换成 x=0，程序该做何改动？,第3章 VB.NET面向对象程序设计第3节 2 选择结构语句,（三）格式3（多分支结构）If 条件1 Then 语句1ElseIf 条件2 Then 语句2 Else 语句n+1EndIf说明：(1)语句中的条件、书写规则与格式1相同。,第3章 VB.NET面向对象程序设计第3节 2 选择结构语句,(2)计算机执行If-Then-ElseIf语句的一般过程：首先计算If和Then之间的表达式（条件1），得到一个逻辑值（True或False）。若值是True（满足条件），则执行Then后面的语句1。接着执行If语句的后继语句。若值是False（不满足条件），则计算ElseIf后面的条件2，得到一个逻辑值（True或False）：若值是True（满足条件），则执行语句2，若值是False（不满足条件），则继续后面的ElseIf的条件3；依此不断计算判断，直到所有的条件均不满足，执行语句n+1。例如：,第3章 VB.NET面向对象程序设计第3节 2 选择结构语句,If x=1 Then MessageBox.Show（x）ElseIf x=2 Then MessageBox.Show（x*x）ElseIf x=3 Then MessageBox.Show（x*x*x）Else MessageBox.Show（x+x）EndIf(3)语句1、语句2、语句n+1都可以是多个语句。,该语句的执行过程：若x=1，则输出x；若x=2，则输出x的平方；若x=3，则输出x的立方；否则输出x加x的和。,第3章 VB.NET面向对象程序设计第3节 2 选择结构语句,（四）嵌套If语句 在If语句的Then部分或Else部分的语句是另一个If语句，这种语句结构称为If语句的嵌套。各种嵌套情况：讲义45页 例：If a0 Then If b0 Then If b0 Then y=0 Else y=1 EndIf EndIf,第3章 VB.NET面向对象程序设计第3节 2 选择结构语句,【例39】从键盘输入一个数a，若a0，则与变量s中的数据相加；否则与变量p中的数据相加。在文本框内输出s、p的结果及正数、负数的个数。Private Sub Form1_Click(ByVal sender As Object,ByVal e As _ System.EventArgs)Handles MyBase.ClickDim a As SingleStatic s As Single,p As Single,i As Integer,j As Integer a=InputBox(请输入a的值,例3-9)If a 0 Then s=s+a:i=i+1 TextBox1.Text=s TextBox2.Text=共输入正数&i&个 Else p=p+a:j=j+1 TextBox3.Text=p TextBox4.Text=共输入负数&j&个 End IfEnd Sub,用Static声明变量s、p、i、j，使这些变量保留前一次的计算结果。,用If 语句判断a是否大于0，并分别做相应的处理。,第3章 VB.NET面向对象程序设计第3节 2 选择结构语句,【例310】计算分段函数的值Dim a As Single,x As Single,y As Single TextBox1.Text=TextBox2.Text=TextBox3.Text=a=InputBox(请输入a 的值,计算分段函数)x=InputBox(请输入x 的值,计算分段函数)If x-a)And(x a/2 Then y=x TextBox1.Text=a=&a TextBox2.Text=x=&x TextBox3.Text=y=&y也可以使用下列的If-Then-ElseIf语句得到相同的结果：,第3章 VB.NET面向对象程序设计第3节 2 选择结构语句,If x-a)And(x a/2 Then y=x End If,第3章 VB.NET面向对象程序设计第3节 2 选择结构语句,【例311】求一元两次方程ax2+bx+c=0的两个实根，并在消息对话框上显示计算结果。执行事件过程时，先出现3次输入对话框，用户依次输入a、b、c的值，若输入的值符合求实根的要求，则通过计算求出并显示方程的根；否则显示“无实根”，并不做任何计算退出程序（过程）。程序执行后，若依次输入变量a、b、c的值为1、3、2；则输出结果如图所示：,第3章 VB.NET面向对象程序设计第3节 2 选择结构语句,二、程序结束语句（End语句）功能：结束程序的运行。例如：If x0 Then End该语句判断x是否小于0，若小于0，程序运行结束。语句格式：End,第3章 VB.NET面向对象程序设计第3节 2 选择结构语句,学习要点1.熟练掌握：If语句、End语句的语法格式。2.熟练阅读：使用选择结构语句的程序。3.熟练使用：If语句、End语句进行程序设计。,