汽车用品销售系统课案.doc

石家庄铁道大学四方学院 集中实践报告书 课题名称 汽车用品销售管理系统 姓 名 学 号 部 土木工程系 专业 指导教师 刘仁芬 年月日 一、设计任务及要求： 设计任务：要 求： 二、指导教师评语： 三、成绩 指导教师签名： 年 月 日 汽车用品销售管理系统 1选题的意义 为了能够方便、灵活的实现汽车用品入库记录的录入、删除、修改等功能，能够方便、灵活的实现汽车用品销售记录的录入、删除、修改等功能，也为了更好的锻炼自己，使自己在上小学期过程中所学到的知识可以应用于实践，并且证明自己具体所学的知识是否符合逻辑。用到的数据结构和知识点：首先，确定汽车用品销售和管理的方法；其次，本着方便灵活的理念对本系统的运行窗体进行构建；然后，编写本程序的代码，力求能够实现汽车用品入库记录的录入、删除、修改等功能；最后，将各个运行窗体进行关联，使程序能够流畅的运行。并且本系统针对登陆界面、主窗体首页、管理员验证、会员验证、数据管理、所购汽车用品、退出验证、选购、主窗体、注册等界面，进行了设计。 2 系统功能需求分析 2.1系统概述 2.2系统的组成及各模块的功能 系统的组成相当于概要设计，详细设计，汽车用品销售管理系统包括如下基本功能： （1）系统管理：用于系统使用该系统的用户，以及权限的分配，从而为系统提供一定的安全性。 （2）汽车用品管理：包括以下几点——汽车用品的查询、修改、删除、添加。 （3）购买汽车用品：主要用于汽车用品的浏览购买。 （4）退出：结束运行过程。 2.3系统的运行环境 1.操作系统：Windows 2000/XP 系统支持：Visual Basic 6.0及以上版本支持库 数据库：Access. 硬件环境： ?处理器：Intel Pentium 166MX1GB以上。 ?内存：32MB以上。 ?显卡：SVGA显示适配器。 2.4系统开发环境 操作系统：Windows 2000/XP. 系统支持：Visual Basic 6.0 3系统设计 3.1总体结构设计 图2 各模块图 3.2数据库实现 图3 总体模块图 表1 汽车用品资料 字段名 数据类型 备注 用品编号 自动编号 255 用品名称 文本 255 生产地 文本 255 生产厂家 文本 255 入库时间 日期/时间 255 类型 文本 255 剩余数量 文本 255 价格 货币 255 表2 销售记录 字段名 数据类型 备注 编号 自动编号 255 卖出用品 文本 255 卖出时间 日期/时间 255 卖出数量 文本 255 总计金额 文本 255 4系统实现 4.1登录模块的设计与实现 图主窗体 主窗体.Show Private Sub Command1_Click() Dim db1 As ADODB.Recordset Dim temp As ADODB.Recordset Dim sql1 As String 用户 = db1.Fields(0) sql = select 密码 from 用户 where 密码= Trim(Text2.Text) Set db1 = usesql(sql) If db1.EOF = True Then MsgBox 密码错误！, vbExclamation + vbOKOnly, 警告 Text2.SetFocus Text2.Text = Exit Sub End If quanxian = temp.Fields(0) Unload Me Set rs = Nothing End Sub Private Sub Command2_Click() Unload Me End Sub4.2其他（如学生信息模块）模块的设计与实现 Private Sub Command3_Click() 注册.Show Unload Me End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then Command1_Click End If End Sub Private Sub Text2_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then Command1_Click End If End Sub 数据管理 P