第八章 第三节 应用作程序实例.pptVIP

组合框控件（combobox） 第八章 第三节 应用程序实例 教学目标： ⑴ 通过设计程序实例，体会程序设 计的基本方法和过程 ⑵ 加深对算法、程序设计的理解。 “多彩同心圆”窗体 看右侧窗体、回忆学习过的控件 1. 命令按钮控件 2. 标签控件 3.组合框控件 A B C 比较两窗体控件 标签控件、 共同点：都含有 不同点： 多彩同心圆含有-----组合框控件combobox) 命令按钮控件 组合框 文本框 圆面积计算器含有--文本框(textbox) 文本框 （textbox ） 布置任务： 本节课任务：设计 “圆面积计算器” 窗体界面，并编写程序代码。 通过实例设计 ，体验程序设计的基本方法和一般过程。 一、分析问题 3个标签控件 1个文本框控件 2个命令按钮 修改窗体form1、6个控件的属性 添加哪些控件？数量？属性是否修改？ 如何完成这个任务？ 二、算法设计 ★然后要编写代码，如何编写？ 第一步做什么？再做什么？解题步骤？ 算法-----解决问题的方法步骤 求圆面积步骤、用自然语言描述 首先设R、 S 、Pi三个变量， R圆的半径， S圆的面积、 Pi=3.14、 计算圆面积，将面积S显示在标签中。 圆面积公式 S=Pi*R2 开始 输入、赋值半径R 赋值圆周率Pi=3.14 求园的面积S=Pi*R*R 输出面积S值 结束 用流程图描述算法 “圆面积计算器” 程序代码 Private Sub Command1_Click() 单击命令按钮1的事件 R= Val(Text1.Text) 将文本框1中的值赋给变量r Pi = 3.14 将数值3.14赋给变量pi S= Pi * r * r 计算圆的面积s值,赋给变量s Label3.Caption = Str$(S) 将变量s值填入标签3 End Sub 结束此事件过程 Private Sub Command2_Click() 单击命令按钮2的事件 End 结束语句 End Sub 结束此事件过程 ----- Val( ) 、Str$( ) 是函数表达式 三、编写程序代码 双击“计算”命令按钮，编辑代码 在代码编辑窗口，将学习指导中第一段代码，复制到光标闪烁处（最好自己编写） Private Sub Command1_Click() End Sub语句 之间 五、保存程序（工程文件） 首选建立“圆面积计算器”文件夹 保存程序（保存2个文件） （工程文件. Vbp、窗体文件.frm） 四、调试运行程序 举一反三： 根据 “圆面积计算器” 程序， 设计一个 “圆周长计算器”窗体，并编写程序代码。 提示：设变量 L 为圆周长 圆周长公式为： L=2* Pi *r 提高任务： 设计 “圆面积和周长计算器” 该计算器功能是: 输入半径值，能同时求出圆面积和周长 园面积和周长计算器窗体 程序设计的基本方法和过程 1. 分析问题 2.算法设计 3.编写程序 4.调试运行程序 5.保存程序