vb选择结构If语句的嵌套

x = Val(Text1.Text)
If x >= 0 Then
If x > 0 Then
y=1
Else
y=0
End If
Else
y = -1
End If
Text2.Text = y
End Sub
图5-2
Private Sub Command1_Click()
【例5-2】输入变量Dx,i计mVix算suAaysl。SiBnagslie,cy As Single
End If
Label3.Caption = y
End Sub
小结
Visual Basic
If语句的嵌套格式、功能及执行过程。 在编写程序过程中出现的常见问题。
作业
Visual Basic
作业 P95,5.14,5.15
Visual Basic
Visual Basic
本节的教学目标
掌握If语句的嵌套格式、功能及具体执行 过程； 学会用嵌套的If语句解决日常生活中的实 际问题。
Visual Basic
本节的教学重点与难点
IF语句嵌套的格式及执行过程； 如何对条件语句进行嵌套设计。
Visual Basic
上节内容回顾
1、行If语句
If〈条件表达式〉Then [〈语句序列1〉] [ Else〈语句序列2〉]
End If
Visual Basic
If语句嵌套的功能 If语句嵌套的执行过程
Visual Basic (1) 建立应用程序的用户界面并设置对象属性，如图5-1所示。
例4-8
(2) 编写程序代码
Visual Basic
Private Sub Command1_Click()
Dim x As Single
2、 IIf函数
IIf (<条件表达式>，<真部分>，<假部分>)
3、块If语句
Visual Basic
其语法结构为： If〈条件1〉Then
[语句序列1] [Else
[语句序列2]] End If
不管是行If语句、IIf函数还是块If语句实现的功能都 两分支选择结构。
Βιβλιοθήκη Baidu
Visual Basic
【例5-1】数学上的分段函数 。
-1 x<0 y= 0 x=0
1 x>0
Visual Basic
If语句的嵌套
如果在If语句中，语句序列1或语句序列2本身 又是一个If语句，则称为If语句的嵌套。其语法格 式为：
If <条件1> Then If <条件2> Then 语句1 Else 语句2 End If
Else If <条件3> Then 语句3 Else 语句4 End If
x = Val(Text1.Text)
x+1 x<1
If x < 2 Then If x < 1 Then
y= x+2 1<=x<2 y = x + 1
Else x+3 2<=x<3 y = x + 2
x+4 x>=3
End If
Else
If x < 3 Then
y=x+3
Else
y=x+4
End If