第3章流程控制结构_ok

《VisualBasic程序设计》普通高等教育“十二五”规划教材第3章VB流程控制结构VisualBasic流程控制结构第3章《VisualBasic程序设计》普通高等教育“十二五”规划教材第3章VB流程控制结构主要内容3.2选择结构3.3循环结构3.1顺序结构《VisualBasic程序设计》普通高等教育“十二五”规划教材第3章VB流程控制结构3.1.1赋值语句3.1.2数据输出3.1.3数据输入3.1顺序结构3.1.4顺序结构应用程序举例《VisualBasic程序设计》普通高等教育“十二五”规划教材第3章VB流程控制结构顺序结构是一种最简单的程序结构。这种结构的程序按语句书写的顺序“从上到下”依次执行，中间既没有跳转语句，也没有循环语句。顺序结构程序由变量的声明语句、赋值语句、输入输出语句、计算语句等部分组成。3.1顺序结构《VisualBasic程序设计》普通高等教育“十二五”规划教材第3章VB流程控制结构赋值语句是程序设计语言中最基本的语句，也是使用最多的语句，使用赋值语句可以在程序运行中改变对象的属性或变量的值。赋值语句的形式为：变量名=表达式或对象名.属性名=表达式赋值语句的作用是首先计算赋值号右边的表达式的值，而后将计算出的值赋给赋值号左边的变量或对象的属性。在赋值语句中，“=”是赋值号，与数学上的等号意义不同。例如，有如下语句：i=i+1该语句表示将变量i的值加上1后的结果再赋给变量i，从而使变量i的值增1，而并非表示等号两边的值相等。3.1.1赋值语句《VisualBasic程序设计》普通高等教育“十二五”规划教材第3章VB流程控制结构VisualBasic中主要有以下三种输出数据的方法，即：使用Print方法输出使用控件（文本框、标签）输出使用消息对话框输出1.Print方法Print方法的格式为：对象名.Print输出项3.1.2数据输出《VisualBasic程序设计》普通高等教育“十二五”规划教材第3章VB流程控制结构Print方法的说明：对象名:可以是窗体名称、图片框名称、打印机名称或Debug，若为Debug，则表示将结果输出到立即窗口中。如果省略对象名，则表示在当前窗体上输出。输出项:是需要输出的数据，可以是常量、变量或表达式。若为表达式，则先计算表达式的值，然后输出结果；如果是变量，则输出变量的值；如果是常量，则直接输出该常量，对字符串常量来说，不会输出双引号。如果省略输出项，则输出一个空行。分隔符:若要在同一行上输出多个数据项的值，则需要在Print后面书写多个数据项，且应使用逗号或分号进行分隔。此时Print方法的格式为：对象名.Print输出项1,|;输出项2,|;输出项3…当用逗号进行分隔各个输出项时，将按标准输出格式（两个输出项的内容之间间隔14个字符）显示数据；用分号分隔时，将按紧凑格式输出数据，即第二个输出项的内容会紧随第一个输出项的内容之后输出。3.1.2数据输出《VisualBasic程序设计》普通高等教育“十二五”规划教材第3章VB流程控制结构2.与Print方法有关的函数为使输出项按指定的格式输出，VisualBasic中提供了几个与Print方法一起使用的函数，其中包括Tab函数、Spc函数和Format等。⑴Tab函数Tab函数用来将插入点定位在某一列上，即在指定的位置输出数据，与Print方法一起使用的格式为：PrintTab(n);输出项⑵Spc函数Spc函数用于在输出的数据项之前插入若干个空格。与Print方法一起使用的格式为：PrintSpc(n);输出项3.1.2数据输出《VisualBasic程序设计》普通高等教育“十二五”规划教材第3章VB流程控制结构⑶Format函数Format为格式输出函数，用来将要输出的数据按照指定的格式输出。Format函数的使用格式为：Format(表达式,格式字符串)其中，表达式为要输出的数据，可以是数值型、日期型或字符串类型数据；格式字符串是指输出的格式,具体格式说明见教材P52。⑷Cls方法Cls方法用于清除运行时在窗体或图片框内生成的图形和文本。其使用格式为：对象名.Cls若省略对象名，则表示清除当前窗体上的显示内容。注意，Cls方法无法清除在设计阶段添加到窗体上的控件或图片框中使用Picture属性设置的背景图片。3.1.2数据输出《VisualBasic程序设计》普通高等教育“十二五”规划教材第3章VB流程控制结构3.使用控件输出VisualBasic中可使用标签和文本框输出数据。标签控件只能用来显示信息，而不能用来输入信息；而文本框控件既可以显示信息，也可以完成信息的输入。⑴使用标签控件进行输出标签中显示的信息是通过其Caption属性进行设置的，可在属性窗口中设置，也可以通过程序代码进行设置。例如：Label1.Caption=Date&vbCrLf&Time⑵使用文本框进行输出通过文本框控件的Text属性可实现数据的输出。例如：Text1.Text=Date&vbCrLf&Time该语句表示在文本框Text1中分两行显示日期和时间。3.1.2数据输出《VisualBasic程序设计》普通高等教育“十二五”规划教材第3章VB流程控制结构4.使用消息对话框输出消息对话框可实现系统和用户之间的交互。消息对话框可通过MsgBox函数或MsgBox过程实现，MsgBox函数有返回值，且返回值为整数；MsgBox过程没有返回值，常常用来输出信息。MsgBox函数的使用格式为：变量＝MsgBox(提示信息,按钮类型,标题)MsgBox过程使用格式为：MsgBox提示信息,按钮类型,标题说明：⑴提示信息:是对话框中显示的信息，它是一个字符串表达式，可以为字符或汉字.⑵按钮类型:用于确定对话框中显示的按钮数目、形式及图标的类型、默认按钮等。⑶标题:是一个字符串表达式，决定对话框标题栏显示的信息内容3.1.2数据输出《VisualBasic程序设计》普通高等教育“十二五”规划教材第3章VB流程控制结构VisualBasic中可使用输入对话框函数或文本框控件实现数据的输入。1.使用输入对话框函数InputBox输入数据输入对话框使用Inputbox函数实现，InputBox函数的格式为：InputBox(提示信息,标题,默认值,x坐标,y坐标)该函数的作用是打开一个对话框，等待用户在对话框中输入数据，当用户按下回车键或者单击“确定”按钮时，函数将输入的内容作为字符串返回给变量。●提示信息是一个字符串表达式，不能省略，在对话框中作为提示信息，可以为字符或汉字。●标题是一个字符串表达式，决定对话框标题栏显示的信息内容。●默认值也是一个字符串表达式，决定对话框初始的输入内容。●x、y坐标是整型表达式，用来决定输入对话框在屏幕上显示的位置3.1.3数据输入《VisualBasic程序设计》普通高等教育“十二五”规划教材第3章VB流程控制结构在使用Inputbox函数时应注意：●各项参数的次序必须一一对应，除“提示信息”不可省略外，其他项均为可选项，都可省略；但省略参数时，参数间的逗号不能省略。●Inputbox函数的返回值类型为字符型，程序设计时，通常将InputBox函数的返回值赋给某个变量，再通过这个变量使用函数的返回值。若要通过InputBox函数得到数值型数据，可使用Val函数进行类型转换或直接赋给数值型变量。●输入对话框中有两个按钮，即“确定”与“取消”。若用户单击“确定”按钮或按下回车键时，InputBox函数返回输入的数据；如果单击“取消”按钮或按Esc键，则返回空字符串。●执行一次InputBox函数只能输入一个值，若要输入多个数据，则需要多次执行InputBox函数，实际应用中可与循环语句一起使用。3.1.3数据输入《VisualBasic程序设计》普通高等教育“十二五”规划教材第3章VB流程控制结构2.使用文本框TextBox控件输入数据利用文本框控件的Text属性，文本框控件不仅可实现数据的输出，也可以实现数据的输入，即接收用户在文本框内输入的信息。需要注意的是，TextBox控件接收的数据为字符型，如果需要对数值型数据进行处理，可通过Val函数进行转换，或直接将其赋值给数值型变量。如：Text3.Text=Val(Text1.Text)+Val(Text2.Text)在该语句中，文本框Text1与Text2接收用户输入的数据，转换为数值型数据后进行求和运算，文本框Text3实现数据的输出。3.1.3数据输入《VisualBasic程序设计》普通高等教育“十二五”规划教材第3章VB流程控制结构在编制程序时，首先要根据需要处理的问题，规划和确定变量并进行定义和声明；之后通过变量的输入或赋值方法进行数据输入；接下来要进行计算（或程序的处理），这是编制程序的核心，它用于完成程序的功能；最后要将计算或处理的结果进行输出。一个程序一般都是由这4部分构成的，即：变量的声明、变量的输入或赋值、计算（程序处理）、结果的输出。请读者在编制程序时，也按照这样的结构来组织程序。3.1.4顺序结构应用程序举例《VisualBasic程序设计》普通高等教育“十二五”规划教材第3章VB流程控制结构例3.5编写程序，输入圆柱体的半径与高，输出其表面积和体积。程序代码为：PrivateSubCommand1_Click()DimrAsSingle,hAsSingle'声明变量r表示半径，h表示高DimareaAsSingle,vAsSingle'声明变量area表示表面积，v表示体积r=InputBox(请输入半径)'输入半径h=InputBox(请输入高度)'输入高area=2*3.14*r*r+2*3.14*r*h'计算表面积v=3.14*r*r*h'计算体积Print圆柱体的半径为:&r;高为:&h'输出半径与高Print表面积为:&area'输出表面积Print体积为:&v'输出体积EndSub3.1.4顺序结构应用程序举例《VisualBasic程序设计》普通高等教育“十二五”规划教材第3章VB流程控制结构例3.6输入三角形的三个边（假定可构成三角形），求三角形的面积。三角形面积公式为：，其中，A、B、C为三边之长程序代码为：PrivateSubCommand1_Click()DimaAsSingle,bAsSingle,cAsSingle'声明变量DimsAsSingle,areaAsSinglea=Text1'输入b=Text2c=Text3s=(a+b+c)/2'计算area=Sqr(s*(s-a)*(s-b)*(s-c))Label2=三角形的面积为:&area'输出EndSub3.1.4顺序结构应用程序举例))()((CSBSASSAREA2CBAS《VisualBasic程序设计》普通高等教育“十二五”规划教材第3章VB流程控制结构例3.7输入两个整数，将其值交换后输出。例如若变量a、b的值分别1、2，则交换后a的值为2，b的值为1。程序代码为：PrivateSubCommand1_Click()DimaAsInteger,bAsInteger,tAsInteger'声明变量a=Text1'输入b=Text2t=a'将a的值赋给t，即t保存a的值a=b'将b的值赋给a，则a的值变为bb=t'将t的值赋给bLabel2=交换后的值为:&a&,&b'输出EndSub3.1.4顺序结构应用程序举例《VisualBasic程序设计》普通高等教育“十二五”规划教材第3章VB流程控制结构例3.8输入一个4位正整数，输出各位数字之和。例如若输入2134，则输出结果为10（即2+1+3+4）。程序代码为：PrivateSubCommand1_Click()DimxAsInteger,sAsInteger'声明变量DimaAsInteger,bAsIntegerDimcAsInteger,dAsIntegerx=InputBox(请输入一个四位正整数)'输入a=xMod10'得到个位数b=x\10Mod1