汽车4S店零配件仓库管理系统

目目录录 摘要摘要 3 3 AbstractAbstract 4 4 1 1 绪论绪论 5 5 2 2 4S4S 店汽车零配件仓库管理系统分析店汽车零配件仓库管理系统分析 6 6 2 1 汽车 4S 店业务流程分析 6 2 2 关于数据库 6 2 3 系统运行环境 7 3 3 管理软件设计管理软件设计 1010 3 1 功能设计 10 3 2 模块结构设计 10 3 3 程序流程图 11 3 4 数据库设计 13 4 4 仓储管理软件的设计仓储管理软件的设计 1515 4 1 界面的设计 15 4 2 仓储管理软件安全性的设计 26 5 5 系统测试系统测试 2727 5 1 测试项 27 5 2 测试条件 27 6 6 结论结论 2929 总结与体会总结与体会 3030 致致 谢谢 3131 参考文献参考文献 3232 附录附录 3333 2 4S 店汽车零配件仓储管理系统店汽车零配件仓储管理系统 摘 要 4S 店汽车零配件仓储管理系统能够正确有效地完成仓库管理的日常工作 从而实现用户能够快速的进行汽车零配件仓储管理 4S 店汽车零配件仓储管理 系统包括需求分析 系统功能 系统设计 程序设计 系统测试及存在问题等方 面 详细地介绍了 4S 店汽车零配件仓库管理系统 设计开发的整个过程 4S 店汽车零配件仓储管理系统采用 Visual Basic 作为开发工具 后台数据采 用 Access 数据库设计 利用 ADO 数据库访问实现各种功能 关键词关键词 零部件管理 数据库 管理系统 Visual Basic 3 4S Car s Parts Storage Management System Abstract 4S car s parts storage management system can able to correctly and effectively accomplish the daily work of storage management enabling users to quickly car s parts storage management 4S car s parts storage management system includes requirement analysis system function systems design programming and the system tests and exists the aspects such as question etc and systematically introduced the whole course of 4S car s parts storage parts management system subject development 4S car s parts storage management system using Visual Basic as a development tool the background data using the Access database design ADO database access to achieve the various functions Keywords Parts management Database Management system Visual Basic 4 1 1 绪论绪论 随着中国经济的快速增长 中国汽车的保有量逐年递增 对于汽车4S 店 的售后及仓库管理需要更加方便以及实用的管理软件 在汽车4S 店仓库管理中 需要实时采集 并根据需要及时地向相关的各部门传送各类信息 这对零配件 供应 销售服务 质量监控 成本核算等都有着重要的作用 同时此数据对零 配件的质量跟踪和售后服务有重要的意义 由于零配件管理数据属于动态信息 不仅数据量大 而且内容庞杂 且由于此数据不仅用于售后服务及质量监控等 方面 同时还具有对零配件质量跟踪等功能 因而必须保证数据准确 符合行 业的管理软件和计算机网络技术的应用为实现上述功能需求提供了可靠的保证 为用户提供更公开 更快捷 更规范和更优质的服务 是各家汽车4S 店面临的 共同挑战 想要有效地解决上诉问题 就必须引入更加高效的管理手段 其中 实行计算机化管理就是有效的方法之一 5 2 2 4S4S 店汽车零配件仓库管理系统分析店汽车零配件仓库管理系统分析 2 12 1 汽车汽车 4S4S 店业务流程分析店业务流程分析 4S 汽车店零部件管理系统的业务主要是采购 销售信息的管理 汽车 4S 店 各个部门把采购信息和销售信息输入系统 操作人员根据汽车 4S 店零部件信息 控制采购和销售业务 计算机也会自动记录信息 4S 店汽车零部件管理的特点是信息处理量比较大 所管理的信息包括全部 汽车维修企业的信息和业务信息等单据的发生量特别大 关联信息多 查询和 统计的方式各不相同 因此在管理上实现起来有一定困难 在管理的过程中经 常出现住处的重复传递 单据 报表的种类繁多 各个部门管理规格不统一等 问题 4S 汽车店零部件管理系统在设计过程中 为了克服这些困难 满足计算机 管理的需求 采取了以下一些原则 1 程序代码标准化 软件统一化 确保软件的可维护性和实用性 2 删除不必要的管理冗余信息 实现管理规范化 科学化 3 统一各种原始单据的格式 统一账目和报表的格式 进行 4S 店汽车零部件管理系统业务流程图的设计 操作员或管理人员进入 本系统后 一系列的操作过程设计 2 22 2 关于数据库关于数据库 数据库是关于数据的信息的集合 也就是对数据流图中包含的所有元素的 定义的集合 任何数据最主要的用途都是供人查阅对不了解的条目的解释 数 据库的作用是在软件分析和设计的过程中给人提供关于数据的描述信息 数据 流图和数据库共同构成系统的逻辑模型 没有数据库 数据流图就不严格 然 而没有数据流图数据库也难于发挥作用 只有数据库和对数据流图的精确定义 放在一起 才能共同构成系统的规格说明 系统开发时 常用名片的形式书写保存描述一个数据元素 下面给出本系 统的主要数据元素的数据库索引表格 6 名字 配件编号 列名 配件编号 描述 唯一地标识配件信息表的一个特定关键 域 定义 配件编号 位置 配件信息 图 2 1 配件编号 名字 入库单号 描述 唯一地标识汽车维修企业入库信息一个 特定关键域 位置 入库单号 图 2 2 入库单号 名字 出库单号 描述 唯一地标识汽车维修企业出库信息一个 特定关键域 位置 出库单号 图 2 3 出库单号 名字 用户名称 列名 用户名称 描述 用户指定条件下的系统用户口令表 位置 用户信息表 图 2 4 用户名称 2 32 3 系统运行环境系统运行环境 2 3 12 3 1 系统开发工具选择系统开发工具选择 目前 在市场上这些众多的程序开发工具中 有些开发软件强调程序语言 的执行效率 有些则偏重于可视化程序开发工具所带来的便利性与效率的提高 各有各的优点和特色 也满足了不同用户的需求 然而 语言的执行效率和工 7 具的便利性是密切相连的 只有便利的工具 却程序语言的执行效率 许多特 殊化的处理必需要耗费数倍的工夫来处理 使得原来所标榜的效率提高的优点 失去了作用 相反 如果只强调程序语言的执行效率 却没有便利的工具作配 合 会使一些即使非常简单的界面处理动作 也会严重地浪费毕业设计的宝贵 时间 而 Visual Basic 是著名的微软公司的可视化软件开发工具 其被称为最 容易编程语言 它具有简单 高效 功能强大的特点 它是一个非常理想的选 择 是可视化的快速应用程序开发语言 它提供了可视化的集成开发环境 这 一环境为应用程序设计人员提供了一系列灵活而先进的工具 可以广泛地用于 许多种类应用程序设计 Visual Basic 的前身是 QBASIC 语言基础是 BASIC 自从微软推出 VB 后 便成为了程序开发人员的首选工具之一 跟据统计 仅在数据库系统开发领域 中 VB 就占了 90 的份额 VB 是基于对象的可视化程序开发工具 它的优点 在于能够快捷 简易地建立 Windows 应用程序 1998 年 8 月 微软推出了 VB 6 0 的版本 进一步加强了部件开发的功能 以适用人员来分 可有以下三个版本 标准版 针对一般程序设计人员 适合普通应用系统的开发 专业版 针对专业程序开发人员 它在标准版的基础上提供了对数据库和 Internet 的支持 企业版 适用于专为企业设计应用软件的程序开发人员 2 3 22 3 2 数据库的选择数据库的选择 建立一个数据库也有多种选择 现在市场上有各种各样的数据库 而且每 一种数据库都有其自身的特点 不能说哪一种更好 只能在其中寻找一种能更 好地适应系统需求 更好地满足用户的要求以及适应开发人员的习惯 当然 要是一个完善的管理软件 必须要有后台的数据库 而目前主流的数据库有以 下几种 低级数据库最流行的是 ACCESS 中级数据库 最流行的是 SQL Server 2000 SQL Server 2005 Mysql 高端的三大数据库 DB2 ORACLE SYBASE 其中 我选择 ACCESS2003 做为系统的后台数据库 ACCESS2003 是美国微 软公司开发的一款关系型数据库管理系统的产品 具有成本低 易上手 工具 全等优点 适用于大型或超大型数据库服务器端 8 利用 VB6 0 卓越 快速 简便的界面开发平台 制作系统的客户端界面 再利用 ACCESS2003 创建出具有合理的物理关系 逻辑关系的后台数据库 最 后运用 VB 语言来编写代码 实现人机交互 运用 ADO 的方法来建立与后台数据 库的连接 包括数据的添加 查询 删除 修改等等 最后开发和测试系统 2 3 32 3 3 开发与运行环境开发与运行环境 1 硬件环境 处理器 Inter Pentium 或更高 内存 256MB 以上 硬盘空间 40GB 显卡 集成显卡或更高 2 软件环境 操作系统 Windows XP 开发工具 VB6 0 中文企业版 数据库 Microsoft ACCESS 2003 美化工具 Photoshop 其他 Excel 9 3 管理软件设计管理软件设计 3 1 功能设计功能设计 仓库管理系统可以为小型的货物管理部门提供基本的仓库管理 从而帮助 仓库管理人员能够使用软件对其现有业务流程进行搞笑的管理 这些管理包括 货物信息管理 包括货物信息的增加 修改 删除 浏览管理 货物采购入库管理 对采购的货物完成电子入库 货物销售出库管理 对销售的货物实现电子出库 查询管理 包括对货物信息的查询 客户信息的查询和其他信息的查询 货物信息打印 对当前仓库中的货物信息进行打印 管理员管理 主要是管理员的登录管理与口令管理 3 23 2 模块结构设计模块结构设计 4S 店汽车零配件仓库管理系统 可分为几个主模块 系统管理 基本信 息管理 查询管理 出入库管理 库存管理 按照结构化的系统设计方法 将 整个系统分解成相对独立的若干模块 通过对模块的设计和模块之间关系的协 调来实现整个软件系统的功能 从而得到系统的功能模块结构图 本系统的功 能模块结构如图 3 1 所示 10 图 3 1 系统模块结构图 3 33 3 程序流程图程序流程图 汽车 4S 店零配件仓储管理 用 户 管 理 密 码 管 理 切 换 用 户 配 件 管 理 配 件 分 类 采 购 入 库 库 存 查 询 库存详细信息 采 购 查 询 销 售 查 询 库 存 管 理 销 售 出 库 查 询 管 理 系 统 管 理 基本信息管理 出 入 库 管 理 11 登陆管理系统 验证用户信息 信 息 错 误 信息正确 进入主界面 用户是 否正确 库 存 管 理 查 询 管 理 系统管理 基本信息管理 出 入 库 管 理 用 户 管 理 密 码 管 理 切 换 用 户 配 件 管 理 配 件 管 理 采 购 入 库 库 存 查 询 库存详细信息 采 购 查 询 销 售 查 询 销 售 出 库 12 3 43 4 数据库设计数据库设计 有关数据结构的建立 在进行了数据基本结构的规范化重组后 还必须建 立整体数据的关系结构 这一步设计完成后数据库和数据结构设计工作基本完 成 以后系统实现时将数据分析和数据库的内容代入到所设计的数据整体关系 结构中 一个规范化数据库系统结构就建立起来了 根据分析阶段得出的结论 结合本系统对有关数据的存储的需要 更加方 便实现该管理系统的所有功能 现将本管理系统设计成如下几个数据库表 表 的设计如下 表 3 1 用户信息表 字段名称类型大小 用户名称文本 20 密码文本 20 权限文本 20 表 3 2 配件信息 字段名称类型大小 配件编号文本 50 配件名称文本 50 型号文本 50 汽车品牌文本 50 计量单位文本 20 库存量数字 配件分类文本 20 表 3 3 采购入库信息 字段名称类型大小 入库单号文本 50 入库日期文本 20 配件编号文本 50 配件名称文本 50 型号文本 50 13 计量单位文本 20 入库数量数字 采购价格货币 生产厂家文本 50 采购人文本 20 表 3 4 销售出库信息 字段名称类型大小 出库单号文本 50 出库日期文本 20 配件编号文本 50 配件名称文本 50 型号文本 50 计量单位文本 20 出库数量数字 销售价格货币 客户文本 50 销售人文本 20 其他表请参考数据库 14 4 4 仓储管理软件的设计仓储管理软件的设计 4 14 1 界面的设计界面的设计 界面要求美观易懂 操作简单 使用户感觉愉快 操做方便 从而提高使 用效率 本系统基于 Windows XP 操作系统 因此在界面上遵循 Windows XP 的 传统风格 由标题栏 菜单栏 快捷工具按钮 对话框等要素组成 与 Windows XP 操作系统一致的人机界面 使得用户只要具备 Windows XP 操作基 础 就能很快适应本管理系统的操作使用 因此能够大大降低系统培训费用以 及培训周期 提高系统的可推广性 为了进一步美化界面 使得用户在操作中更加心情舒畅 我们选用 Photoshop CS4 图像处理软件 为系统设计了比较新颖的界面图 总之对系统 界面的整体风格 页面布局结构以及色彩搭配等进行了合理的规划和设计 在 保证操作员实用性 方便性的前提下 创造更简单 更友好的系统界面 4 1 14 1 1 登录界面登录界面设计设计 用户登录窗口启动 包括输入用户名和密码 登录 默认用户名 admin 密码 admin 从用户信息表中检查是否有相应的用户名和密码 如果用户名或 密码错误 进行提示 如果输入的用户名和相应密码正确 进入主控制平台 用户登录模块的窗体设计 在工程中添加一个窗体 命名为 frmLogon 用户登 录模块的窗体如图 4 1 所示 图 4 1 登录 其中用户登录连接数据库的部分代码 检查是否有相应的用户名和密码代码 Private Sub cmdOK Click 进入 确定 15 On Error GoTo Err Dim txtSql As String UserID If Trim txtUserName Text Then 判断用户名是否为空 MsgBox 请输入帐号 vbOKOnly vbExclamation 警告 txtUserName SetFocus Exit Sub End If If Trim txtPassword Text Then 判断密码是否为空 MsgBox 请输入密码 vbOKOnly vbExclamation 警告 txtPassword SetFocus Exit Sub End If 检查是否有该用户代码 txtSql select from 用户信息表 where 用户名称 txtUserName Text 判断是否有这个用户 If rs State Then rs Close rs Open txtSql CN adOpenStatic adLockOptimistic If rs EOF True Then 如果没有这个用户 MsgBox 没有这个帐号 请重新输入帐号 vbOKOnly vbExclamation 警告 txtUserName Text txtPassword Text txtUserName SetFocus Else 如果有用户 If Trim rs Fields 1 Trim txtPassword Text Then 16 If Trim rs Fields 2 管理员 Then IsUserMode 1 Else IsUserMode 2 End If UserID Trim txtUserName Text Unload Me Mainfrm Show Exit Sub 4 1 24 1 2 主界面主界面设计设计 汽车维修企业零部件管理主界面是如图 4 2 主界面 采用 SDI 窗体 WINDOWS 风格设计 主要采用菜单式的管理方式 主界面功能包括系统设置 基本数据 出入库管理 库存管理 查询管理和帮助 图 4 2 主界面截图 其中部分代码如下 17 Private Sub MDIForm Load Me StatusBar1 Panels 1 Text 操作员 UserId Me StatusBar1 Panels 2 Text 欢迎使用汽车 4S 店零配件仓库管理 系统 Call PrivsSeting End Sub 4 1 34 1 3 用户管理界面设计用户管理界面设计 系统设置包括 用户 密码 数据库管理 用户包括权限管理 用户管理 模块实现 2 个主要功能 增加新的操作人员 删除指定的操作人员 密码是对 当前用户进行密码修改 其中代码可以参考 frmUsers 如图 4 3 如图 4 3 用户管理界面 4 1 44 1 4 基本信息界面基本信息界面设计设计 汽车 4S 店零配件仓库管理系统基本信息包括对配件分析信息 配件信息的 管理 包括添加 删除 修改等操作 如图 4 4 是配件信息 添加 操作成功 18 图 4 4 配件信息截图 其中主要代码如下 Private Sub cmdRegAdd Click 添加 nModeSys 2 添加操作 Dim IDmax As String Dim i As Integer For i 1 To Val Txt 0 Text If Lbl i Caption 库存量 Then Txt i Text 0 Else Txt i Text End If Next i 19 Txt 1 Text GetmaxId Lbl 1 Caption cmdRegSave Enabled True 4 1 54 1 5 出入库界面出入库界面设计设计 出入库管理包括采购入库和销售出库信息 入库管理界面如图 4 6 所示 本界面主要是对入库单信息进行添加删除修改保存等操作 其中代码详情请参 考 frmlk 文件 图 4 6 入库界面截图 点击添加按钮如图 4 7 可实现汽车零配件的添加 配件编号是支持选择配 件信息的 可以名称进行选择 20 图 4 7 添加界面截图 其中代码如下 rst Open select from 采购入库信息 where 入库单号 Trim Text1 0 Text CN adOpenStatic adLockOptimistic If Trim strDZId Then 添加 rst AddNew For i 0 To 9 If Trim Text1 i Text Then rst Fields i Value Trim Text1 i Text Next i rst Update With frmlk MSHFlexGrid1 If Rows 2 And Trim TextMatrix 1 1 Then Else Rows Rows 1 For i Rows 2 To 1 Step 1 For j 0 To 9 TextMatrix i 1 j TextMatrix i j Next j Next i End If 4 1 64 1 6 出库管理设计出库管理设计 出库管理设计和入库管理设计思想一样 并不做详细说明 其中出库管 理界面图 4 8 图 4 9 所示 21 4 8 销售出库界面截图 图 4 9 出库添加截图 4 1 74 1 7 零配件库存管理设计零配件库存管理设计 零配件库存管理包括汽车零配件详细库存信息和库存量查询 可以统计零 配件出入库数量及时间 如图 4 10 其中的代码 If rst State Then rst Close rst Open select 配件编号 配件名称 型号 计量单位 from 配件信息 CN adOpenStatic adLockOptimistic Dim i As Integer Dim j As Integer 22 Dim gridI As Integer i 0 If rsK State Then rsK Close rsK Open select from 盘点信息表 where 年月 Combo1 Text Combo2 Text CN adOpenStatic adLockOptimistic If Not rsK EOF Then If MsgBox 本月份配件已统计 是否重新统计 vbInformation vbYesNo 提示 vbYes Then CN Execute delete from 盘点信息表 where 年月 Combo1 Text Combo2 Text Else Exit Sub EndIf 4 10 零配件库存管理截图 23 4 11 零配件信息检索截图 4 1 84 1 8 查询功能的设计查询功能的设计 查询功能的设计包括零配件出入库查询和数据统计 从而实现管理人员对 零配件的数量 销售数量 库存数量进行统计以及查询 如图 4 12 其中所涉 及到的代码 If Trim Combo3 Text And Trim Combo4 Text And Trim Text1 Text Then strsql select from Trim strTableName where Trim Combo3 Text Trim Combo4 Text If Combo4 Text like Then strsql strsql Trim Text1 Text Else strsql strsql Trim Text1 Text End If If rs2 State Then rs2 Close rs2 Open strsql CN adOpenStatic adLockOptimistic Set MSHFlexGrid1 DataSource rs2 Else 24 MsgBox 请选择或输入数据 系统提示 4 12 信息检索截图 4 1 94 1 9 帮助界面设计帮助界面设计 关于和帮助界面是对系统软件版本 作者的一个介绍 帮助界面是对功 能介绍包括 初始用户 用户和密码都为 admin 添加用户 在用户名称中输入要添加用户的名 原始密码为 12345 可以 修改 之后点添加 完毕 如果系统已经添加的该用户 系统自动提示 重新 添加 删除用户 选中要删除的用户 直接点删除 系统有提示是否真的删除 点是 就删除了此用户 如图 4 13 25 4 13 关于截图 4 24 2 仓储管理软件安全性仓储管理软件安全性的设计的设计 仓库管理系统的安全性设计可以分为数据库级安全设计和应用软件级安全 设计两个级别 数据库级安全设计对数据库级安全通过赋予操作员不同的操作权限 控制 操作员对数据库的访问 对操作员进行存取控制 另外并发控制 完整性约束 以及数据的备份和恢复策略等等 这些安全性都可以充分利用数据库管理系统 DBMS 本身具有的功能来实现 应用软件级安全设计可以在系统平台上根据不同的登陆身份和权限 给出 不同的操作界面 允许不同的操作 本系统的登录模块 用户管理模块配合 就是完成这样的功能 26 5 5 系统测试系统测试 测试的目的就是为了能以最少的人力和发现潜在的各种错误和缺陷 系统 测试是保证系统质量和可靠性的关键步骤 是对系统开发过程的系统分析 系 统设计和系统实施的最后检查 测试表格显示此功能模块通过测试 也证明了本功能模块与其他模块的独 立性十分强 从而在以后维护软件的过程中 能够更多的更有效的使用各个功 能模块 5 15 1 测试项 测试项 整个系统 5 25 2 测试条件 测试条件 在其他测试项目都通过了单元测试 组合测试 确认测试 下面针对整个 系统进行测试 系统测试是将已经确认的软件 计算机硬件等其他因素组合在 一起 进行信息系统的各种组装和确认测试 其目的是通过和系统的需求相比 较 发现所开发的系统与用户需求不符或矛盾的地方 常见的系统测试有恢复 测试 安全性测试 强度测试 性能测试 可靠性测试 安装测试 在本系统 中我们对整个源代码进行测试 发现系统没有出现什么问题 在将系统打包后可 能会出现的问题就是有些机器上没有微软公司的一些 ActiveXObject 控件或者是 某些组件 因此导致系统不能加载某写对象 为了解决这个问题我在对 ActiveXObject 控件进行了打包做成压缩包 只要复制到相应的文件夹中即可 通过对整个系统的测试 我发现整个系统的功能还是比较稳定 虽然在某 些地方还不尽如人意 但是我们开发的目的还是达到了 作为第一次完整的开 发软件 第一次做毕业设计 我们从中还是学到了不少的知识 通过这次开发 我们为以后进入汽车 4S 店售后行业做管理工作积累了一定的经验 在开发本系统时 为了使系统能够稳定运行 对本系统进行了有针对性的 全面测试 采取的方式是 1 菜单项测试 为了保证每一项下拉菜单能够正确实现系统设计的功能 我设计了一些测试数据 基本上全部输入到本系统中 并对每一个菜单项逐一 27 进行了增加 删除 修改等操作 从而保证了菜单没级功能的正确实现 2 数据测试 完成队菜单项测试后 我又对系统内的每一个数据进行了测 试 例如 例如对配件编号 我首先在配件信息模块中对某个配件信息进行设 定 然后在其他模块进行数据操作 随时观察这两个数值之间是否有冲突产生 经过多次设置并进行验证 说明该功能没有问题 3 综合测试 在以上测试的基础上对系统功能进行了整体的测试 依次来 检验系统功能是否符合系统设计的要求 28 6 6 结论结论 于以前对 VB6 0 和 Access2003 只是了解并不能够灵活运用 所以在毕设期 间进行了一番研究 终于可以基本掌握了常用控件的用法和语句编程 数据库 的建设和使用 虽然 SQL 数据库的安全性和普及性很高 但我们在日常中还是 接触得比较少 所以这自然又是一番努力的学习 就拿安装配置以及连接数据 库方面来说就不那么容易 会用了两种软件 如何把它们连接在一起还真是一 件困难的事 选择连接的方法就很重要 通过各方面的比较 我选择了 ADO 通过 ADO 对象与数据库中各表进行连接 同时也用到少数编程实现 VB 和数据库 的连接 在开发过程中我遇到了许许多多的问题 很多地方都不明白 经常有 打退堂鼓的想法 我经常的请教同学和老师 最后的成果虽然不很完美 但我 尽力了 并有所收获 29 总结与体会总结与体会 在开发过程中我遇到了许许多多的问题 很多地方都不明白 经常有打退 堂鼓的想法 我经常的请教同学和老师 最后的成果虽然不很完美 但我尽力 了 并有所收获 通过毕业设计的锻炼 对于以前所学的的基本知识进行了一 次比较系统的复习和巩固 对我们非计算机专业的学生来说设计一个软件还是 有一定难度的 自己通过查阅大量的书籍以及以前所做软件的经验总结 还是 比较顺利的完成了毕业设计的要求 特别是对 VB6 0 和 Access2003 有了更深层 次的理解 在开发过程中我遇到了许许多多的问题 很多地方都不明白 经常 有打退堂鼓的想法 我经常的请教同学和老师 最后的成果虽然不很完美 但 我尽力了 并有所收获 30 致致 谢谢 这次的毕业设计已经进入尾声 在这里我要真诚地感谢帮助我的老师和同 学 有了他们的帮助我才能顺利的完成这次毕业设计 从选择毕业设计题目开 始 到毕业设计规划 查找相关资料 设计模型 具体实施 结束论文 整个 大致的流程中 我的导师都给予了我耐心的指导和非常到位的指点 设计时间 之长 其间遇到了不少问题 也承蒙了老师的照顾 真的想对老师说一声 老 师 辛苦了 谢谢您 除此之外 我还要致谢我的几位同学的得力相助 我希 望我能向他们学习 发扬那种百折不挠 孜孜不倦的对知识求索精神 那种至 高无上的敬业精神 马上我就要走向工作单位了 我相信我会时刻用他们的平 凡而不简单来鞭策自已 再次衷心地感谢帮助我的老师和同学 31 参考文献参考文献 1 塞奎春 VB6 工程应用与项目实践 M 北京 机械工业出版社 2005 2 萨师煊 王珊 数据库系统概论 M 北京 高等教育出版社 2004 3 黄明 信息系统设计与开发实例 M 北京 机械工业出版社 2005 4 张海藩 软件工程导论 M 北京 清华大学出版社 1998 5 申莉莉 SQLSERVER 数据库应用教程 M 北京 机械工业出版社 2005 6 李建中 数据库系统原理 M 西安 电子工业出版社 1998 7 刘瑞新 VB6 0 数据库开发毕业设计指导及实例 M 北京 机械工业出版社 2005 8 刘军 汽车 4S 店管理全程指导 北京 化学工业出版社 2011 9 宓亚光 汽车特约销售服务站经营与管理丛书 北京 机械工业出版社 2011 10 王丰 张剑芳 卢宝亮 仓库安全管理与技术 第 2 版 北京 中国物资 出版社 2008 32 附附 录录 4S 店汽车零配件仓储管理系统代码 Private Sub CARPP Click strTableName 汽车品牌 frmZiDian Show 1 End Sub Private Sub CGLK Click strTableName 采购入库信息 frmlk Show 1 End Sub Private Sub ChangeUser Click isLogin False Unload Me frmLogin Show End Sub Private Sub Exit Click End End Sub Private Sub DATAtj Click frmtj Show 1 End Sub Private Sub ExitSyss Click End End Sub Private Sub FindCG Click strTableName 采购入库信息 frmFind Show 1 End Sub Private Sub FindKC Click strTableName 配件信息 frmFind Show 1 End Sub Private Sub FindXX Click 33 strTableName 销售出库信息 frmFind Show 1 End Sub Private Sub FJFX Click strTableName 配件分类 frmZiDian Show 1 End Sub Private Sub Form Load Me Caption 汽车 4S 店零配件仓储管理系统 操作员 UserID Call Privssub isLogin True End Sub Sub Privssub If IsUserMode 2 Then sysManager Visible False BASEDATA Visible False End If End Sub Private Sub Form Resize On Error GoTo Err 改变控件位置代码 Picture1 Top 0 Picture1 Left 0 Picture1 Height Me ScaleHeight StatusBar1 Height Picture1 Width Me ScaleWidth StatusBar1 Panels 1 Text 欢迎使用 Me Caption 加载背景代码 Image1 Picture LoadPicture App Path 1 jpg Picture1 Refresh Picture1 PaintPicture Image1 Picture Picture1 ScaleTop Picture1 ScaleLeft Picture1 ScaleWidth Picture1 ScaleHeight 0 0 Image1 Width Image1 Height Err End Sub Private Sub HelpFiles Click 帮助文件 On Error GoTo Err frmhelp Show 1 Exit Sub 34 Err MsgBox Err Description End Sub Private Sub InfoPJ Click frmPJ Show 1 End Sub Private Sub KCxxinfo Click frmKcInfo Show 1 详细库存 End Sub Private Sub SysAbout Click 关于 frmAbout Show 1 End Sub Private Sub sysManager Click frmUser Show 1 End Sub Private Sub Userpasword Click 用户密码 frmpsd Show 1 End Sub Private Sub XSCK Click frmck Show 1 销售出 End Sub 35 采购入库管理界面代码 Private Sub Command1 Click 查询 Dim rst As New ADODB Recordset Dim i As Integer Dim strSQL As String If Trim Text1 Text Then strSQL select from 采购入库信息 order by 入库单号 desc Else For i 0 To 3 If Option1 i Value True Then strSQL select from 采购入库信息 where Option1 i Caption like Trim Text1 Text order by 入库单号 desc Exit For End If Next i End If If rst State Then rst Close rst Open strSQL CN adOpenStatic adLockOptimistic With MSHFlexGrid1 Clear Rows 2 Cols rst Fields Count For i 0 To rst Fields Count 1 TextMatrix 0 i rst Fields i Name Next i If rst RecordCount 0 Then Rows rst RecordCount 1 Label1 Caption 查询到 rst RecordCount 条记录 Else Label1 Caption 查询到 0 条记录 MsgBox 没有查询记录信息 提示 Exit Sub End If Dim k As Integer k 1 While Not rst EOF For i 0 To rst Fields Count 1 If Not IsNull rst Fields i Then If rst Fields i Type adCurrency Then TextMatrix k i Format rst Fields i 0 00 Else TextMatrix k i Trim rst Fields i End