一、教学目标

1、知识与技能

理解程序顺序结构的执行流程，掌握赋值语句和输入输出语句，能够编写简单的顺序结构的程序，以解决生活中的一些计算问题。

2、方法与过程

本节从简单的问题入手，如求圆的面积，让学生初步掌握赋值语句和输入输出语句的使用方法及其功能。进而转入较为复杂的问题，如编写程序使从键盘上输入一个三位数，然后反方向输出，并且运用到上一章所学的运算符、表达式等，对知识进行巩固，课程安排形成循序渐进的梯度，充分挖掘学生潜力，让有余力的学生可以有更大空间。

3、情感态度和价值观

程序设计选取的题目与高一所学的数学、物理中学到的新知识有密切的联系，从而激发学生对程序设计的追求和向往。

二、重点难点

1、教学重点

（1）    赋值语句和输入输出语句的使用

（2）    程序顺序结构的执行流程

（3）    能编写程序解决简单的应用题

2、教学难点

根据题目写出正确的程序

 三、教学过程（2课时）

导入：演示求圆的面积这道题的程序，让学生明白通过程序可以解决数学中的问题，也给学生展示完整的程序代码，这道程序的功能就是靠这些代码来控制的，引起学生的注意，激发他们的求知欲。

一、演示上述的程序，并把程序代码中的各行代码的作用解释一遍，顺便把程序的执行流程说明一下，编写的程序与设计的算法是一致的。

Private sub command1_click()        ‘定义名为command1_click()的事件过程

 Const pi as single=3.14            ‘说明程序中pi是常量∏

 Dim r as single,s as single          ‘定义半径r和面积s为单精度实型

 r=inputbox(“r=”,”请输入半径”)     ‘输入r的值

 s=pi*r*r                        ‘把表达式pi*r*r的值赋给s

 print “圆的面积s=”;s             ‘把s的值输出到当前的窗体上

End sub                         ‘过程结束

二、赋值语句

在上述的程序中，r=inputbox(“r=”,”请输入半径”)，s=pi*r*r的含义分别是将赋值号右边的函数inputbox(“r=”,”请输入半径”)的值赋给变量r, 将赋值号右边的表达式pi*r*r的值赋给变量s。它们的作用都是将表达式的值赋给左边的变量，这种语句称为赋值语句。

赋值语句的基本格式是：

         变量=表达式

这里的“=”是赋值符号，它的含义是将表达式的值赋给左边的变量。

观察下列赋值语句的作用：

（1）    A=B，它是将变量B的值赋给变量A，但B的值并未改变。

（2）    A=123表示将数值123赋给变量A。

（3）    A=A+10表示将变量A的值加10后，再赋给变量A。如果原来A的值为30，则执行此语句后，A的值为40。

（4）    如果A=30，B=40，则依次执行语句T=A，A=B，B=T后，A、B两个变量的值发生交换A=40，B=30。

三、输入数据的函数

        Inputbox()是提供从键盘输入数据的函数，利用它可产生一个对话框，提示用户输入数据并单击命令按钮。该函数返回值是字符类型。利用这个函数，上述程序中的r=inputbox(“r=”,”请输入半径”)，所以在程序运行时，从键盘上输入数据赋值给变量r。

         Inputbox()的语法格式为：

            Inputbox(提示信息，标题，默认值，位置)

    其中：

       提示信息：指对输入数据的提示，显示在对话框中，不能省略。

       标题：指运行此函数后弹出的对话框的标题。

       默认值：指默认的输入数据值。

       位置：指运行此函数后弹出的对话框的左上角在屏幕上的位置与提示信息和标题是用引号引起来的字符串。例如：执行下面的程序运行情况：

        Private Sub Command1_Click()

         A = InputBox("A=", "输入", 12, 100, 20)

End Sub

 运行该程序，屏幕上窗口的左上角将位于坐标为（100，20）的位置，标题为“输入”，窗口的提示信息为“A=”，而在输入栏内会出现默认的数据12。如下图所示：

 四、输出数据的方法

Print是输出数据、文本的一个重要方法。在求圆的面积程序中，print “圆的面积s=”;s 就是利用Print方法将计算出来的圆的面积s的值输出到窗体上。

Print方法输出数据的基本格式是：

      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。