VB程序设计——选择结构.
vb的三种基本结构
③. j = 0 If J＞0 Then J＝J＋1 Endif
2．以下程序，运行后 x的值为 （ ） x =2 y= 3 y=y+1 x=x+y-1 A. l B. 3 C. 5 D. 7 3、以下程序，运行后变量value的值为 ( ) X = 20 If x >= 10 then value = 5 * x else value = 4 * x end if msgbox(value) 最后，变量value的值是（ ） A、50 B、40 C、100 D、80
vb程序的三种基本结构一顺序结构二选择结构三循环结构程序是由若干个基本结构组成的一个基本结构可以包含一条或若干条语句
VB程序的三种基本结构
程序是由若干个基本结构组成的，一个基本结构可以包 含一条或若干条语句。
通常程序有三种最基本的结构：
一、顺序结构 二、选择结构 三、循环结构
1、 顺序结构： 将命令和语句逐条顺序排列。 程序执行时按语句的先后顺序逐条执行。 S1
4、以下程序，运行后 X的值为 （ ） X =2 For i＝1 To 5 If X＜i Then X= X＋i End If Next i A. l B. 3 C. 5 D. 7
例1、 ห้องสมุดไป่ตู้=1 b=2 c=a+b a=c-a b=c-a
最后，变量b的值是（ ）
S2 S3
2、分支结构：（选择结构） 根据条件判断其是否成立，如果成立执行成立的分支；否则 执行另一分支。 其一般形式为： If 条件 Then 语句序列1 C Else 语句序列2 End If 分支结构的简单形式为： If 条件 Then 语句序列 End If S1 S2
C
例4、s=0 for I=1 to 100 s=s+I next 最后，变量s的值是（ ）
VB教程---选择结构
练习：
1.求闰年（能被4整除，不能被100整除的年，或者是能够被
400整除的年是闰年。）(用if双分支语句做）
Year=val(text1.text) If year mod 4 =0 and year mod 100 <> 0 or year mod 400 =0 then Msgbox (“是闰年!”) Else MsgBox (“这不是闰年！”) End If
If语句复合结构的一般形式
在Else块中嵌套If结构的形式
例：求a、b、c中三个实数的最大值、最小值。 a、b、c三值从三个文本框中输入，当单击命令按钮时将结果 显示 在窗体上
例：求a、b、c中三个实数的最大值、最小值。 a、b、c三值从三个文本框中输入，当单击命令按钮时将结果 显示在窗体上。
a<b
思考：下面形式是否正确？
If score >= 60 Then Print "及格" ElseIf score >= 80 Then Print "良" ElseIf score >= 90 Then Print “优" Else Print "不及格" End If
②根据下列公式求函数
1 x x 1 1 x 2 x2
二、分支结构—IF语句
1、IF条件判断语句(三种格式）
IF 条件 Then 语句块 End If IF 条件 Then 语句块1 Else 语句块2 End If IF 条件1 Then 语句块1 Elseif 条件2 Then 语句块2 Elseif 条件3 Then …… [Else] 语句块n End If
3、双分支程序示例
①求a，b中的较大数
大学vb 第3章 选择结构(If语句)
未超
End If
语句应用
问题3：希望程序给出重、轻和标准三种提示 。
If BMI > 23 Then
超重
ElseIf
Else BMI>=19
Then
标准 偏轻
End If
演示
……
ElseIf 温暖 Then 挤挤眼
跺跺脚
Else
伸伸腰 End If
语句应用（体重测试）
体重指数BMI 10000* 体重公斤 身高厘米
2
BMI<19，偏轻 19≤BMI≤23，标准 BMI>23，超重
语句应用
问题1：希望程序给出超重的提示 。
If BMI > 23 Then 超重
End If
BMI<19，偏轻 19≤BMI≤23，标准 BMI>23，超重
语句应用
问题2：希望程序给出超重和未超两种提示 。 If BMI > 23 Then 超重 Else Else If BMI <= 23 Then 未超 超重 End If
BMI<19，偏轻 19≤BMI≤23，标准 BMI>23，超重
If 语句：
单分支（一种执行结果） 双分支（两种执行结果选一） 多分支（多种执行结果选一）
下次课内容：
3.4 分支（选择）结构
实验作业：
实验作业5
如果 当前输入的密码=系统保存的密码 那么 登录成功 如果 当前输入的密码<>系统保存的密码 那么 重新登录
数学中比较的例子： 分段函数
vb结构化程序设计的三种基本结构
vb结构化程序设计的三种基本结构1.引言1.1 概述概述部分将介绍VB结构化程序设计及其重要性。
VB（Visual Basic）是一种面向对象的程序设计语言，它强调程序的结构化和模块化，以便于代码的可读性和维护性。
VB结构化程序设计通过组织程序代码以一种逻辑和有序的方式，使程序更加易于理解、调试和修改。
在VB结构化程序设计中，有三种基本结构，即顺序结构、选择结构和循环结构。
这些基本结构的正确使用可以使程序具备更好的可控性和灵活性，使其能够适应各种复杂的应用场景。
顺序结构是指程序按照代码的排列顺序依次执行，没有任何条件判断或循环。
顺序结构使得程序的逻辑清晰明了，易于理解。
通过合理地安排程序的执行顺序，可以确保程序按照我们所期望的方式执行。
选择结构允许根据条件的判断来决定程序的执行路径。
根据条件的不同，程序可以选择执行不同的代码块。
选择结构使得程序具有决策能力，可以根据具体条件来作出不同的处理。
循环结构允许程序根据条件的判断来重复执行某段代码。
循环结构使得程序可以重复执行一些特定的操作，节省了代码量，并提高了程序的效率。
本文将重点介绍这三种基本结构的原理和使用方法，并提供一些示例代码来帮助读者更好地理解和使用VB结构化程序设计。
通过学习和掌握这些基本结构，读者将能够编写出更加清晰、可读性更高、可维护性更好的代码，提高程序的质量和效率。
1.2 文章结构文章结构部分的内容应该包括对整篇文章的组织和框架进行介绍。
下面是对文章结构内容可能的写法：在本篇文章中，我们将讨论VB结构化程序设计的三种基本结构。
为了使读者更好地理解这些基本结构，本文将按照以下结构组织：第一部分为引言，包括对整篇文章的概述、文章结构和目的进行介绍。
在概述部分，我们将简单介绍VB结构化程序设计的概念和重要性。
文章结构部分将解释本文的整体组织框架，并说明每个章节的主要内容。
目的部分将说明本文的写作目的和预期的读者受众。
第二部分为正文，将分别介绍VB结构化程序设计的三种基本结构。
VB程序设计 习题及答案第4章 选择结构程序设计
第4章选择结构程序设计4．1 写出数学式|x|<2.5×10-2对应的Visual Basic表达式。
【答案】x<2.5e-2 and x>-2.5e-24．2 逻辑运算符And、Or和Not的优先级最高的是哪一个。
【答案】Not4．3 已知 W=10 X=9 Y=8 Z=7 ，求下列表达式的结果。
(1) W>X And Y<=Z OR X>Y(2) X>Z Or W=Y AND Y<X(3) Not (W>Y And X=Z)(4) Not (Y<>X Or W*3>Z)【答案】(1) True(2) True(3) True(4) False4．4 写出下列十进制整数逻辑运算的结果：(1) X = 23 And 14(2) X = 23 Or 14(3) X = -1 And 19(4) X = -1 Or 10(5) X = Not -1【答案】(1) 6(2) 31(3) 19(4) -1(5) 04．5 已知变量X和Y的值分别为5、6，编写程序，交换变量X和Y的值。
【参考答案】程序代码设计Private Sub Form_Click()x = 5: y = 6t = x: x = y: y = tForm1.Print "x="; x, "y="; yEnd SubPrivate Sub Form_Load()Form1.AutoRedraw = TrueForm1.Print "x = 5", "y = 6"Form1.Print "单击窗体交换x,y的值"图4-1 程序运行结果End Sub程序运行结果如图4-1所示：4．6 从键盘输入一个学生的三科成绩，计算总分，并找出最高分。
【参考答案】（1）用户界面设计（2）控件属性设置（略）（3）程序代码设计Private Sub Command1_Click()g1 = Val(Text1.Text)g2 = Val(Text2.Text)g3 = Val(Text3.Text)Var = (g1 + g2 + g3) / 3g = g1If g < g2 Then g = g2If g < g3 Then g = g3Text4.Text = VarText5.Text = gEnd Sub图4-2 程序运行结果程序运行结果如图4-2所示。
VB选择结构程序设计
VB选择结构程序设计在VB程序设计中，选择结构是一种常用的程序设计结构，用于根据不同的条件执行不同的代码块。
在本文中，我们将探讨VB选择结构的基本语法和一些实际应用。
选择结构主要有两种形式：IF-THEN和SELECTCASE。
IF-THEN结构是最基本的选择结构，它根据条件的真假来决定是否执行特定的代码块。
它的语法如下：```If condition Then'执行的代码块Else'执行的代码块End If```其中，condition是一个返回布尔值的表达式。
如果condition为True，那么执行if后的代码块；否则执行else后的代码块。
下面是一个简单的例子，根据用户输入的成绩判断是否及格：```vbDim score as Integerscore = InputBox("请输入成绩：")If score >= 60 ThenMsgBox("及格")ElseMsgBox("不及格")End If```SELECTCASE结构类似于多重IF-THEN结构，它根据不同的条件选择执行特定的代码块。
它的语法如下：```Select Case expressionCase value1'执行的代码块Case value2'执行的代码块Case Else'执行的代码块End Select```其中，expression是一个可以返回一个值的表达式。
根据expression的值，选择执行相应的代码块。
Case后跟着的是可以匹配expression的值的值。
如果expression的值与一些Case后的值匹配，那么执行对应的代码块；否则执行Case Else后的代码块。
下面是一个简单的例子，根据用户输入的数字判断是星期几：```vbDim day as Integerday = InputBox("请输入数字（1-7）：")Select Case dayCase 1MsgBox("星期一")Case 2MsgBox("星期二")Case 3MsgBox("星期三")Case 4MsgBox("星期四")Case 5MsgBox("星期五")Case 6MsgBox("星期六")Case 7MsgBox("星期日")Case ElseMsgBox("请输入1-7的数字")End Select```在实际应用中，选择结构经常用于根据用户的选择执行不同的操作。
VB顺序结构与选择结构
VB顺序结构与选择结构VB（Visual Basic）是一种事件驱动的、面向对象的高级编程语言，广泛应用于Windows应用程序开发。
在VB中，顺序结构和选择结构是编写程序时经常使用的两种结构。
下面将详细介绍这两种结构。
一、顺序结构顺序结构是指程序的执行按照代码编写的顺序逐行进行。
也就是说，代码从上到下依次执行，不会跳过任何一行。
在VB中，顺序结构是最基本也是最常用的结构。
例如，我们可以编写一个简单的程序来计算并输出两个数的和：```Dim num1 As Integer = 10Dim num2 As Integer = 20Dim sum As Integersum = num1 + num2Console.WriteLine("两个数的和为：" & sum)```在这个程序中，首先定义了两个整数变量`num1`和`num2`，并分别给它们赋值为10和20。
然后，定义了一个整数变量`sum`用来存储两个数的和。
接着，将`num1`和`num2`相加的结果赋值给`sum`，并最后通过`Console.WriteLine`方法将结果输出到控制台。
顺序结构在程序设计中最常用，因为很多时候程序的执行过程就是按照顺序逐行运行的。
下面我们将介绍另一种常用的结构，选择结构。
二、选择结构选择结构是根据条件的结果来选择是否执行段代码。
简单来说，就是根据条件判断来选择程序的执行路径。
在VB中，选择结构通常使用`If...Then...Else...End If`语句来实现。
例如，我们可以编写一个程序来判断一个数是否为正数：```Dim num As Integer = -5If num > 0 ThenConsole.WriteLine("这个数是正数")ElseIf num = 0 ThenConsole.WriteLine("这个数是零")ElseConsole.WriteLine("这个数是负数")End If```在这个程序中，首先定义了一个整数变量`num`，并给它赋值为-5、然后，使用`If...Then...Else...End If`语句来判断`num`的值。
VB选择结构
注意：
1）不管有几个分支，程序执行了一个分支后， 其余分支不再执行； 2）ElseIf 不能写成Else If 3）当多分支中有多个表达式同时满足，则只 执行第一个与之匹配的语句块
例题２
用编程方法求函数值
Y=
1( x > 1) 0(x = 0) − 1( x < 0
)
[90,100] [80,90]
代码：
Select Case Val(Text1.Text) Case 0 To 59 Text2 = "不及格 不及格" 不及格 Case 60 To 69 Text2 = "中等 中等" 中等 Case 70 To 79 Text2 = "良好 良好" 良好 Case 80 To 100 Text2 = "优秀 优秀" 优秀 Case Else Text2 = "输入成绩有误 输入成绩有误" 输入成绩有误 End Select
注意
表达式一般为关系表达式、逻辑表达式， 也可以为算术表达式，非0为True，0为 False 语句块可以是一句或多句，若用格式２表 示，则只能是一句语句，若多句，语句间 若多句， 若多句 需用冒号分隔，而且必须在一行上书写。 需用冒号分隔，而且必须在一行上书写
双分支If语句 双分支 语句
语句形式： 语句形式： 1) If 条件 语句 Else 语句2 语句1 句 2） If <表达式 Then ） 表达式> 表达式 <语句块 语句块1> 语句块 Else <语句块 语句块2> 语句块 End If
例题１
判断所输入值与０的关系 代码： x = Val(InputBox("请输入x的值")) If x >= 0 Then Print "x>=0" Else: Print "x<0" End If
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
了这个范围电梯将发出警报。（ C） Dim a as integer
a=val(inputbox( “请输入进入电梯的人数” ))
. a<=12 print “正常运行”
培养学生阅 读程序的能 力，测验学 生对选择结 构的理解程 度。
print “发出警报”
反馈
A.if …… then …… end if …… else
Let a = Text1.Text ' Let b = Text2.Text ' If a > b Then
Text3.Text = a Else
Text3.Text = b End If End Sub 教师活动： 选择学生编写的典型程序（典型错误）进行点评 总结本堂课的内容。
编写“价格竞猜”程序。
锻炼学生编 程能力和对 本课知识的 掌握程度。
培养学生的 探索、创新 能力。
■教学反思
程序设计一直是教师讳莫如深，学生头疼厌学的内容。如何激发学生的学习兴趣， 从而培养学生缜密的逻辑思维能力，是我们教授程序设计课需要思考的。本课的选择结 构是 vb 程序设计的三大结构之一，同时它也是其它程序语言的重要的数据结构。可以 说掌握了本课的选择结构，以后再学习别的程序语言的选择结构都是大同小异，异曲同 工了。我的教学设计正是基于此设计的。
教师活动： 讲解逻辑表达式是用逻辑运算符连接起来的式子。第 4 页（共 8 页） Nhomakorabea 学生 练习
逻辑运算符
功能
And
逻辑运算符连接的两个表达式同时为
时则逻辑表达式为 “真 ”
“真 ”
Or
逻辑运算符连接的两个表达式只要有一个
为 “真 ”时则逻辑表达式为 “真 ”
Not
将逻辑运算符后面的表达式的值取反
学生活动：在 moodle 中巩固练习 2、探究学习：
VB程序设计——选择结构
南京市九龙中学 李李
■教材分析
选择控制结构是程序的三个基本结构中的一个重要结构， 计算机的逻辑判断能力就 是通过选择结构来完成的。条件语句中的“条件”是用关系表达式、逻辑表达式来描述 的。程序中能否实现正确的“选择”决定于关系表达式或逻辑表达式的正确描述。关系 表达式与逻辑表达式是本节中教学的重点与难点。
D、x=1 为赋值语句， y=1 为关系表达
教师活动： 在 moodle 平台中查看学生读程序答题的状况，并点 评分析
第 5 页（共 8 页）
学生 练习
反馈 课堂 小结 拓展 活动
学生编写程序： 输入 2 个不相同的数， 使计算机进行比较并 显示大的数。 Private Sub Command1_Click()
教学伊始，采用“购物街——猜价格”这个小游戏来激发学生的兴趣，调动学生的积 极性。接着由这个竞猜游戏展示拓扑结构引出本课的主题——选择结构，并教授选择结 构的流程图。接着回到竞猜游戏，分析代码启发学生引出 IF 条件语句。接着，布置探 究任务，让学生完善 qq 登录的条件代码，从而引出关系表达式和逻辑表达式。教师简 单介绍后，布置学生在 moodle 平台做自测性习题，教师在平台中查看学生测试结果， 针对错误进行点评。 下一步， 学生依然在 moodle 中完成读程序题， 加深理解选择结构。 教师查看并点评。进行到这里应该说学生对本课的选择结构的知识掌握应该是比较好 了，紧接着就是小试牛刀，学生自己编辑一个小程序，锻炼学生的编程能力和创造力。 针对学生编程中出现的问题， 教师点评讲解， 并总结本课内容， 要求学生提交编程作业， 布置拓展任务。
用选择结构编写简单的程序解决具体问题是在学生已经掌握了程序设计数据的表 示与处理的基础上，理解了顺序结构的前提后提出的。通过本课的学习，可以促进学生 对问题解决方法和思想的理解与掌握，从而提升学生的问题解决能力，让学生在按照一 定的流程解决问题的过程中，去体会和理解程序设计的思想。
■学情分析
学生在前面的课上对 vb 程序设计已经有了一定的基础，学生的分析、综合能力及 独立思考能力、分析解决问题的能力都有了一定的水平，在教师的有效引导下，有能力 进行自我探究，如果用一种学生比较感兴趣的，能够贴近学生日常生活的例子来分析选 择结构的话，那么学生会比较感兴趣。
N
程序段 B
程序段 A
新授
教学意图：帮助学生理解选择结构
【启发】在 VB 中如何完成选择结构？
根据“购物街”程序段总结出条件语句的格式
If a = b Then Label2.Caption = "
恭喜你猜中了！ "
If b < a Then Label2.Caption = "
你猜的价格低了请再猜！ "
第 6 页（共 8 页）
这堂课上下来，总体感觉教学程序还是比较完整的，学生的掌握也还不错。不过笔 者接触 vb 教学时日尚短，存在有一些问题和不足。特别是听了市中心组栾富海老师的 评析，受益匪浅。在完善 qq 程序和关系表达式与逻辑表达式的引入细节上还需进一步 改进和推敲，课堂后半段的教学互动方面还需加强等等。
[Else
<程序段 B>]
End If
【提问】选择执行哪一程序段的依据是什么？
学生思考、回答。
【结论】
If 后面的“条件”。
教师活动： 同学们都有 QQ号，登录的时候要正确输入账号和密
码才能登录成功，实际上这里面也存在一个条件判断的选择结
构，请同学们根据老师给的代码，完善“ QQ”登录程序
由左边的程 序进而解释 关系表达式 与逻辑表达 式的概念、 区别
■教学目标
1.知识与技能 1.了解选择结构的基本概念。 2.了解关系表达式与逻辑表达式的概念。 3.能利用 VB 中的条件语句实现简单的选择结构。 2.过程与方法 经历实践、分析、归纳，掌握 IF 语句的格式和功能。 3.情感态度与价值观 运用半成品加工策略，完善程序，发展学生思维的逻辑性及严谨的学习态度。 4.行为与创新 培养学生利用计算机的反馈作用进行探究学习的能力。
总之，教学无止尽，任重而道远。我将继续努力。
■教学点评
栾富海 （南京二十九中玉泉路校区） ： 每次郊县教师参加市里组织的教研活动都得长途跋涉，很是辛苦，为此，市教研室
陈平老师提出中心组主动带课到郊县、为老师们服务。今天，我们初中中心组来到了第 四站——沿江技术开发区。
李李老师是我们南京市初中信息技术教师研修班的一名同学，第一次听他的课，这 节课有以下几点值得肯定的地方：
N
你猜的价格高或低了
恭喜你猜对了
同学们在选择价格的时候， 是根据竞猜程序的提示而改变价格的 高低的，这里存在一个价格判断的条件。
第 2 页（共 8 页）
新授
教师活动： 由竞猜价格实例引出选择结构的一般流程图， 择结构与条件语句 ⑴选择结构 选择结构流程图
Y 条件成立？
讲解选
学生通过老 师讲解，理 解选择结构 并掌握选择 结构的基本 格式。
Else
Label2.Caption = "
你猜的价格高了请再猜！ "
End If
用 If ... Then 结构有条件地执行一个或多个语句。单行结构和
多行结构都可以使用：
（1） If < 条件 > Then < 程序段 A>[Else< 程序段 B>]
（2） If < 条件 > Then
<程序段 A>
If I <6 then
Print “#” ；
Else Print “* ”
End if
A.*#
B.#*
C.##
D.**
3．语句 If x=1 Then y=1, 下列说法正确的是（ C ）。
A、x=1 和 y=1 均为赋值语句 B、x=1 和 y=1 均为关系表达式 C、x=1 为关系表达式， y=1 为赋值语句
) Then
dlcg ' 调用登录成功模块
Else
dlsb ' 调用登录失败模块
End If
教师活动：讲解关系表达式是用关系运算符将算术表达式或字符
表达式连接起来的式子。
关系运算符
功能
关系运算符
功能
<
小于
<=
小于等于
>=
大于等于
=
等于
学生通过探 究学习，理 解关系表达 式和逻辑表 达式
>
大于
<>
不等于
(1)课堂教学结构完整，步骤清晰，引入、新授、练习、反馈、综合练习、小结一目 了然。
(2)以猜价游戏的形式引入选择结构，充分调动学生积极性。 (3)在对 IF 语句知识的练习上，步步为营，层层深入。 (4)在练习的反馈环节结合校园网络应用，使用魔灯平台，高效、快捷的查漏补缺。 肯定的同时，我也在思考，这节课若是处理好以下几个问题，是否会更好一些： (1)IF 语句知识的讲解上是否能更深入一步，以生活化的例子再深入训练、强化理 解。 (2)PPT 课件中有一处涉及到规范的问题， IF 语句的行结构和块结构，在书写时需 要注意。 (3)例题讲解上， 考虑半成品练习和综合练习的同时， 还需要考虑这两个例题的难易 程度（交流后知道由于学生的提前预习，课堂发生了“意外”情况） 。 开设 VB 的研究课，应该说市区教研室以及中心组给李李老师下了个难题，李李老 师解决了这个难题，作为第二个“吃螃蟹”的人（全市第二次开设 VB 的研究课），他是成 功的。 此次活动的整体安排、前期的试讲把关等劳烦沿江教研员王少峰老师费心不少，此
■课前准备
教学课件、实例程序
■教学过程
教学 环节
设计情 境、引 入新课
教师与学生活动
教师活动： 让学生竞猜鼠标的价格 学生活动： 积极参与。 教师活动： 学生边猜，教师边选择答案，程序将提示猜高了或是 猜低了，或是猜对了。