黄右刚.doc

沈 阳 航 空 航 天 大 学 课程设计 学 号2009040305012 班 级 姓 名 黄右刚 指导教师 __________ 年 月 日课程设计任务书 学院：航空宇航工程 专业：飞行器制造工程 班级学号：2009040305012 题目：选择教师系统 一、课程设计时间 2011年3月7~11日（第1周），共计1周，20学时。 二、课程设计内容 有5位教师同时讲同一门课，而学习此课程的学生可以自由选取上课教师，但每个学生只能选1个老师。请模拟这个“选教师”系统。功能应包括以下方面： ①学生选教师。 ②查询某位教师的学生人数。 ③查询某位学生所选的教师。 说明：教师名单和学生名单在“file18_选择教师系统.mdb” 数据库中。在教师名单表中存储的数据为：教师编号，教师姓名，学生人数；在学生名单表中存储的数据为：学生学号，学生姓名，教师姓名。 三、课程设计要求 程序质量： 贯彻事件驱动的程序设计思想。 用户界面友好，功能明确，操作方便；可以加以其它功能或修饰。 用户界面中的菜单至少应包括“选教师”、“查询教师情况”、“查询学生情况”、“降序打印教师名单”、“退出”5项。 代码应适当缩进，并给出必要的注释，以增强程序的可读性。 课程设计说明书： 课程结束后，上交课程设计说明书和源程序。课程设计说明书的内容参见提供的模板。 四、指导教师和学生签字 指导教师：________ 学生签名：_黄右刚_______ 五、成绩 六、教师评语  目 录 一、需求分析 3 二、设计分析 4 三、技术要点 5 四、总结 10 五、完整的源程序 10 六、参考文献 12 一、需求分析 模拟书店经营业务，主要指“购进图书”和“出售图书”2种业务。由于图书的出售价格高于图书的购进价格，所以系统能够计算累计利润。要求： （1）在Access中创建books 表，以“购进图书”和“出售图书”2方面信息。此表的结构应如下定义：图书编号，图书名称，出版社，购进册数，购进价格，出售册数，出售价格。 （2）能够随时显示库存情况和销售情况。 （3）能够随时计算书店累计利润。 （4）能够随时购进新书和出售图书，册数不限。 二、设计分析 （1）基本原理：建立程序设计与数据库的连接，用SQL语句在数据库中查找，添加和更改数据。 （2）总体设计： 图1 总体设计 （3）详细设计： 图2 详细设计 三、技术要点 （1）建立与数据库的连接代码如下： Option Explicit Option Base 1 Dim cnn As ADODB.Connection‘声明变量作为连接对象 Dim tempset As ADODB.Recordset‘声明变量作为记录对象 Dim a As Single, b As String, c As String, d As Single, e As Single, f As Single, g As Single, m As Single, n As String‘声明变量属性 Private Sub Form_Load() Set cnn = New ADODB.Connection cnn.ConnectionString = Provider=Microsoft.Jet.OLEDB.4.0; _ Data Source=2031.mdb‘连接数据源 cnn.ConnectionTimeout = 30 cnn.Open End Sub （2）查询经营情况是SQL语句在数据库中查找图书销售信息。 Select字段名表From表名Where条件 程序段如下： Private Sub Command1_Click() Dim sqlstr$ ‘声明变量 m = Val(Text1.Text) Set tempset = New ADODB.Recordset tempset.CursorType = adOpenKeyset tempset.LockType = adLockOptimistic‘定义记录集属性，包括名，光标属性，锁类型 sqlstr = SELECT 图书名称, 出版社, 购进册数,购进单价,出售价格, 出售册数 FROM 图书 WHERE 图书编号= m‘进入数据表的途径 tempset.Open sqlstr, cnn, , , adCmdUnknown If Not tempset.EOF The