VB《选择结构程序设计》教案

时间：2023-04-24 22:38:43 教案我要投稿

相关推荐

VB《选择结构程序设计》教案

第一节 IF语句【教学目的】 1、掌握单行结构条件语句IF…THEN…ELSE的语法格式和使用方法。 2、掌握条件表达式的分类、运算符和优先顺序。 3、掌握IIF函数的格式和使用方法。【教学重点】单行结构条件语句IF…THEN…ELSE的语法格式和使用方法。【教学难点】单行结构条件语句IF…THEN…ELSE的语法格式和使用方法。【教学过程】 (一)组织教学 (二)复习顺序结构程序设计的方法 (三)新授一、条件表达式 1、关系运算符与关系表达式 (1)关系运算符 < ， <= ， = ， > ， <> (2)关系表达式格式:〈表达式1〉〈关系运算符〉〈表达式2〉[〈关系运算符〉〈表达式3〉…] 2、逻辑运算符与逻辑表达式 VB提供的逻辑运算符有：And、Or、Not、Xor、Eqv、Imp等6种（1）类型应一致。（2）与数学不等式不同（3）字符型数据按其ASCII码值进行比较。 3、逻辑运算符的优先顺序： not → and → Or → Xor → Eqv → Imp （1）同级运算按照它们从左到右出现的顺序进行计算。（2）可以用括号改变优先顺序，强令表达式的某些部分优先运行。（3）括号内的运算总是优先于括号外的运算，在括号之内，运算符的优先顺序不变。【例5-1】设变量x=4，y=-1,a=7.5，b=-6.2，求表达式x +y> a + b And Not y < b的值。分析：(1) 先作算术运算： 3 > –1.3 And Not y < b (2) 再作关系运算： True And Not False (3) 作非运算： True And True (4) 最后得： True 【例5-2】判断某个年份是闰年的根据是年份数满足下述条件之一。 (1) 能被4整除，但不能被100整除的年份都是闰年。 (2) 能被100整除，又能被400整除的年份都是闰年。设变量y表示年份，写出判断y是否闰年的布尔表达式。解：判断y是否满足条件(1)的布尔表达式是 y Mod 4=0 And y Mod 100<>0 判断y是否满足条件(2)的布尔表达式是 y Mod 100=0 And y Mod 400=0 两者取“或”，即得判断闰年的布尔表达式 y Mod 4=0 And y Mod 100<>0 Or y Mod 100=0 And y Mod 400=0 二、单行结构条件语句IF……THEN……ELSE 单行If语句的语法格式为： If〈条件〉Then [<语句序列1>] [ Else<语句序列2>] 单条件选择结构的流程图如果条件 {该（选择）条件成立吗？} 真 a1块 {条件成立时所执行的操作块，一般为非空块} 假 a2块 {条件不成立时所执行的操作块，可为空块} 单条件选择结构是最常用的双分支选择结构，其特点是：所给定条件（条件表达式）的值如果为真，执行a1块；如果为假，则执行a2块。如图示。说明：（1）这里的a1块或a2块可以是空操作块（简称空块，也就是不作任何处理的操作块）。（2）如果必须设立空分支时，应该把它设在选择条件为假的相应分支（如a2块）中。（3）实现单条件选择结构的语句是If语句，在V B中有行If语句和块If语句两种。【例5-3】输入x，计算y的值。其中分析：该题是数学中的一个分段函数，它表示当x≥0时，用公式y=1+x来计算y的值；当x < 0时，用公式y=1-2x来计算y的值。在选择条件时，我们即可以选择x≥0作为条件，也可以选择x<0作为条件。在这里，我们选x≥0作为选择条件。这时，当x≥0为真时，执行y = 1+x；为假时，执行y = 1-2x。设计步骤如下： (1) 建立应用程序用户界面与设置对象属性。 (2) 编写程序代码。写出命令按钮Command1的单击（Click）事件代码为 Private Sub Command1_Click() Dim x As Single, y As Single x = Val(Text1.Text) If x >= 0 Then y = 1 + x Else y = 1 – 2 * x Text2.Text = y End Sub 【练习1】输入整数x，根据x的值显示是奇数还是偶数。提示：在文本框中显示结果。方法：提问，可让学生板书,最后讲评【例5-4】学校对学习成绩优良的学生进行奖励，获奖的条件如下： (1) 所考5门课的总分超过450分。 (2) 每门课的成绩都在88分以上。 (3) 前3门（主课）的成绩都在95分以上，其他两门（非主课）的成绩都在80分以上。输入某学生5门课的成绩s1、s2、s3、s4、s5，判断他是否能够获奖。分析：依题意列出3个条件表达式：（1）s1 + s2 + s3 + s4 + s5 >= 450 （2）s1 >= 88 And s2 >= 88 And s3 >= 88 And s4 >= 88 And s5 >= 88 （3）s1 >= 95 And s2 >= 95 And s3 >= 95 And s4 >= 80 And s5 >= 80 设计步骤如下： (1) 建立应用程序用户界面与设置对象属性。 (2) 编写程序代码。窗体中各控件的属性设置见教材P69 可以写出命令按钮Command1的单击（Click）事件代码为： Private Sub Command1_Click() Dim s1 As Single, s2 As Single, s3 As Single, s4 As Single, s5 As Single Dim p As String s1 = Val(InputBox(请输入第1门课的成绩：, 输入框, 0)) s2 = Val(InputBox(请输入第2门课的成绩：, 输入框, 0)) s3 = Val(InputBox(请输入第3门课的成绩：, 输入框, 0)) s4 = Val(InputBox(请输入第4门课的成绩：, 输入框, 0)) s5 = Val(InputBox(请输入第5门课的成绩：, 输入框, 0)) t1 = (s1 + s2 + s3 + s4 + s5 >= 450) t2 = (s1 >= 88 And s2 >= 88 And s3 >= 88 And s4 >= 88 And s5 >= 88) t3 = (s1 >= 95 And s2 >= 95 And s3 >= 95 And s4 >= 80 And s5 >= 80) If t1 Or t2 Or t3 Then p= 可以获奖! Else p=不能获奖! p=Str(s1) & , & Str(s2) & , & Str(s3) & , & Str(s4)&,& Str(s5)&Chr(13)& p Label1.Caption = 该生五门课的成绩分别是： & Chr(13) & p End Sub 分析：(1)InputBox语句的格式。 (2)程序中p变量的作用。【练习2】修改程序中的条件，让学生编写程序。提问及讨论【例5-5】利用输入框函数输入3个不同的数，选出其中最大的数。设计步骤如下： (1) 建立应用程序用户界面与设置对象属性。 (2) 编写程序代码。可以写出命令按钮Command1的单击（Click）事件代码为 Private Sub Command1_Click() Dim a As Single, b As Single, c As Single a = Val(InputBox(请输入第1个数：, 输入框, 0)) b = Val(InputBox(请输入第2个数：, 输入框, 0)) c = Val(InputBox(请输入第3个数：, 输入框, 0)) p = & a & ， & b & ， & c p = p & 三个数中最大的数是： If a > b And a > c Then p = p & a If b > a And b > c Then p = p & b If c > a And c > b Then p = p & c Label1.Caption = p End Sub 讨论：可以用哪些方法编写求最大值的程序段？【练习3】利用输入框函数输入4个不同的数，选出其中最大的数。提问,讨论,练习三、IIf函数的语法结构为格式:IIf(〈条件表达式〉，〈真部分〉，〈假部分〉) 【例5-6】例5-3中命令按钮Command1的单击（Click）事件代码可以改为输入x，计算y的值。其中： Private Sub Command1_Click() Dim x As Single, y As Single x = Val(Text1.Text) y = IIf(x >= 0, 1 + x, 1 – 2 * x) Text2.Text = y End Sub （四）总结: （五）作业： 1、利用输入框函数输入4个不同的数，选出其中最小的数。 2、输入整数x，根据x的值判断是正数还是负数、0。

【VB《选择结构程序设计》教案】相关文章：

vb实训心得11-25

程序设计心得11-15