基于VB的系统设计-超市条码商品销售管理系统_毕业设计论文.doc

实 训 报 告 课程名称：基于VB的系统设计超市条码商品销售管理系统 摘 要 论文从小型超市的实际业务和管理流程出发，针对超市现在运营的系统的缺点和不足，利用目前成熟的客户服务器体系结构，开发出了一个具有实用价值的小型超市管理系统。论文详细论述了系统开发的过程、结构及软件开发的基本思想和方法。对超市的信息需求，信息系统的目标，系统的功能结构，系统的范围与边界，系统的逻辑、物理结构及其具体实现，系统数据库结构及表单内容，系统的操作界面，系统的安全性，系统实施的要点、系统的支撑环境，系统的操作流程等方面进行了详细的分析和论述。 关键词：采购　库存　信息系统 目录 TOC \o 1-3 \h \u 。而对于Access数据库，连接语句为 conn.Open Provider=Microsoft.Jet.OLEDB.4.0;Data Source= App.Path + \student.mdb 3）、设定SQL语句，使用“Execute”命令，即可开始执行访问数据库的动作 4）、关闭结果集对象，断开与数据库的连接 reco.Close conn.Close 3、 模块设计 3.1总系统模块 3.2后台库存管理模块 3.2.1模块用例图： 3.2.2模块用例活动图：  3.2.3模块用例时序图： 3.2.3.1库存管理——查询时序图：  3.2.3.2库存管理——添加时序图：  3.2.3.3库存管理——修改时序图：  3.2.3.4库存管理——删除时序图： 4 系统详细设计与实现 4.1 系统输入口令 进入系统前要进行口令输入来排除非内部人员的进入。界面如图3.1.1所示 图3.1.1 输入框图 4.2 商品入库模块 通过对商品条码，商品名，单价，数量等信息的输入将商品信息存入库存。界面如图3.2.1 图 4.2.1商品入库界面 实现过程：代码 Private Sub Command1_Click() If Text1.Text = Or Text2.Text = Or Text3.Text = Or Text4.Text = Or Text5 = Or Combo1.Text = Then MsgBox vbOKOnly + vbExclamation, 提示 Else Adodc1.Recordset.AddNew Adodc1.Recordset(商品条形码) = Text1.Text Adodc1.Recordset(商品名) = Text2.Text Adodc1.Recordset(产地) = Text5.Text Adodc1.Recordset(单价) = Text3.Text Adodc1.Recordset(库存) = Text4.Text Adodc1.Recordset(类别) = Combo1.Text Adodc1.Recordset.Update Text1 = : Text2 = : Text3 = : Text4 = : Text5 = : Combo1.Text = Text1.SetFocus End If End Sub Private Sub Command2_Click() Me.Hide Form1.Show 1 End Sub Private Sub Form_Unload(Cancel As Integer) Me.Hide Form1.Show 1 End Sub Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = 9 Then Text2.SetFocus End Sub Private Sub Text2_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = 9 Then Text3.SetFocus End Sub Private Sub Text1_Change() Adodc1.Recordset.MoveFirst Adodc1.Recordset.Find 商品条形码 = Text1 If Adodc1.Recordset.EOF = False Then MsgBox 已经有相关商品，不用录入！！, 48, 注意: Text1 = : Text1.SetFocus End Sub Private Sub Te