常用语句、顺序结构精选.pptVIP

常用语句、顺序结构 InputBox()函数的返回值是字符型数据，在对其数学运算时需要进行强制类型转换 格式： Inputbox(提示[,标题][,默认值][,x坐标][,y坐标]) 如： r = InputBox(“请输入r:”，“输入圆的半径”) Print语句： 在制定的对象上输出文本。 格式：print [表达式列表] 如在窗体的click事件过程中添加如下代码： Private sub form_click() Print “********************” Print “ 新北京 新奥运” Print “********************” End sub Dim r As Single, c As Single, s As Single 定义r,c,s为单精度型变量 r = InputBox(请输入r:) 输入半径r c = 2 * 3.14 * r 计算周长 s = 3.14 * r * r 计算面积 Print c 输出周长 Print s 输出面积 有两个锥形瓶，1号瓶里面装的是溴水，2号瓶里装的是水，如果我们要交换两个瓶子里的液体，该怎么办？ 按照生活常识，我们可以用一个空瓶子作为“中转”来解决这个问题。同理，在程序设计中也使用这种方法来交换两个变量的值。 Dim a ,b,c as single a=val(inputbox(“输入a”)) b=val(inputbox(“输入b”)) print “交换前：a=”,a,”b=”,b ????????????? ????????????? ????????????? print “交换后：a=”,a,”b=”,b 请完成程序。 分析问题、设计算法（用流程图来描述算法）、编写程序、调试程序 总结两个程序，不难发现代码是按照由上到下的顺序一行一行地执行。程序执行过程中没有分支，没有重复，我们把这种结构成为顺序结构。顺序结构是一种那个最基本的程序结构。 1、? 展示求圆周长、面积的程序，讲解input函数，赋值语句，print语句，注释语句 2、? 有两个锥形瓶，1号瓶里面装的是溴水，2号瓶里装的是水，如果我们要交换两个瓶子里的液体，该怎么办？ 按照生活常识，我们可以用一个空瓶子作为“中转”来解决这个问题。同理，在程序设计中也使用这种方法来交换两个变量的值。 （从锥形瓶问题引入交换两个变量的值） Dim a ,b,c as single a=val(inputbox(“输入a”)) b=val(inputbox(“输入b”)) print “交换前：a=”,a,”b=”,b ????????????? ????????????? ????????????? print “交换后：a=”,a,”b=”,b 请完成程序。 分析问题、设计算法（用流程图来描述算法）、编写程序、调试程序 3、? 总结两个程序，不难发现代码是按照由上到下的顺序一行一行地执行。程序执行过程中没有分支，没有重复，我们把这种结构成为顺序结构。顺序结构是一种那个最基本的程序结构。 * 交互函数 赋值语句 VB中的赋值语句用“=”来实现，如： n=1 赋值语句中得“=”左边只能是变量，右边可以是常量、变量或表达式，它表示将“=”右边的值赋值给左边的变量。如：n=n+1 这里的意义是将n的值加1后重新付给n，结果n的值比原值增加了1 注释语句： 为了提高程序的可读性，通常需要在程序的适当位置加上必要的注释 方法： 在字符‘后加注释内容或采用rem 注释内容的方法。如用rem与居住时，应将rem语句独立成行书写，不可像’那样直接写在其他语句之后。 如： c = 2 * 3.14 * r 计算周长 Rem 计算圆的周长 命令按钮command1的单击事件 命令按钮command1的单击事件 1）请阅读以下程序，说出程序执行的结果： Dim a as integer,b as integer,t as integer a=15 b=4 t=a a=a*b b=t Print a,b 2）调换语句“t=a”与“a=a*b”的顺序，程序执行结果是？ *