- 1、本文档共18页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
教师上课随机点名
沈 阳 航 空 航 天 大 学
课程设计
学 号 2009040603058
班 级姓 名 李善彬
指导教师 刘学平
2011年 7月 6
沈阳航空航天大学
课程设计任务书
学院: 机电工程学院 专业:车辆工程 班级学号:6 题目:教师上课随机点名
一、课程设计时间
2011年3月7日~11日(第1周),共计1周。
二、课程设计内容
教师在每次上课时,需要对学生随机点名,学生信息保存到文本文件或Access数据库中,学生信息至少应包括:学号、姓名、点名次数(初始值为0)。
所谓点名,是指将某位同学的姓名和学号显示到屏幕上,则表示该同学被点名1次,并累加点名次数,注意点名的随机性(可使用随机函数)。
用户界面中的菜单至少应包括“编辑学生数据”、“开始点名”、“查询学生点名情况”、“退出”4项。
三、课程设计要求
程序质量:
贯彻事件驱动的程序设计思想。
用户界面友好,功能明确,操作方便;可以增加其它功能或修饰。
代码应适当缩进,并给出必要的注释,以增强程序的可读性。
课程设计说明书:
课设结束后,上交课程设计说明书和源程序。课程设计说明书的内容参见提供的模板。
四、指导教师和学生签字
指导教师:__刘学平______ 学生签名:_____李善彬___
五、成绩
六、教师评语
目 录
需求分析………………………………………………..3
设计分析………………………………………………..3
关键技术………………………………………………..5
总 结……………………………………………….14
完整的源程序………………………………………….16
参考文献……………………………………………….18
一、需求分析
教师在每次上课时,需要对学生随机点名,学生信息保存到文本文件或Access数据库中,学生信息至少应包括:学号、姓名、点名次数(初始值为0)。
所谓点名,是指将某位同学的姓名和学号显示到屏幕上,则表示该同学被点名1次,并累加点名次数,注意点名的随机性(可使用随机函数)。
用户界面中的菜单至少应包括“编辑学生数据”、“开始点名”、“查询学生点名情况”、“退出”4项。
二、设计分析
(1)基本原理;设计窗体,添加控件,ADO, ,Dategrid,Command,三个命令按键,一个文本框.。在Form1中用Randmize随机产生数,运用代码将ADO中的信息显示在Text中。新建Form2将ADO与Dategrid绑定。在Form3中,设置登陆密码,实现加密。从而实现当教师点名时可以显示随机抽点的学生的编号,姓名,学号,点名次数。运用代码将点到的学生信息保存到ADO中,并显示在DataGrid中,运用菜单编辑器可以添加和删除,最后退出。
(2)总体设计:
(3)详细设计:
(4)数据库设计:
数据库设计是总体设计阶段非常重要的环节,数据库结构的变化会造成编码的改动,所以必须认真设计数据库结构后再进行编码,从而避免无谓的重复工作。本系统的数据库包括4个表,即学生基本信息表,学生成绩表…。
1)学生基本信息表(rsb.dbf)
学生基本信息表(rsb.dbf)用于记录学号、姓名、班级等信息,其逻辑结构如表1所示。
表1 学生基本信息表
编号 学号 姓名 点名次数 4 1 阿克拉时间 8 20 2 按时大家 10 23 3 按时觉得 10 24 4 王琦 12 27 5 李强 11 30 6 高健 5
三、关键技术
程序整个界面的设计:
窗体-点名
随机产生数Ado与Text的附值,显示当前点名信息和所有同学信息: Rnd函数表达式 Int(Rnd *范围+基数)
程序段如下:
Private Sub Command2_Click()
Randomize 保证每次运行时产生不同序列的随机数
Adodc1.Recordset.MoveFirst
Adodc1.Recordset.Move Int(Rnd * Adodc1.Recordset.RecordCount + 0)
If Adodc1.Recordset.EOF Then End
Text1.Text = Adodc1.Recordset(学号)
Text2.Text = Adodc1.Recordset(姓名)
Text3.Text = Adodc1.Recordset(点名次数) + 1
Adodc1.Recordset(点名次数) = Adodc1.Recordset(点名次数) + 1 在表中点名次数后累加
End Sub
Private Sub 查询学生点名情况_Cli
文档评论(0)