程序的顺序结构上课课件

2.2程序的顺序结构,VB程序一般包含哪几部分？(求圆的面积),知识回顾,数据类型说明部分,数据的输入部分,数据的处理部分,数据的输出部分,Dima,rAsSingle,r=InputBox(“r=”,”输入r的值”),s=3.14*r*r,Print“圆的面积s=”;s,基本格式：变量=表达式功能：赋值和计算含义：这里的“=”是赋值符号，它的含义是将表达式的值赋给左边的变量。例：s=3.14*r*r(1)x=1(2)x=2y=2x=x+5x=y,1、赋值语句,注意：赋值符号要与数学中的等号相区别,练习：写出下列语句。（1）将数值123赋给变量A。（2）将变量B的值赋给变量A。（3）将变量A的值加10后，再赋给变量A。,常见错误赋值号左边只能是变量或属性名，不能为常量或表达式。（下列语句中只有一个正确）X+y=zText1=1=x不能在一条赋值语句中给多个变量赋值。如：x=y=z=1（错误）,注意：把字符串赋给串变量时，该字符串必须用双引号括起来；如：C=“CHINA”,赋值语句练习,一、判断以下式子在赋值语句中是否正确（1）D=6+9（2）F+3=E+6（3）G=G*4（4）X*Y=Z二、下面的字符串赋值语句是否正确？（1）S=STUDENT（2）C=CLASS（4）D=HOMEWORK三、写出各变量的最后结果A=8B=A*AC=BA=B+CC=A+B+C四、写出以下程序段的X结果N=0M=1N=N+1M=M*NX=M,B=64C=64A=128C=256,N=1M=1X=1,变量的特点：每个变量占用一个内存空间，有新的内容被送到这个变量中，旧的内容就被冲刷掉了。,如果A=30，B=40则执行下列语句之后结果如何？,T=AA=BB=T,概念：提供从键盘输入数据的函数基本格式：InputBox(“提示信息”,”标题”,默认值,坐标位置),2、输入数据的函数InputBox(),说明：提示信息：对输入数据的提示，显示在弹出的对话框中，不能省略。标题：运行函数后弹出对话框的标题。默认值：默认的输入数据值。坐标位置：运行函数后弹出的对话框左上角在屏幕上的坐标位置。,不可以省略,可以省略,例如P36：Inputbox(A=,输入,12,100,20),标题,提示信息,默认值,基本格式：Print输出内容功能：计算并输出数据注意：输出内容可以是数、变量、表达式，也可以是用引号括起来的字符串。(1)如果输出内容是数，变量，表达式，则输出的是数，变量，表达式的值，如果是用引号引起来的字符串，则原样输出(2)多个输出内容，可以用逗号或分号分隔；如果用分号，则后面一个输出紧跟前一个输出；如果是逗号，则分区格式输出(3)如果输出内容后面没有符号，则表示下一个Print换行输出，如果print中没有输出内容，则表示输出一个空行。,3、输出数据的方法Print,例：Print“圆的面积s=”;s输出结果：圆的面积s=10.6（紧凑输出格式）Print“圆的面积s=”,s输出结果：圆的面积s=10.6（标准输出格式）,项目分隔符,练一练：试编写一个程序，实现输入长方体的长、宽、高，求长方体的表面积和体积。,开始,输入a,输入b,输入c,根据公式：s=2*(a*b+a*c+b*c),根据公式：v=a*b*c,输出v,输出s,结束,Dima,b,c,s,vAsSingle,a=InputBox(长=,输入),b=InputBox(宽=,输入),c=InputBox(高=,输入),v=a*b*c,s=2*(a*b+b*c+a*c),Print“表面积s=”;s,Print“体积v=”，v,4、顺序结构的特点,开始,语句1,语句2,语句n,结束,顺序结构的运行流程图,按由上到下的书写顺序执行,只有一个入口和一个出口,2.已知变量x的值是496，下列程序的功能是求x的各位数字之和s，其中a是百位数字，b是十位数字，c是个位数字,PrivateSubCommand1_Click()Dimx,a,b,c,sAsIntegerx=496a=x100b=x10mod10c=xMod10s=a+b+cprint各位数字之和s=;sEndsub,3.已知长宽高A、B、H，求长方体的体积V,DimAAsSingleDimBAsSingleDimHAsSingleDimVAsSingleA=8B=7H=12V=A*B*Hprint长方体的体积V=,V,4.从键盘输入圆的半径R，输出圆的周长L和面积S，补充完整下列程序段。DimRAsSingle,LAsSingle,SAsSingleR=7L=2*3.14*RS=3.14*R*RPrint圆的周长是;LPrint圆的面积是;S,5.已知正方形的边长A是8，下列程序的功能是计算正方形的周长L。请将程序缺失部分补充完整。Functionfunc()DimAAsSingleDimLAsSingleA=8L=4*AFunc=正方形的周长&LEndFunction,6.将a、b的值互换后输出Functionfunc()DimaAsSingleDimbAsSingleDimcAsSinglea=3b=4t=aa=bb=tfunc=a=&a&b=&bEndFunction,课程总结,赋值语句：将表达式的值赋给左边变量的语句基本格式：变量=表达式,输入函数：提供从键盘输入数据的函数