二、编写代码.ppt

程序的三种基本结构（1）顺序结构,（2）选择结构,（3）循环结构,程序的顺序结构,从第一条语句逐句向下执行，执行过程中没有分支，没有重复。一直到最后语句。是一种最简单的顺序结构。,引入例题1：计算一个数X的平方。,程序界面如下：,复习：编写程序解决问题的步骤,Text1.text,输入“文本框中的值”默认是字符型，那我们怎么取出来使用呢？,“文本框中的值”既然默认是字符型，那我们怎么让它能够参加算术运算呢？,Val(Text1.text),Val()将括号中的文本转换为数值型,计算一个数X的平方。,DimXAsInteger定义变量(对变量的数据类型进行说明）)DimSAsInteger定义变量(对变量的数据类型进行说明）)X=Val(Text1.Text)将文本框1的值赋给变量X。Text2.Text=S将结果显示在文本框2里面,程序说明：请记住以下4个步骤1定义变量DimXasintegerDimSAsInteger2.为变量赋值X=Val(Text1.Text)计算S=X*X4.显示结果Text2.Text=S,S=X*X计算,一、提出和分析问题：计算圆的面积和周长的基本思路是：先输入圆的半径r,再让计算机利用求圆面积和周长公式算出面积、周长，最后输出结果S、L。,二、确定算法：（1）输入半径r（2）求圆的面积S,周长L。（3）输出S、L的值,开始,输入r,？,输出,结束,课堂练习：p19_图3-9，求任意半径的圆的面积和周长。,S=3.14*r*r,接下来我们一起来确定算法，并编写程序，最后调试,？,L=3.14*2*r,三、编写程序：,四、调试、运行及保存程序,工程文件保存为1.VBP,窗口文件保存为13.frm,PrivateSubCommand1_Click(),定义变量（对变量的数据类型进行说明）,数据输入部分,数据处理部分,数据输出部分,Endsub,程序过程名,DimrassinglesAsSingleLAsSingler=Val(Text1.Text)S=3.14*r*rL=3.14*2*rText2.Text=SText3.Text=L,课堂思考与提升,从键盘上输入一个任意三位整数r，然后将它反向输出。例如输入456，输出应为654。百位数、十位数、个位数分别用a,b,c表示，设计一程序来完成这个任务。注：除号知道吧？就这个/。想一想，是什么意思？Mod（求余）运算符，例：xmody意思是求取x除以y的余数例:5Mod2=1,请同学们完成以上任务：根据编写程序解决问题的6个步骤完成上面练习,提出和分析问题：从键盘上输入一个任意三位整数r，然后将它反向输出。百位数、十位数、个位数分别用a,b,c表示，则1.r=?（如何用a,b,c表示r？）2.r的反向数=?(如何用a,b,c表示r？),确定算法：（1）输入任意三位整数r（2）求反向数（3）输出反向数100*c+10*b+a,a=r100b=r10-10*aRemb=(rmod100)10c=rMod10,a=r100b=r10-10*aRemb=(rmod100)10c=rMod10,所以，只要能获取单个数字a,b,c，那反向数就很好得到，是吗？,100*a+10*b+c,100*c+10*b+a,DimaasintegerDimbasintegerDimcasintegerDimrasinteger,r=val(text1.text),a=r100b=r10-10*aRemb=(rmod100)10c=rMod10,开始,？,输出反向数,结束,a=r100b=r10-10*aRemb=(rmod100)10c=rMod10,根据算法编写程序：,text1.text=100*c+10*b+a,输入任意