vb基本程序结构

第六章基本程序结构本章内容及要求：1.了解算法概念及算法的表示，掌握用N—S流程序表示算法2.熟练掌握赋值语句、End语句和注释语句等语句及输入/输出消息框函数的使用；3.熟练掌握行if语句、块if结构、SelectCase情况选择结构有使用，掌握选择的嵌套结构；4.熟练掌握实现循环结构的For/Next循环结构及ExitFor语句、Do/Loop循环结构的使用，掌握多重循环。重点：选择结构及循环结构的实现及其应用难点：选择的嵌套及多重循环结构6.1算法及算法的表示6.1.1算法概述什么是算法：广义地讲：算法是为完成一项任务所应当遵循的一步一步的规则的、精确的、无歧义的描述，它的总步数是有限的。狭义地讲：算法是解决一个问题采取的方法和步骤的描述。下面通过两个简单的例子加以说明：例6.1输入三个数，然后输出其中最大的数。将三个数依次输入到变量Ａ、B、C中，设变量MAX存放最大数。其算法如下：例6.2输入10个数，打印输出其中最大的数。算法设计如下：（1）输入1个数,存入变量A中,将记录数据个数的变量N赋值为1，即N=1（2）将A存入表示最大值的变量Max中，即Max=A（3）再输入一个值给A，如果AMax则Max=A,否则Max不变（4）让记录数据个数的变量增加1，即N=N+1（5）判断N是否小于10，若成立则转到第（3）步执行，否则转到第（6）步。（6）打印输出max1)输入A、B、C。2)A与B中大的一个放入MAX中。3)把C与MAX中大的一个放入MAX中。4)输出MAX，MAX即为最大数。6.1.2算法的特性1有穷性2确定性3有0个或多个输入4有一个或多个输出5有效性6.1.3算法的表示一、自然语言与伪代码表示算法自然语言：就是指人们日常使用的语言，可以是汉语、英语或其它语言。伪代码：是用介于自然语言和计算机语言之间的文字和符号（包括数学符号）来描述算法。例如：例6.1可用如下的伪代码表示Begin（算法开始）输入A，B，CIFAB则A→Max否则B→MaxIFCMax则C→MaxPrintMaxEnd(算法结束)二、用传统流程图表示算法处理框起止框I/O框判断框流程线连接点1、传统流程图中的基本符号2、三种基本结构的传统表示（1）顺序结构条件语句1语句2YN语句1语句2（2）选择结构条件(a)条件语句组（3）循环结构a)当型循环b)直到循环YNYN(b)语句组三种基本结构的特点：（1）只有一个入口（2）只有一个出口（3）不存在死语句（4）不存在死循环例：例6.2输入10个数，打印输出其中的最大的数的流程图从10个数中选出最大的数的流程图N10Max=AN=1AMaxMax=A输入A开始再输入给AN=N+1打印Max结束YNNY6.1.4用N—S流程图表示算法将全部算法写在一个矩形框内，在矩形内还可包含其它从属于它的框三种基本结构的N—S图表示：语句A语句B语句A语句B条件YN1、顺序结构2、选择结构语句组（3）循环结构a)当型循环b)直到循环当条件成立语句组直到当条件成立例：画出从10个数中选出最大的数的N—S流程图(a)(b)传统流程图N10Max=AN=1AMaxMax=A输入A开始再输入给AN=N+1打印Max结束YNNY输入A当N=10Max=AN=N+1打印Max输入AN—S流程图A=MaxYNPrivateSubForm_Click()Dima%,max%,i%max=aFori=1To10a=Val(InputBox(A=?))IfamaxThenmax=aNextiPrintMax=;maxEndSub最后需要说明的是：上面介绍的算法表示是给人看的，即是为帮助程序开发人员阅读、编写程序而设计的一种辅助工具，程序则必须符一计算机语言的语法规则。下面是例6.2的计算机程序，即为用计算机语言表示算法：6.1.5结构化程序设计方法（补充）（一）用计算机解决问题的过程提出、分析问题确定算法模型设计算法编写程序调试程序分析输出结果正确合理结束（二）结构化程序设计思想自顶向下、逐步细化、模块化自顶向下：先从全局、整体设计逐步细化：将一个问题分解成几个较小的问题解决模块化：将一个大任务分解成若干个较小的部分，每个部分承担一定功能，称为“功能模块”例：给100个整数，打印输出其中的素数S1N—S流程图输入100个数存入X1，x2,……x100打印x1…..x100中不等于0的数让x1，x2,……x100中的非素变为0S3S2输入xi当i=100i=i+1i=1xi≠0当i=100i=i+1i=1YN打印xiS1N—S流程图输入100个数存入X1，x2,……x100打印x1…..x100中不等于0的数让x1，……x100中的非素变为0S3S2判断xi是否是素数，若不是则将xi=0当i=100i=i+1i=1S21r=0r=将x1除j的余j=j+1j=2YNxi=0直到jxi/2输入100个数存入X1，x2,……x100打印x1…..x100中不等于0的数让x1，……x100中的非素变为0细化后的流程图输入xi当i=100i=i+1i=1当i=100i=1r=0r=xi%jj=j+1j=2YNxi=0直到jxi/2i=i+1xi≠0当i=100i=1YN打印xii=i+16.2顺序结构6.2.1赋值语句形式:变量名＝表达式对象.属性＝表达式功能：将表达式的值赋值给变量名或指定对象的属性。一般用于给变量赋值或对控件设定属性值.例：sRate!=0.1Text1.Text＝欢迎使用VisualBasic6.0”说明：1.执行过程：先求表达式的值，然后将值赋值给左边的变量。2.右边表达式可以是变量、常量、函数调用等特殊的表达式。3.不要将“＝”理解为数学上的等号：A=A+1是表示将A单元的值加１后以放回到A单元。执行过程如右图4．赋值符号“=”左边一定只能是变量名或对象的属性引用，不能是常量、符号常量、表达式。下面的赋值语句都是错的：5=X'左边是常量。Abs(X)=20'左边是函数调用，即是表达式。5.赋值符号“=”两边的数据类型一般要求应一致。具体规则（P77）6.2.2注释语句其语法格式为：Rem注释内容或'注释内容说明：1.注释内容指要包括的任何注释文本。在Rem关键字和注释内容之间要加一个空格。可以用一个英文单引号“'”来代替Rem关键字。2.如果在其他语句行后面使用Rem关键字，必需用冒号(：)与语句隔开。若用英文单引号“'”，则在其他语句行后面不必加冒号(：)。例如：ConstPI=3.1415925'符号常量PIS=PI*r*r:Rem计算圆的面积6.3选择结构1.If…Then语句(单分支结构)If表达式Then语句块EndIf或If表达式Then语句tyx图1-3-8两个数交换过程例:已知两个数x和y，比较它们的大小，使得x大于y.IfxyThent=x:x=y:y=tEndIf或IfxyThent=x:x=y:y=t2.If…Then…Else语句(双分支结构)If表达式Then语句块1Else语句块2EndIfIf表达式Then语句1Else语句2例如：输出x,y两个中值较大的一个值。IFXYThenPrintXElsePrintYEndIf也可以写成如下的单行形式：IFXYThenPrintXElsePrintY双分支选择结构执行过程3.If…Then…ElseIf语句(多分支结构)形式:If表达式1Then语句块1ElseIf表达式2Then语句块2…[Else语句块n+1]EndIf例：输入一学生成绩，评定其等级。方法是：90~100分为“优秀”，80~89分为“良好”，70~79分为“中等”，60~69分为“及格”，60分以为“不合格”执行过程使用IF语句实现的程序段如下：Ifx=90thenPrint优秀ElseIfx=80ThenPrint良好ElseIfx=70ThenPrint中等ElseIfx=60ThenPrint及格ElsePrint不及格EndIf6.3.2SelectCase语句（条件分支）形式：SelectCase变量或表达式Case表达式列表1语句块1Case表达式列表2语句块2…[CaseElse语句块n+1]EndSelect表达式列表：与变量或表达式同类型的下面四种形式之一：1.表达式A+52.一组枚举表达式(用逗号分隔)2,4,6,83.表达式1To表达式260to1004.Is关系运算符表达式Is60数值型或字符串表达式将例6.3使用selectcase…..语句来实现的程序段如下：SelectCasexCase90to100Print优秀Case80to89Print良好Case70to79Print中等Case60to69Print及格CaseElsePrint不及格EndSelect补充例题：设计一个由计算机来当小学低年级学生算术老师的VB应用程序，要求给出一系列的两个1~10数的四则运算的算术题，学生输入该题的答案，计算机根据学生的答案判断正确与否，并给出成绩，单击结束命令按钮，退出应用程序。分析:产生1～10操作数，可通过Int(10*Rnd+1)实现6.3.3选择结构的嵌套在IF语句的Then分支和Else分支中可以完整地嵌套另一IF语句或SelectCase语句，同样SelectCase语句每一个Case分支中都可嵌套另一IF语句或另一SelectCase语句。下面是两种正确的嵌套形式：（1）IF条件1Then…..if条件2Then……Else…..EndIf….Else….IF条件3Then…..Else…..EndIf…..EndIF（2）IF条件1Then…..SelectCase…Case……IF条件1Then……Else…..EndIf……Case….…..EndSelect….EndIF注意：只要在一个分支内嵌套，不出现交叉，满足结构规则，其嵌套的形式将有很多种，嵌套层次也可以任意多。对于多层IF嵌套结构中，要特别注意IF与Else的配对关系，一个Else必须与IF配结，配对的原则是：在写含有多层嵌套的程序时，建议使用缩进对齐方式，这样容易阅读和维护。6.4循环结构1.For循环语句(一般用于循环次数已知)形式For循环变量＝初值to终值[Step步长]语句块[ExitFor]语句块Next循环变量循环变量在终值内图1-3-13For循环语句语句块ExitFor语句块循环变量加步长TF循环变量得初值循环体0初值终值=1时,可省略0初值终值=0死循环步长循环次数)1(步长初值终值Int例:ForI=2To13Step3PrintI,NextIPrint“I=“,I4)1(3213Int循环执行次数输出I的值分别为:25811出了循环输出为:I=14例6.5编程计算：S=1+2+3+…+100DimS%,I%S=0'累加前变量S为0ForI=1to100S=S+INextIPrintS=,S当N=100N=N+1打印SS=0,N=1S=S+N例4-5的算法流程图形式1：（当型循环）Do{While|Until}条件语句块[ExitDo]语句块Loop条件FTFTExitDo语句块语句块ExitDo语句块语句块表达式列表1图1-3-16Do…LoopWhileDoWhile…Loop执行过程6.4.2Do…Loop循环语句形式2：(直到循环）Do语句块[ExitDo]语句块Loop{While|Until}条件表达式列表1FTFTExitDo语句块语句块ExitDo语句块语句块条件Do…LoopWhile的执行过程图1-3-15DoWhile…Loop条件语句块语句块TFExitDo条件语句块语句块TFExitDoDoUntil…Loop执行过程Do…LoopUntil执行过程说明：（1）当使用While条件构成循环时，当条件为“真”则反复执行