初始计算机软件教案,[计算机软件及应用]VB第4章教案.ppt

[计算机软件及应用]VB第4章教案

4.1 条件表达式 条件表达式的取值为逻辑值：真(True)和假(False)。 条件表达式分两类：关系表达式和逻辑表达式。 4.1.1关系表达式 由关系运算符连接起来的式子就是关系表达式，关系表达式的 结果是逻辑值，一般表示一个条件是否成立。 1. 下列字符中，____字符最大，____字符最小。 A. 1 B. Z C. * D. a 2. 假设a=1，b=2，下列逻辑表达式中其值为真的有 A. a<=0 B. a>=0 And b>2 C. a<=0 Or "b"> "ab" D. a>=0 And Not b<2 E. 2*a=-b Or a>0 And b>0 格式： If 条件 Then 语句块1 (A) Else 语句块2 (B) End If 功能：首先测试条件(E)，如果条件成立(即值为真)，则执行Then后面的语句块1，如果条件不成立(即值为假)，则执行Else后面的语句块2。而在执行Then或Else之后的语句块后，会从End If之后的语句继续执行。 例4.2 输入三个数a、b、c，求出其中最大数 (1)创建应用程序的用户界面和设置对象属性 (2)编写程序代码 功能要求：用户在“a=”文本框(Text1)、“b=”文本框(Text2)和“c=”文本框(Text3)中输入数据，单击“判断”按钮后，则在“最大数＝”文本框(Text4)中输出结果 程序代码 程序流程图 Private Sub Command1_Click() 'm用来存放较大值 Dim a As Integer, b As Integer Dim c As Integer, m As Integer a = Val(Text1.Text) b = Val(Text2.Text) c = Val(Text3.Text) If a > b Then m = a Else m = b End If If c > m Then m = c Text4.Text = m End Sub Private Sub Form_Load() Show a = 1: b = 3 c = 3 * a - b a = IIf(c < a, a - 1, b) + 1 If a * 2 - 1 <= 10 Then b = b + c If 3 * b > a Then a = a + 1 c = c - 1 Else a = a - 1 End If Print a, b, c End Sub 4.2.3 IIf函数 实现一些简单的条件判断分支结构。 格式： IIf(条件，条件为真时的值，条件为假时的值) 功能：对条件进行测试，若条件成立(为真值)，则取第一个 值(即“条件为真时的值”)，否则取第二个值(即“条件为假时的值”)。 如：将a、b中的小数