Print 输出内容
在这里，输出内容可以是数、变量、表达式，也可以是用引号括起来的字符串。 说明：
（1）如果输出的内容是数、变量、表达式，则输出的是数、变量、表达式的值。如果是引号引起来的字符串，则原样输出。
例如：语句Print 3 的结果为 3 语句Print 2+2 的结果为 4 语句Print “你好” 的结果为 你好
（2）输出内容可以是一个或多个。如果是多个输出内容，则各输出内容之间可以用逗号或分号分隔；如果用分号，则后面一个输出内容紧跟前一个输出；如果是逗号，则按照分区格式输出。
例如：A=5，B=3
Print “A=”；A，“B=”；B 输出结果为：A=5 B=3 A=5，B=3
Print “A=”；A；“B=”；B 输出结果为：A=5B=3
（3）如果输出内容后面没有符号，则表示下一个Print换行输出；如果Print中没有输出内容，则表达输出一个空行。
例如：A=5，B=3 Print “A=” ；A Print “B=” ；B 五、 练习
问题1：已知长方体的长、宽、高，编写一个程序，求长方体的全面积和体积。 （1） 分析问题
设长方体的长、宽、高分别为A、B、C，由于长方体的六个面的面积两两对应相等，所以长方体的全面积为：S=2*（A*B+A*C+B*C），体积为：V=A*B*C。 （2）设计算法
① 输入A、B、C的值
② 计算S=2*（A*B+A*C+B*C） ③ 计算V=A*B*C ④ 输出S，V的值 （3）编写程序
Private sub command1_click()
Dim A as single,B as single,C as single,S as single,V as single A=Inputbox(“A=”,”输入”) B=Inputbox(“B=”,”输入”) C=Inputbox(“C=”,”输入”) S=2*（A*B+A*C+B*C） V=A*B*C
Print “全面积S=”；S，“体积V=”；V
（4）调式程序 六、 小结
在以上的程序中，执行时按语句出现的顺序执。即当执行第一条语句后，必然从第二条语句继续，
顺序执行所有的语句，直到执行完最后一条语句为止。像这样的控制结构称为程序的顺序结构。顺序结构的最大特点是在这个结构内按由上到下的的书写顺序执行，它只有一个入口和一个出口。这是一种最
简单、最基本的结构。如图
五、 课外拓展
试编写程序从键盘上输入一个三位数，然后将它反方向输出。例如输入456，输出应为654。
2-3节 程序的选择结构
一、 教学目标 1、知识与技能
理解程序选择结构中的条件选择语句的执行流程，掌握条件选择语句和多种选择语句的使用方法，能够编写简单的选择结构的程序，以解决生活中的一些计算问题。 2、方法与过程
本节从简单的问题入手，通过一道求一个数的绝对值的题目，让学生明白条件选取择语句的执行流程及使用方法。通过一道输入学生分数，判断该分数是属于哪种等级的题目，让学生初步接触多种选择语句的使用。进而再做类似的练习，加强学生的理解，课程安排形成循序渐进的梯度，充分挖掘学生潜力。 3、情感态度和价值观
程序设计选取的题目都是生活中遇到的例子，加强学生利用本学科解决日学生活中的问题的意识。 二、 重点难点 1、教学重点
（1）条件选择语句和多重选择语句的使用 （2）程序条件选择结构的执行流程
（3）会使用条件语句和多重选择语句编写程序解决简单的应用题 2、教学难点：根据题目写出正确的程序 三、教学环境 1、教材处理
教材选自《广东省普通高中信息技术选修一：算法与程序设计》第二章第三节，原教材的第一个程序例子有关矩形的计算，涉及到解二元一次方程，使用的表达式也较为复杂，授课过程中可能花的时间太多。 所以上课时，把教材的导入例子作了的简单的处理，以求一个数的绝对值作为导入，学生更易理解条件语句的执行。至于多种选择语句，教材选用一道求恩格尔系数，从而判断生活水平的高低的题目，授新课前，就简单说明一下，再用另一道根据学生分数判断该成绩是属于哪一个等级的题目作为实践，从而与学生的学习更有联系，提高学习兴趣。
2、预备知识：学生已掌握算法的概念及描述方法，定义常量与变量的方法，程序设计的四个步骤——分析问题、建立模型、设计算法和编写程序。
3、硬件要求：建议本节课在多媒体电脑教室中完成，有广播教学系统或投影仪。 4、所需软件：学生机要安装VB6.0或以上版本。 5、所需课时：2课时（100分钟） 四、教学过程
导入：演示求一个数的绝对值这道题的程序，让学生明白通过程序可以解决数学中的问题，也给学生展示完整的程序代码，这道程序的功能就是靠这些代码来控制的，引起学生的注意，激发他们的求知欲。 一、演示上述的程序，并把程序代码中的各行代码的作用解释一遍，顺便把程序的执行流程说明一下，编写的程序与设计的算法是一致的。 程序2-3
Private sub command1_click() ‘定义名为command1_click()的事件过程 Dim A as single ‘定义求绝对值的数A为单精度实型 A=inputbox(“r=”,”请输入半径”) ‘输入A的值 If A>=0 then ‘如果A>=0 Print “Y=”;A ‘输出A的值 Else
Print “Y=”;－A ‘输出－A的值 End if
End sub ‘过程结束 二、条件语句
在解决问题的过程中，常常需要对事物进行判断和选择，如上题中，求一个数A的绝对值，如果A>=0，则这个数的绝对值为A，否则为－A。在程序设计中，如何实现判断和选择呢？在上述代码中，有一个用if开头的语句，这就是条件语句。 （一）条件语句的基本格式是：
if 条件 then 语句组1 else 语句组2 或
if 条件 then 语句组1 else
语句组2 end if
其中，条件是一个逻辑表达式，语句组是一组VB的语句。 （二）条件执行语句的执行过程
条件语句的执行过程是：当条件成立时，执行then后面的语句组1，否则执行语句组2，条件语句的执行流程图如下图所示。
在条件语句的基本格式中有时可以省略else和语句组2，这时条件语句的执行过程是当条件成立时，执行then后面的语句组1，否则退出条件语句，执行下面的语句。 （三）关系表达式
在程序2-3中，程序的第三行是一个条件语句，其中的条件A>=0表达式，一般称为关系表达式，关系
表达式是用关系运算符连接起来的式子。 关系运算符号有： 运算符号 含义 = 等于 ＞ 大于 ＞＝ 大于等于 ＜ 小于 ＜＝ 小于等于 ＜＞ 不等于 当关系表式成立时其值为真（Ture）,当表达式不成立时其值则为假（False）；关系表达式的值既不是数
值型量，也不是字符型量，而是一种新的数量类型——逻辑型。逻辑型只有两个可能的值：假（False）和真（Ture）。
关系表达式的值定义如下：
（1）对数值型的数据比较，是按照数值的大小来进行比较。如13>6的值为真。 （2）对其它类型数据的比较，则按照其序号进行比较。如＂D＂>＂B＂其值为假。2 在实际问题中，对于一些复杂的条件，还需要几个关系表达式组合起来才能表示。例如，条件2 需要用2 Not（非）取操作数相反的值。即当操作数为假时，结果为真；当操作数为真时，结果为假。 And（与）当两个操作数都为真时，结果才为真。 Or（或）当两个操作数都为假时，结果才为假。 （五）逻辑运算的顺序 (1)当条件中只有逻辑运算符时，运算的顺序为Not、And、Or (2)当条件中既有算术运算符，又有关系运算符和逻辑运算符时，运算顺序是：算术运算符，关系运 算符，逻辑运算符 例如： a+b>c+d and a>=5 or not c>0 or d<0 当a=5,b=7,c=2,d=1时，运算结果是真。 三、练习 四、练习 问题1：某商场为了对苹果进行促销，规定购买2千克以上可以在原价每千克1.5的基础上打8折。请设计一个程序计算购买x千克苹果的应付款。 （1） 分析问题 设买苹果的重量为x千克，应付款为y元,如果x>=2,则y=1.5*x*0.8,否则y=1.5*x。 （2）设计算法 ① 输入x的值 ② 如果x>=2,则y=1.5*x*0.8 ③ 否则y=1.5*x ④ 输出y的值 （3）编写程序 Private sub command1_click() Dim x as single x=Inputbox(“请输入购买苹果的重量”) if x>=2 then y=1.5*x*0.8 else y=1.5*x end if Print “应付款”；y；“元” （4）调式程序 五、 多重选择语句 问题2：输入一个成绩，如果90分以上，则输出“优秀”；80-89，则输出“良好”；70-79，则输 出“中等”；60-69，则输出“及格”；60分以下则输出“不及格”，请编写程序。 如果这道题使用if语句来编写程序的话，程序如下： 程序2-4 Private sub command_click() X=inputbox(“请输入一个分数”) If X>=90 then print”优秀” If X>=80 and X<89 then print”良好” If X>=70 and X<79 then print”中等” If X>=60 and X<69 then print”及格” If X <60 then print”不及格” End sub 在程序2-4中，使用了5个if语句来处理5种情况。这样的程序在可读性和效率方面都是比较差的，如果再多一些情况，它的缺陷就会暴露得更加明显，如何处理这个问题呢？ （一）多重选择语句格式 在VB语言中，设置了一个处理多种情况的语句，称为多重选择语句，它的基本格式为： select case 表达式 case 表达式列表1 语句组1 case 表达式列表2 ?? case else 语句组N+1 end select 其中 （1）表达式和表达式列表可以是数值型或字符型，表达式列表还可以是多个用逗号分开的表达式。