VB计算机---VB程序的三种基本结构-(中小学教师继续教育实践性作业)
VB-第5章-算法及3种基本结构
9 9
VB程序设计－第五章 算法及3种基本结构
赋值语句
4．赋值符号“=”左边一定只能是变量名或对象的属性引用， 不能是常量、符号常量、表达式。 下面的赋值语句都是错的： 5=X ' 左边是常量。 Abs(X)=20 ‘ 左边是函数调用，即是表达式。 5.变量未赋值时，数值型变量的值为0，字符串变量的值为空串 “”。 6. 赋值符号“=”两边的数据类型一般要求应一致。 即变量名或对象属性名能够正确存取赋值号右边的表达式的值.
7 7
VB程序设计－第五章 算法及3种基本结构
赋值语句 赋值语句是程序中最简单、最常用的语句。
赋值语句的一般形式是： 形式: 变量名＝表达式 对象.属性＝表达式 功能： 将表达式的值赋值给变量名或指定对象的属性。 一般用于给变量赋值或对控件设定属性值 例： sRate!=0.1 Text1.Text ＝ "欢迎使用Visual Basic 6.0”
VB程序设计－第五章 算法及3种基本结构
停止程序执行语句
功能：结束程序的执行。 一个程序没有End语句，对运行没有什么影响。但如果没有 End语句，或者虽然有，却没执行，程序都不能正常结束， 此时要结束程序必须执行“运行”菜单中的“结束”命令或 单击工具栏中的“结束”按钮。为了保持程序的完整性，应 当在程序中含有End语句，并且通过End语句来结束程序的运 行。 格式: End
说明:
<提示信息>：字符串表达式。在对话框内显示提示信息，提示用户输入 的数据的范围、作用等。如果要显示多行信息，则可在各行行末用回车 符Chr(13)、换行符Chr(10)、回车换行符的组合Chr(13)&Chr(10)或系统 常量vbCrLf来换行。 <对话框标题>：字符串表达式，可选项。运行时该参数显示在对话框 的标题栏中。如果省略，则在标题栏中显示当前的应用程序名。 <默认值>：字符串表达式，可选项。显示在对话框上的文本框中，在 没有其他输入时作为缺省值。如果省略，则文本框为空。
VB编程序的基本结构
1
2 3
“确定”
“取消” “中止”
vbRetry
vbIgnore vbYes vbNo
4
5 6 7
本书目录
“重试”
“忽略” “是”” “否”
11
例 在Form1_Click（）事件过程中定义一个消息框，代码如下： Private Sub Form1_Click(ByVal sender As Object, ByVal e As System.EventArgs) _ Handles Me.Click Dim s As Integer s = MsgBox("用户名必须包含数字和字母", 5 + 48, "警告") If s = vbCancel Then End ' 若用户单击"取消"，则程序退出 End Sub
End Sub
本书目录
9
2. MsgBox（消息框）
MsgBox函数用于在屏幕上的消息框中显示简短消 息，并等待用户单击按钮，然后返回一个整数型的数值， 让应用程序了解用户单击的是哪一个按钮。
语法格式： MsgBox(Prompt[，Buttons] [，Title])
功能：在屏幕上显示一个消息框，根据选择确定其后的 操作。
输入圆的半径r
顺序结构可以独立使用构成一 个简单的完整程序，常见的输入、 计算，输出三部曲的程序就是顺序 结构，例如计算圆的面积。
计算s = 3.14*r*r
输出圆的面积s
3.1.1 赋值语句
语法格式：变量名 = 表达式 功能: 计算赋值号“=”右边表达式的值，然后赋给
赋值号“=”左边的变量。
给变量赋值和设定属性是VB编程中常见的两个任务
VB编程序的基本结构
Case 9, 10
Msgbox ("Greater than 8“)
Case Else
Msgbox ("Not between 1 and 10“)
End Select
例：编写程序,当输入X的值后用 Selct Case语句 计算输出Y的值。
Private Sub Button1_Click(ByVal _ sender As System.Object, ByVal e As _ System.EventArgs) Handles _ Button1.Click
InputBox的功能是等待并提示用户为程序运行 输入指定的数据，简称“输入对话框”。
MsgBox的功能是进行提示，用以确认某种程 序的操作，简称“消息框”。
本书目录
6
1. InputBox （输入对话框函数）
输入对话框一般由标题、提示信息、“确定” 按钮、“取消”按钮和一个供用户输入的文本框组 成。当用户将输入信息输入到文本框，并单击“确 定”按钮后，函数返回用户输入的字符串数据。当 单击“取消”按钮时，返回一个空字符串。
语法格式：变量名 = 表达式
功能: 计算赋值号“=”右边表达式的值，然后赋给赋
值号“=”左边的变量。
给变量赋值和设定属性是VB编程中常见的两个任务
如以下语句，
n=n+1
'计数累加
Label1.Text ＝ "欢迎使用VB "
以下语句形式很常用：
• dim sum% , x%
sum=100 : x=5
Select语句举例
Dim Number% Number = Val(InputBox("输入整数"))
4 VB中的3种程序结构
VB应用程序的执行是由事件驱动的，当用户触发 某一事件时，执行相应的事件过程，这些事件过程 之间并没有特定的执行次序。但在每一个事件过程 内部，是有一定的执行控制流程的，这就是通常所 说的3种基本结构： 4.1 顺序结构
4.2 分支(选择)结构
4.3 循环结构
4.1
4.2
分支（选择）结构
2. 块If语句（双分支结构）
格式： If <条件表达式> Then <语句组1> [Else <语句组2>] End If 例4-4 火车站行李费的收费标准是40kg以内（包括40kg） 0.20元/kg，超过部分为0.50元/kg。编写程序，根据输入的 任意重量，计算出应付的行李费。
4.1
顺序结构
(2) 使用文本框输入数据 使用格式： <变量名>=<对象名>.Text 说明： 同InputBox函数一样，文本框的值也是字符型数据。在应 用中，若要得到数值型数据，可通过Val函数将字符型数据转 化为数值型。
4.1
顺序结构
3. 输出数据
(1)Print方法输出数据 Print的格式： [<对象名>.] <Print> [<输出项列表>] [{; | , }]
分类 按钮类型
按钮值
系统符号常量
VbOKOnly VbOKCancel
含义
只显示“确定”按钮 显示“确定”和“取消”按钮
0 1
2
3 4 5
图标类型
VbAbortRetrylgnore
VbYesNoCancel VbYesNo VbRetryCancel VbCritical VbQuestion VbExclamation VbInformation VbDefaultButton1 VbDefaultButton2 VbDefaultButton3
vb程序的三种基本结构3
打印三角形图形
Private Sub Form_Click() For i = 1 To 7 控制打印位置， 并换行 Print Tab(10 - i); For j = 1 To 2 * i - 1 循环嵌套 Print "*"; Next j Next i End Sub
打印菱形
Private Sub Command1_Click() For i = 1 To 5 Print Tab(20 - 2 * i); For j = 1 To 2 * i - 1 Print "* "; Next j 此处有空格 Next i For i = 4 To 1 Step -1 Print Tab(20 - 2 * i); For j = 1 To 2 * i - 1 Print "* "; Next j Next i End Sub
If <表达式> Then <语句块1> Else <语句块2> End If
3. If…Then…ElseIf语句(多分支结构) If <表达式1> Then <语句块1> ElseIf <表达式2>Then <语句块2> … [Else 语句块 n+1 ] End If
For 语句：
For 循环控制变量＝初值 to/downto 终值 [Step 步长 循环控制变量＝ 步长] 语句块 Next 循环控制变量 for n=1 to 24 step 1 sum=sum+n next n
写出程序的输出结果： Private Sub Command1_Click() Dim n As Integer, i As Integer, s As Integer n = 10 s=0 For i = 1 To n Step 2 s=s+i Next i Print s End Sub 25 输出为：_______
vb程序的三种基本结构1
练习：输入 ，输出其绝对值（不能用abs函数 函数） 练习：输入x，输出其绝对值（不能用 函数）。
选择结构
3. If…Then…ElseIf语句(多分支结构) 形式:
If <表达式1> Then <语句块1> ElseIf <表达式2>Then <语句块2> … [Else 语句块 n+1 ] End If
根据不同的条件判断来决定程 序执行走向的结构。
（3）循环结构 ）
a) 当型循环 b) 直到型循环 N 条件 语句组 Y 语句组 Y 条件 N (b) (a)
根据条件判断某些语句可能需 要执行0次1次或多次的结构。
开始
从10个数中选出最大的数 个数中选出最大的数 的算法流程图
输入A
Max =A N=1
设输入a=2，b=3 如何实现交换过程?
a b
交换过程
2 3
MsgBox(“交换后a= ”& a & “ b=”& b) End Sub
开始
例：交换两个变量a，b的值 1 输入a,b Private Sub Command1_Click() 对应的流程图： Dim a as integer,b as integer,c as 2 c=a integer a=b 3 a=Val(InputBox(“输入a”)) b=Val(InputBox(“输入b”)) 4 b=c c=a 5 输出交换后a,b值 a=b b=c 结束 MsgBox(“交换后a= ”& a & “ b=”& b) End Sub
实现。 例：输入一学生成绩，评定其等级。用select case 实现。 输入一学生成绩，评定其等级。
VB程序基本控制结构
VB程序基本控制结构VB程序的基本控制结构有三种：顺序结构、条件结构和循环结构。
下面将详细介绍这三种结构。
1.顺序结构：顺序结构是指程序按照代码编写的顺序依次执行，不涉及任何的条件判断或循环。
简单来说，就是按照代码的顺序一行行执行。
2.条件结构：条件结构是指根据条件的不同，程序按照不同的路径执行不同的代码。
在VB中，我们可以使用if语句和select case语句来实现条件结构。
- if语句用法示例：if(condition) then'条件为真时执行的代码else'条件为假时执行的代码end if- select case语句用法示例：select case expressioncase value1' 当expression等于value1时执行的代码case value2' 当expression等于value2时执行的代码...case else' 当expression不等于以上任何一个值时执行的代码end select3.循环结构：循环结构是指根据特定的条件重复执行一段代码块。
在VB中，我们可以使用do while、do until、for、for each等语句来实现循环结构。
- do while语句用法示例：do while condition'循环执行的代码loop- do until语句用法示例：do until condition'循环执行的代码loop- for语句用法示例：for counter = start to end step stepValue'循环执行的代码next counter- for each语句用法示例：for each element in collection'循环执行的代码next element这些是VB程序的基本控制结构，它们的灵活运用可以实现各种复杂的程序逻辑。
举个例子，我们可以使用条件结构结合循环结构来实现一个计算1到100之间所有偶数和的程序：```Dim sum As Integer = 0For i = 1 To 100 Step 1If i Mod 2 = 0 Thensum += iEnd IfNextMsgBox("1到100之间所有偶数的和为：" & sum)```。
vb结构化程序设计的三种基本结构
vb结构化程序设计的三种基本结构1.引言1.1 概述概述部分将介绍VB结构化程序设计及其重要性。
VB（Visual Basic）是一种面向对象的程序设计语言，它强调程序的结构化和模块化，以便于代码的可读性和维护性。
VB结构化程序设计通过组织程序代码以一种逻辑和有序的方式，使程序更加易于理解、调试和修改。
在VB结构化程序设计中，有三种基本结构，即顺序结构、选择结构和循环结构。
这些基本结构的正确使用可以使程序具备更好的可控性和灵活性，使其能够适应各种复杂的应用场景。
顺序结构是指程序按照代码的排列顺序依次执行，没有任何条件判断或循环。
顺序结构使得程序的逻辑清晰明了，易于理解。
通过合理地安排程序的执行顺序，可以确保程序按照我们所期望的方式执行。
选择结构允许根据条件的判断来决定程序的执行路径。
根据条件的不同，程序可以选择执行不同的代码块。
选择结构使得程序具有决策能力，可以根据具体条件来作出不同的处理。
循环结构允许程序根据条件的判断来重复执行某段代码。
循环结构使得程序可以重复执行一些特定的操作，节省了代码量，并提高了程序的效率。
本文将重点介绍这三种基本结构的原理和使用方法，并提供一些示例代码来帮助读者更好地理解和使用VB结构化程序设计。
通过学习和掌握这些基本结构，读者将能够编写出更加清晰、可读性更高、可维护性更好的代码，提高程序的质量和效率。
1.2 文章结构文章结构部分的内容应该包括对整篇文章的组织和框架进行介绍。
下面是对文章结构内容可能的写法：在本篇文章中，我们将讨论VB结构化程序设计的三种基本结构。
为了使读者更好地理解这些基本结构，本文将按照以下结构组织：第一部分为引言，包括对整篇文章的概述、文章结构和目的进行介绍。
在概述部分，我们将简单介绍VB结构化程序设计的概念和重要性。
文章结构部分将解释本文的整体组织框架，并说明每个章节的主要内容。
目的部分将说明本文的写作目的和预期的读者受众。
第二部分为正文，将分别介绍VB结构化程序设计的三种基本结构。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
，属于循环结构的是
（）
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
该程序段运行后，变量a的值是（ ） A. 8 B. 9 C. 10 D. 11 例3、a=2:b=1:c=5 If a<b then m =a else m=b end if If c < m then m= c end if 最后，变量m的值是（ 1 ）
3、 循环结构： 根据条件判断其是否成立，如果条件成立则重复执行循环体（循环结构中某语句序列），直到条件 不成立，退出循环结构为止。 循环结构的常用形式为： for 循环变量 = 初值 to 终值 [step 步长] [循环体] next [循环变量] 注：当“step 步长”项缺省时，表示步长是1
S3
2、分支结构：（选择结构） 根据条件判断其是否成立，如果成立执行成立的分支；否则执行另一分支。 其一般形式为： If 条件 Then
语句序列1
Else 语句序列2
End If
分支结构的简单形式为：
If 条件 Then
C
语句序列
End If
S1
S2
例2、a =10 If a>=10 Then a=a+1 Else a=a-1 End If
VB计算机---VB程序的三种基本结 构-(中小学教师继续教育实践性作
业)
教学目标： 1、理解三种程序结构 2 、掌握分支结构、循环结构语句
教学重点： 1、选择结构和循环结构的实现及应用 2、选择结构的嵌套及多重循环结构 教学难点： 1、选择结构和循环结构的实现及应用 2、选择结构的嵌套及多重循环结构
②. J = 0 For I = l To 5
J＝J十1 Next
③. j = 0
④. J = 0
If J＞0 Then
If J＞0 Then
J＝J＋1
J＝J＋l
Endif
Else
J＝J-1
Endif
以上四个程序段中，属于顺序结构的是 ，属于分支结构的是
A. ①②③ B.①③④ C. ②③④ D.以上都不正确
教学过程： 程序是由若干个基本结构组成的，一个基本结构可以包含一条或若干条语句。 通常程序有三种最基本的结构：
一、顺序结构 二、选择结构 三、循环结构
1、 顺序结构： 将命令和语句逐条顺序排列。 程序执行时按语句的先后顺序逐条执行。
例1、 a=1
b=2
c=a+b
a=c-a
S1
b=c-a
最后，变量b的值是（ ） S2
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
总结及作业布置：
在此环节，回顾本节课的重点、难点，总结三种程序结构区别，提示与后续 课程的关系并布置课后作业（上机与指导课后练一练）。
谢谢观赏
S1
C
例4、s=0 for I=1 to 100 s=s+I next 最后，变量s的值是（ ）
例5、 n = 0:s=0 for x=to 11 step 2 n=n+1 s=s+x next x 则最终变量n、s的值是（ ）
课堂巩固： 1、有以下程序段：
①． I = 3
J=5 I=I＋J