- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
表达式计算器
《VB程序设计》项目教学法教师工作页
项目六 表达式计算器 模 块 数组 学生任务6 制作表达式计算器 授课班级 高二电脑班 上课时间 课时 10 上课地点 计算机专业
一体化教室 教学目的和要求 通过项目的练习,学生能掌握数组的定义及应用,灵活使用程序设计的三种基本结构;进一步巩固VB系统函数。 教学目标 能力(技能)目标 知识目标 ①灵活使用程序设计的三种基本结构
②熟练使用VB系统函数
③掌握数组、控件数组的使用
④栈算法的应用 ①数组的定义与引用格式
②计算数组中各个元素的值
③控件数组的添加与删除办法
④入栈与出栈的表示 重点、难点及解决方法 重点:1、数组的定义与引用 2、控件数组的添加与删除
难点:1、计算数组中各个元素的值 2、控件数组的使用
解决办法:在项目的教学中中,通过讲演练结合的教学手段,让学生理解掌握各个知识重点;通过增加部分实训拓展的内容,使学生能突破难点。 课前准备 1、制作好一个简单的计算器应用程序和一个能直接进行四则运算的计算器。
2、制作其他教学中要用的小程序和好多媒体课件。 步骤 教 学 内 容 教学
方法 教学
手段 学生
活动 时间
分配 组织教学 1、点名考勤
2、复习 谈话 讨论
代表
发言 5分钟
情境设置
导入 1、教师先在白板上写出一道四则运算的数学题,例如4+2×3-(5.5+6.5)÷3,然后拿出普通的计算器并要求大家打开Windows系统自带的计算器,提出“能否按数学式的顺序直接输入得出运算结果?”
2、那么我们能不能设计出一个能直接进行四则运算的计算器(即表达式计算器)呢?
3、请看大屏幕,展示得出如下界面:
这就是我们接下来要来学习的项目,通过这个项目我们将学习到数组,当然包括控件数组的使用,另外对于系统函数特别是有关字符的函数、程序设计的三种基本结构我们也都将进一步巩固。 谈话
讲授
讲授 设问
多媒体演示
多媒体演示 讨论
发言
体验
操作
体验
操作 15分钟
5分钟 项目分析 1、建立可视化用户界面
对于按钮的集合可以考虑使用控件数组
2、设置可视化用户界面特性
按钮、文本框、窗体的美化
3、添加控件事件及响应代码
相关知识点:算法特别是堆栈的使用 讲授 课件
演示 理解
记录 5分钟 讲
演
练
结
合 任务一:建立可视化用户界面
子项1:操作步骤
教师示范
学生模仿
子项2:相关知识
数组的概念、定义格式、引用方法
练习计算数组中元素的值
3、控件数组的概念、添加和删除的办法,特点等。(举例说明)
例:应用Load和UnLoad操作控件数组,界面如图所示:
任务二:设置可视化用户界面特性
任务三:添加控件事件及响应代码
子项1:告知知识点
1、算法的概念
2、例题1:有两个杯子A和B,A中盛满清水,B中盛满了茶不,要求将它们互换。
分析:根据生活常识,必须增加一个空杯子C进行过渡,否则无法完成。
步骤:将A中清水倒入C中→将B中茶水倒入A中→将C中清水倒入B中。
算法描述:1.A→C 2.B→A 3.C→B
3、栈及其应用
1)什么是栈
2)栈的顺序存储及其运算
3)栈的应用----表达式的计算
子项2:在通用部分定义变量
Dim top1, top2, dh, yshh As Integer
top1、top2分别为操作数栈与操作符栈栈顶指针,yshh代表的是按下的是哪个运算符号
Dim lastinput As String
lastinput用于记录上次按下的是哪个按键
Dim ovs(1 To 20) As Integer
ovs代表的是操作符栈
Dim s, ops(1 To 20) As Double
ops代表的是操作数栈而s用于记录中间的运算值
子项3:给数字按钮添加代码
强调:控件数组共用同一事件过程
Private Sub Command1_Click(Index As Integer)
数字按钮的代码
Dim i As Integer
For i = 0 To 3
Command2(i).Enabled = True
设置运算符号键可用
Next
If Text1.Text = 0 Then
Text1.Text = Trim(Str(Index))
Else
Text1.Text = Trim(Text1.Text) + Trim(Str(Index))
End If
Command5.Enabled = True 设置小数点按钮可用
Command10.Enabled = True 设置sqrt按钮可用
Command11.Enabled = True 设置百分号按钮可用
lastinput = Num
用Num表示这时按下
文档评论(0)