第-章--Visual-Basic程序控制结构优秀文档.ppt

单击此处编辑母版标题样式,单击此处编辑母版文本样式,第二级,第三级,第四级,第五级,第3 章 Visual Basic程序控制结构,3.1 顺序结构,3.2 选择结构,3.3 循环结构,第三章 VB程序控制结构,3.1 顺序结构,编写程序时，我们一条一条地书写指令，如果按照指令的书写顺序执行程序，这种结构就是顺序结构,第三章 VB程序控制结构,指令一,指令二,指令三,3.1.1 赋值语句,用赋值语句可以把指定的值赋给某个变量或某个带有属性的对象，其一般格式为：Let 目标操作符=源操作符,例如：,Totla=99把数值常量99赋给变量Total（是注释符）,BitCount=ByteCount*8,第三章 VB程序控制结构,说明：这里的“源操作符”包括变量（简单变量或下标变量）、表达式（数值表达式、字符表达式或逻辑表达式）、常量及带有属性的对象；而“目标操作符”指的是变量和带有属性的对象；“=”称为“赋值号”。赋值语句的功能是把“源操作符”的值赋给“目标操作符”。“Let”可省略,3.1.2 数据输入和输出,一般格式为：对象名称.Print表达式,|;,一、数据输出Print方法,说明：,例如：,Picture1.Print“Microsoft Visual Basci”,1、“对象名称”可以是窗体（Form）、图片框（PictureBox）或打印机（Printer），也可以是立即窗口（Debug）。如果省略“对象名称”，则在当前窗体上输出。,2、如果省略“表达式”，则输出一个空行,3、如果输出的各表达式之间用,逗号,分隔，则按标准输出格式（分区输出格式）显示数据项,4、如果各输出项之间用,分号或空格,作分隔符，则按紧凑输出格式输出数据,第三章 VB程序控制结构,二、与Print方法有关的函数,1Tab函数,格式：Tab(n),说明：,Tab,函数把光标移到由参数,n,指定的位置，从这个位置开始输出信息。要输出的内容放在,Tab,函数的后面，并用分号隔开。,例如：,Print Tab(25);800,将在第25个位置输出数值800。,2Spc函数,格式：Spc(n)说明：在,Print,的输出中，用,Spc,函数可以跳过,n,个空格。,例如：,Print“ABC”;Spc(8);”DEF”,将首先输出“ABC”，然后跳过8个空格，输出“DEF”。,输出结果为：,ABC DEF,第三章 VB程序控制结构,三、输出格式,用格式输出语句Format$可以使数值或日期按指定的格式输出。一般格式为：,Format$(数值表达式，格式字符串),字符,作用,#,数字；不在前面或后面补0,0,数字；在前面或后面补0,.,小数点,千位分隔符,%,百分比符号,$,美元符号,、+,负、正号,E+、E,指数符号,第三章 VB程序控制结构,例如：,Print Format$(25634,”00000000”),00025634,Print Format$(25634,”#”,25634,Print Format$(850.72,”#.#”),Print format$(12345.67,”#,#.#”),Print format$(.257,”00.0%”),25.7%,第三章 VB程序控制结构,四、数据输入InputBox函数,InputBox函数可以产生一个对话框，这个对话框作为输入数据的界面，等待用户输入数据，并返回所输入的内容。其格式为：,InputBox(prompt,title,default,xpos,ypos,helpfile,context),（1Prompt：是一个字符串，其长度不得超过1024个字符，它是在对话框内显示的信息，用来提示用户输入。在对话框内显示prompt时，可以自动换行。如果想按自己的要求换行，则须插入回车换行操作，即：Chr$(13)+Chr$(10),说明：,（2）title：字符串，它是对话框的标题，显示在对话框顶部的标题区。,第三章 VB程序控制结构,（3）default：字符串，用来显示输入缓冲区的默认信息。如果用户不想用这个默认字符串作为输入值，则可在输入区直接键入数据，以取代默认值；如果省略该参数，则对话框的输入区为空白，等待用户键入信息。,（4）xpos，ypos：是两个整数值，分别用来确定对话框与屏幕左边的距离(xpos)和上边的距离（ypos。这两个参数必须全部给出，或者全部省略。如果省略这一对位置参数，则对话框显示在、屏幕中心线向下约三分之一处。,标题,xpos，ypos,输入区,prompt,（5）helpfile，context：helpfile用来表示帮助文件的名字;context用来表示相关帮助主题的帮助目录号。,第三章 VB程序控制结构,五、MsgBox函数和MsgBox语句,1MsgBox函数,格式如下：,MsgBox(msg,type,title,helpfile,context,说明：该函数有,5,个参数，除第一个参数外，其余参数都是可选的。各参数的含义如下：,（1msg：是一个字符串，该字符串的内容将在由MsgBox函数产生的对话框内显示。,（2）type：是一个整数值或符号常量，用来控制在对话框内显示的按钮、图标的种类及数量。该参数的值由4类数值相加产生，这4类数值或符号常量分别表示按钮的类型、显示图标的种类、活动按钮的位置及强制返回，见表所示。,第三章 VB程序控制结构,序号,符号常量,值,作用,1,vbOKOnly,0,只显示“确定”按钮,2,vbOKCancel,1,显示“确定”及“取消”按钮,3,vbAbortRetryIgnore,2,显示“终止”、“重试”及“忽略”按钮,4,vbYesNoCancel,3,显示“是”、“否”及“取消”按钮,5,vbYesNo,4,显示“是”、“否”按钮,6,vbRetryCancel,5,显示“重试”及“取消”按钮,7,vbCritical,16,显示Critical Message图标,8,vbQuestion,32,显示Warning Query图标,9,vbExclamation,48,显示Warning Message图标,10,vbInformation,64,显示Information Message图标,11,vbDefaultButton1,0,第一个按钮是默认值,12,vbDefaultButton2,256,第二个按钮是默认值,13,vbDefaultButton3,512,第三个按钮是默认值,14,vbDefaultButton4,768,第四个按钮是默认值,15,vbApplicationModal,0,应用程序强制返回；应用程序一直被挂起，直到用户对消息框作出响应才继续工作,16,vbSystemModal,4096,系统强制返回：全部应用程序都被挂起，直到用户对消息框作出响应才能继续工作,第三章 VB程序控制结构,（3）title：是一个字符串，用来显示对话框的标题。,返回值,操作,符号常量,1,选“确定”按钮,vbOk,2,选“取消”按钮,vbCancel,3,选“终止”按钮,vbAbort,4,选“重试”按钮,Vbretry,5,选“忽略”按钮,vbIgnore,6,选“是”按钮,vbYes,7,选“否”按钮,vbNo,（4）helpfile，context：同InputBox函数。,（5）MsgBox函数的返回值是一个整数，这个整数与所选择的按钮有关。见表,第三章 VB程序控制结构,2、MsgBox语句,Msgbox函数也可以写成语句形式，即：,MsgBox Msg$,type%,title$,helpfile,context,例如：,MsgBox“文件保存成功“,执行上面的语句，显示的信息如图所示。,说明：各参数的含义及作用与MsgBox函数相同，由于MsgBox语句没有返回值，因而常用于较简单的信息显示。,第三章 VB程序控制结构3.1.3 注释、暂停与程序结束语句,为了提高程序的可读性，通常应在程序的适当位置加上必要的注释。Visual Basic中的注释是“Rem”或一个撇号“”,一、注释语句,例:A=5:b=6:c=7对变量a、b、c赋值,Stop语句用来暂停程序的执行,二、暂停语句（Stop）,第三章 VB程序控制结构,（3）在格式（1）中，While和Until放在循环的末尾，分别叫做 DoLoop While和DoLoop Until循环，它们的逻辑流程分别如图所示。,第三章 VB程序控制结构,在Visual Basic中，这样的问题通过选择结构程序来解决，而选择结构通过条件语句来实现。,第三章 VB程序控制结构,3 WhileWend 循环结构,否则执行一次“循环体”，然后把“循环变量+步长”的值赋给“循环变量”，重复上述过程。,Case 表达式表列2,第三章 VB程序控制结构,（4）在格式2中，While和Until放在循环的开头，即紧跟在关键字Do之后，组成两种循环，分别叫做Do WhileLoop循环和Do UntilLoop循环，它们的执行过程分别如图所示。,End语句通常用来结束一个程序的执行。,（2）Do和Loop构成了Do循环。,Is关系运算表达式，使用的运算符包括：=,（3）title：是一个字符串，用来显示对话框的标题。,For-Next循环的逻辑流程,（5）MsgBox函数的返回值是一个整数，这个整数与所选择的按钮有关。,显示“终止”、“重试”及“忽略”按钮,Format$(数值表达式，格式字符串),End语句除用来结束程序外，在不同的环境下还有其他一些用途，包括：,End语句通常用来结束一个程序的执行。可以把它放在事件过程中。,三、结束语句（End）,End Sub 结束一个Sub过程,End Function 结束一个Function过程,End If 结束一个If语句块,End Type 结束记录类型的定义,End Select 结束情况语句,第三章 VB程序控制结构,3.2 选择结构,格式如下：,If 条件 Then then部分 Else else部分,当,Then,部分或,Else,部分含有多个语句时，各语句之间用冒号隔开,3.2.1 单行结构条件语句,在日常生活中，常常需要对给定的条件进行分析、比较和判断，并根据判断结果采取不同的操作。在Visual Basic中，这样的问题通过选择结构程序来解决，而选择结构通过条件语句来实现。条件语句也称If语句，它有两种格式，一种是单行结构，一种是块结构。,语句的功能是：如果“条件”为True，则执行“then部分”，否则执行“else部分”。,第三章 VB程序控制结构,如果用户不想用这个默认字符串作为输入值，则可在输入区直接键入数据，以取代默认值；,Case 表达式表列2,如果“条件”为False，则不执行“语句块”,而执行Wend后面的语句。,If 条件1 Then,第三章 VB程序控制结构,2、多分支控制结构程序设计；,Select Case 测试表达式,如果找到了，则执行与该Case子句有关的语句块，并把控制转移到End Select后面的语句；,（3）在格式（1）中，While和Until放在循环的末尾，分别叫做 DoLoop While和DoLoop Until循环，它们的逻辑流程分别如图所示。,Format$(数值表达式，格式字符串),（2）情况语句的执行过程是：先对“测试表达式”求值，然后测试该值与哪一个Case子句中的“表达式序列”相匹配；,3、掌握循环控制结构程序设计方法；,表达式表列1、表达式表列2：称为域值，可以是下列形式之一：,3.2.2 块结构条件语句,一般格式如下：,If 条件1 Then,语句块1,ElseIf 条件2 Then,语句块2,ElseIf 条件3 Then,语句块3,Else,语句块n,End If,第三章 VB程序控制结构,（1）块结构条件语句中的ElseIf子句和Else子句都是可选的,说明：,（2）“语句块”可以是一个语句，也可以是多个语句。有多个语句时，可以分别写在多行里；如果写在一行中，则各语句之间用冒号隔开,（4）块形式条件语句的执行过程是：先测试“条件1”，如果该条件为True，则执行Then后面的“语句块”；如果条件1”为Flase，则顺序测试每个ElseIf子句中的“条件”，当发现某个“条件”为True时，就执行与其相关的Then后面的“语句块”；如果所有ElseIf子句的“条件”都不为True，则执行Else后面的“语句块n”。在执行了Then或Else后面的语句块之后，程序退出块结构条件语句，继续执行End If后面的语句。,（5）“语句块”中的语句不能与其前面的Then在同一行上，如果在同一行上，则为单行结构，否则为块结构。对于块结构，必须以End If 结束，单行结构没有End If。,（3）Else If子句的数量没有限制，可以根据需要加入任意多个Else If子句。,第三章 VB程序控制结构,3.2.3 多分支选择语句,多分支选择语句即情况语句也称Select Case语句或Case语句，它根据一个表达式的值，在一组相互独立的可选语句序列中挑选要执行的语句序列。,Select Case 测试表达式,Case 表达式表列1,语句块1,Case 表达式表列2,语句块2,Case Else,语句块n,End Select,情况语句的一般格式为：,第三章 VB程序控制结构,（1）情况语句中含有多个参量，这些参量的含义分别为：,测试表达式：可以是数值表达式或字符串表达式，通常为变量或常量。,语句块1、语句块2：每个语句块由一行或多行合法的语句组成。,表达式表列1、表达式表列2：称为域值，可以是下列形式之一：,表达式,表达式,表达式,To,表达式,Is,关系运算表达式，使用的运算符包括：,=,说明：,例如：Case 2,4,6,8,例如：Case 1 To 5,例如：,Case Is=12,Case Is(或(或(或)终值？,计算“条件”值,结束,No,Yes,DoLoop Until循环逻辑框图,第三章 VB程序控制结构,（4）在格式2中，While和Until放在循环的开头，即紧跟在关键字Do之后，组成两种循环，分别叫做Do WhileLoop循环和Do UntilLoop循环，它们的执行过程分别如图所示。,开始,计算“条件”值,条件为真吗？,执行循环体,结束,No,Yes,Do WhileLoop循环逻辑框图,第三章 VB程序控制结构,Exit For：退出循环。,Select Case 测试表达式,执行上面的语句，显示的信息如图所示。,如果想按自己的要求换行，则须插入回车换行操作，即：Chr$(13)+Chr$(10),“循环条件”是一个逻辑表达式。,2 数据输入和输出,Visual Basic中的注释是“Rem”或一个撇号“”,（3）在格式（1）中，While和Until放在循环的末尾，分别叫做 DoLoop While和DoLoop Until循环，它们的逻辑流程分别如图所示。,（4）在格式2中，While和Until放在循环的开头，即紧跟在关键字Do之后，组成两种循环，分别叫做Do WhileLoop循环和Do UntilLoop循环，它们的执行过程分别如图所示。,（1）Prompt：是一个字符串，其长度不得超过1024个字符，它是在对话框内显示的信息，用来提示用户输入。,If 条件1 Then,（2）Do While|Until 循环条件,将在第25个位置输出数值800。,（3）在格式（1）中，While和Until放在循环的末尾，分别叫做 DoLoop While和DoLoop Until循环，它们的逻辑流程分别如图所示。,显示“终止”、“重试”及“忽略”按钮,3 注释、暂停与程序结束语句,开始,计算“条件”值,条件为真吗？,执行循环体,结束,Yes,No,Do UntilLoop循环逻辑框图,第三章 VB程序控制结构,（5）Do While|untilLoop循环先判断条件，然后在条件满足时才执行循环体，否则不执行,（6）和While循环一样，如果条件总是成立，Do循环也可能陷入“死循环”。在这种情况下，可以用Exit Do语句跳出循环。,（7）Do循环可以嵌套，其规则和For-Next循环相同,第三章 VB程序控制结构,3.3.3 WhileWend 循环结构,格式如下：,While 条件,语句块,Wend,While,循环语句的执行过程是：如果“条件”为,True,（非,0,值），则执行“语句块”，当遇到,Wend语句时，控制返回到,While,语句并对“条件”进行测试，如仍然为,True,，则重复上述过程；如果“条件”为,False,，则不执行“语句块”,而执行,Wend,后面的语句。,当循环和For循环的区别是：For循环对循环体执行指定的次数，当循环则是在给定的条件为True时重复一语句序列（循环体）的执行,第三章 VB程序控制结构,开始,计算“条件”值,条件为真吗？,执行循环体,结束,Yes,No,当循环流程,第三章 VB程序控制结构,本章要点,1、选择控制结构程序设计；,2、多分支控制结构程序设计；,3、For循环控制结构程序设计；,4、当循环控制结构程序设计；,5、Do循环控制结构程序设计；,6、多重循环程序设计；,具体要求,1、掌握选择控制结构程序设计方法；,2、掌握分支结构程序设计方法；,3、掌握循环控制结构程序设计方法；,4、掌握多重循环程序设计方法；,