毕 业 文〔设计〕
摘 :设计首先分析进销存理系统信息时代中重作针济科技等诸素进行分析实现系统技术济理行性做深入分析总体介绍超市进销存理包括根功模块详细阐述功设计思路实现方法
超市进销存理系统包括入库出库退货订货超市统计查询等等六局部分实现搜索意商品商品设定价格库存量报警数量进货方案数否允许折进行印报表包括方案进货表月季年销售报表等功
关键词:Visual BasicAccess数库理系统
目 录
引言 1
1系统概述 2
2需求分析 4
21系统功分析 4
22 系统性分析 4
23 系统功模块设计 5
24技术行性分析 6
25系统流程图 6
3 设计 7
4数库设计 10
41 数库需求分析 10
42 数库概念结构设计 10
43 数库逻辑结构设计 10
44 数库生成配置 14
45 创立应程序结构 14
5详细设计 14
51开发业务逻辑处理组件 14
511 信息理类加集合类设计思想 15
512 商品类型信息理模块 15
商品信息理模块 16
514 供货商信息理模块 18
515 进货信息理模块 19
516 销售信息理模块 21
517 报损信息理模块 21
518 理员信息理模块 22
52 开发根界面组件 23
信息输入界面加操作类设计思想 23
53界面端应程序设计 25
531 公模块设计 25
户登入模块设计 25
系统界面设计 27
534 添加界面模块 28
535 户理模块 31
营分析模块 32
6 测试分析 35
61 强制变量声明 35
62 常见错误防止 35
总结 36
参考文献 37
引言
目前公司企业货物实行信息化理提高理水工作效率时限度减少手工操作带错误进销存理信息系统便应运生工厂中产品进销存涉产品原料采购库存投入生产报损甚时涉销售时产品相应生产库存销售报损等环节非生产性单位超市商店等涉进货库存销售报损4方面
超市进销存理象广言包括:商业企业超市商品图书馆超市图书博物馆超市展品等等里文仅涉工业企业产品超市
超市进销存理系统分类分级模式仓库进行全面理监控缩短超市信息流转时间企业物资理层次清楚井然序采购销售提供智化预警功动提示存货短缺超储等异常状况系统进行材料超市ABC分类汇总减少资金积压完善超市理功企业存货进行全面控制理降低超市钱增强企业市场竞争力
设计系统时首先做需求分析合理运Visual Basic根方法建立适合企业公司进销存理系统
1系统概述
超市进销存理系统分类分级模式仓库进行全面理监控缩短超市信息流转时间企业物资理层次清楚井然序采购销售提供智化预警功动提示存货短缺超储等异常状况系统进行材料超市ABC分类汇总减少资金积压完善超市理功企业存货进行全面控制理降低超市钱增强企业市场竞争力
超市进销存理系统研究容涉超市进销存理全程包括入库出库退货订货超市统计查询等等
根工作流程超市进销存理系统包含容:
(1) 企业类货物进行ABC分类理提供低超市量高超市量安超市量预警功
(2) 存储类信息档案包括物资产品根信息供货单位信息单位信息等
(3) 方便快捷进行物资入库理\物资出库理等等安高效支持种类型出入库业务:生产入库委外加工入库采购入库入库生产领料出库委外领料出库销售出库出库等
(4) 提供退货理功
(5) 通查询超市时解超市余额信息便订货单免缺货影响生产外提供济订货量计算功印订货采购单功
(6) 支持超市盘点功仓库物料进行盘点动汇总盘点数时生成盘赢亏调整单
(7) 时印超市余额方便领导决策安排时定货
开发环境
VB微软公司出品快速视化程序开发工具软件助微软操作系统办公软件垄断位VB短短年风行全球VB极特色功强软件表现:见界面设计基象设计方法极短软件开发周期较易维护生成代码
美国微软公司1991年推出VB10已历6版VB60运行Win9xWinmeWin2000WinxpWindowsNT等操作系统32位应程序开发工具
Access2000 关系数库开发工具数库聚集种信息供查询存储检索Access 优点数表示图定义窗体收集信息数表示图提供种类似 Excel 电子表格数库目然外Access 允许创立定义报表印输出数库中信息Access提供数存储库桌面数库文件数库文件置网络文件效劳器网络户享数库Access 种关系数库工具关系数库已开发通数库述Access 作关系数库开发具备许优点数包中时拥桌面数库便利关系数库强功
2需求分析
21系统功分析
(1)根信息维护
商品类型建立维护包括商品类型新建修改删等商品根信息理:包括商品根信息新建修改删等供货商信息理:包括供货商信息新建修改删等理员信息理:系统理员添加删修改密码等
(2)进货理
商品进货信息理:商品进货信息包括商品进货数量单价供货商等商品进货理功完成进货信息登记修改删等分类查:根商品类型查某种商品进货情况更新库存:进货信息变动直接关系库存变化进货分析:列出前进货量前项商品进货量少前项商品库存分析:列出前库存量前项商品库存量少前项商品
(3)销售理
商品销售信息理:商品销售信息包括商品销售数量单价统计日期等商品销售理功完成销售信息登记修改删等分类查:根商品类型查某种商品销售情况更新库存:销售信息变动直接关系库存变化销售分析:列出前销售量前项商品销售量少前项商品
(4)报损理
商品报损信息理:商品报损信息包括商品报损数量报损原等商品报损理功完成报损信息登记修改删等分类查:根商品类型查某种商品报损情况更新库存:报损信息变动样直接关系库存变化报损分析:列出前报损量前项商品报损量少前项商品
22 系统性分析
(1)层结构设计
严格意义三层结构设计程序逻辑结构分户界面层业务逻辑处理层数存储层系统采三层结构进步扩展成层结构
(2)面象设计
系统中商品类型商品等封装成相应类时类应集合类操作类次提高数库操作安性程序扩展性
(3)指导营功
进销存理系统仅仅代传统书面操作更重提供信息分析功单击钮查目前销售商品库存商品起指导营作
23 系统功模块设计
结构化程序设计思想分析系统局部
系统功模块图:理员登录商品理模块供货商商品进货销售理报损理销售分析等
超市进销存理系统
商品类型理系统
商品理模块
供货商理模块
商品进货理模块
商品销售理模块
销售分析模块
户理模块
操作员登入模块
添加商品类型
修改商品类型
删商品类型
添加商品信息
修改商品信息
删商品信息
登记进货信息
修改良货信息
删进货信息
添加供货商
修改供货商
删供货商
登记销售表
修改销售记录
删销售信息
商品报损理模块
登记报损信息
修改报损记录
删报损记录
图21系统功模块图
24技术行性分析
系统典型数库应程序现数库应程序开发技术已非常成熟利现技术完全实现预定功Visual Basic语言简单功强容易掌握Access非常优秀型数库理软件方便性稳定采 Visual Basic+Acess技术完全够实现系统开发
系统拟方便简单界面设计美观方期维护拟容易功模块方面作修改需进行整系统重新架构
25系统流程图
超市理系统根流程
入库:供货单位发货运输货物达测试检验送货单库员查收入库入库单处理种入库业务:工业企业生产入库委外加工入库入库等入库业务入库类型分模块录入入库单信息
出库:超市统计表单位领料单库员出库出库单
处理种出库业务:工业企业生产领料委外领料出库等出库业务出库类型分模块录入出库单信息
退货:产品合格通知书单位领料单存根库员退货退货单
订货:超市进销存理部门采购部门发出采购单采购部门供单位传递订货单供单位组织发货运输货物达测试检验入库
盘点:备份超市数印盘点表仓库批次进行盘点根盘点表生成盘盈盘亏表调整超市账
盘点功检查仓库现超市量帐面数量否致假设盘点结果仓库现超市量帐面数量盘盈假设盘点结果仓库现超市量帐面数量盘亏盘盈盘亏差异量记录盘点调整单
图22
供货单位理
物资登记
单位理
根信息录入
根信息理
物资调配
入库理
出库理
退货理
订货理
超市盘点
图22 系统流程图
3 设计
超市进销存理系统研究容涉超市进销存理全程包括入库出库退货订货超市统计查询等等
超市进销存理系统包含容:
(1)企业类货物进行ABC分类理提供低超市量高超市量安超市量预警功
(2)存储类信息档案包括物资产品根信息供货单位信息单位信息等
(3)方便快捷进行物资入库理\物资出库理等等安高效支持种类型出入库业务:生产入库委外加工入库采购入库入库生产领料出库委外领料出库销售出库出库等
(4)提供退货理功
(5)通查询超市时解超市余额信息便订货单免缺货影响生产外提供济订货量计算功印订货采购单功
(6)支持超市盘点功仓库物料进行盘点动汇总盘点数时生成盘赢亏调整单
(7) 时印超市余额方便领导决策安排时定货
列图31
窗体
系统登入
退出登入
成功
失败
商品类型理
商品理
商品进货理
商品销售理
商品报损理
供货商理
添加商品类型
修改商品类型
删商品类型
添加商品
删商品
登记进货商品
删进货商品
登记销售商品
修改良货商品
登记报损商品
修改报损商品
修改销售商品
添加供货商
删供货商
删报损商品
删销售商品
修改供货商
修改商品
图31 系统功模块图
4数库设计
41 数库需求分析
(1)针超市进销存理系统分采购部门销售部门库存保部门进行详细调研分析总结出需求信息:商品类理需商品类型信息商品必须属商品类型果商品类型存商品存级商品类型该类型删需记录供商品信息涉商品数量方出相应单位商品销售信息单中包含登记商品销售数量单价等信息进货信息中包含商品供商等信息商品报损报损原进货销售报损操作相应操作员信息理员登录系统默认理员删进货销售库存报损信息添加修改删分类查找进行进货销售报损操作相应更新库存需进货销售库存报损进行分析总结热门商品
(2)述系统功分析需求总结考虑功扩展设计数项数结构:商品类型信息包括数项:商品类型编号商品类型名称等商品信息包括数项:商品编号商品名称商品介绍库存量等商品单位信息包括单位编号单位名称等供商信息包括供商名称介绍等进货信息包括进货商品数量单位单价进货时间手等
销售信息包括销售商品数量单位单价登记时间等报损信息包括报损商品数量单位原登记时间等理员信息包括理员账号密码否默认账号等
42 数库概念结构设计
系统根设计规划出实体:商品类型信息实体商品信息实体商品单位信息实体供商信息实体进货信息实体销售信息实体报损信息实体理员信息实体
43 数库逻辑结构设计
首先罪犯理信息系统数库概念结构转化Access数库SQL Server 2000数库系统支持实际数模型:数库逻辑结构表格设计
表41商品类型信息表(MerchandiseType)
列名
数类型
字段
必填字段
默认值
说明
MT_ID_N
动编号
长整型
商品类型号递增键
MT_Name_S
文
15
商品类型名
MT_RemarkR
备注
备注
表42:商品信息表(Merchandise)
列名
数类型
字段
必填字段
默认值
说明
M_Id_N
动编号
长整型
商品编号递增键
M_Name_S
文
80
商品名称
M_Introduce_S
文
255
商品介绍
M_TypeId_N
数字
长整型
1
商品类型ID
M_Storage_N
数字
长整型
0
库存量
M_UnitId_N
数字
长整型
1
单位编号
M_Remark_R
备注
备注
表43:商品单位信息表(Unit)
列名
数类型
字段
必填字段
默认值
说明
U_ID_N
动编号
长整型
单位编号递增健
U_NAME_S
文
10
单位名称
表44:供商信息表(Provider)
列名
数类型
字段
必填字段
默认值
说明
P_Id_N
动编号
长整型
供货商编号健
P_Name_S
文
50
供货商名称
P_Introduce_S
文
255
供货商简介
P_Remark_R
备注
备注
表45:进货信息表(Buy)
列名
数类型
字段
必填字段
默认值
说明
B_ID_N
动编号
长整型
进货ID递增健
B_ProviderId_N
文
长整型
供商ID
B_MerchandiseId_N
数学
长整型
商品ID
B_StockDate_D
日期
短日期
Dare()
进货时间
B_Deliver_S
文
20
送货姓名
B_Consignee_S
文
20
手姓名
B_Count_N
数字
长整型
0
购入量
B_StockPrice_N
数字
单精度型
0
进货单价
B_OperatorId_S
文
20
操作员ID
B_Remark_R
备注
备注
表46:销售信息表(Sell)
列名
数类型
字段
必填字段
默认值
说明
S_ID_N
动编号
长整型
销售编号递增键
S_MerchandiseID_D
数字
长整型
商品ID
S_RegDate_D
日期
短日期
Date〔〕
登记日期
S_Count_N
数字
长整型
0
售出数量
S_SellPrice_N
数字
单精度型
0
卖出单价
S_OperatorId_S
文
20
操作员ID
S_Remark_R
备注
备注
表47:报损信息表(Dispose)
列名
数类型
字段
必填字段
默认值
说明
D_ID_N
动编号
长整型
报损编号递增键
D_MerchandiseID_N
数字
长整型
商品ID
D_RegDate_D
日期
短日期
Date〔〕
登记日期
D_Count_N
数字
长整型
0
报损数量
D_Reason_S
文
255
报损原
D_Operatorld_S
文
20
操作员ID
D_Remark_R
备注
备注
表48:理员信息实体(Admins)
列名
数类型
字段
必填字段
默认值
说明
A_Account_S
文
20
账号键
A_Pwd_S
文
20
密码
A_IsDefault_B
否
False
否默认户
44 数库生成配置
需求分析概念结构设计数库逻辑结构现Access数库中创立表
45 创立应程序结构
(1)创立户界面端程序
VB中选择文件新建工程翻开选择VB应程序导设置导生成模块命名mdlMain保存文件夹Merchandise中
(2)创立业务逻辑处理组件
新建ActiveX DLL工程设置工程属性参加ADO引
(3)创立根界面组件
新建ActiveX DLL工程设置工程属性参加业务逻辑组件引
(4)界面端程序中组件
工程资源理器中选中工程Merchandise选择菜单工程引命令翻开引话框引列表中选择BuySellStorageUIBuySellStorageDB
5详细设计
51开发业务逻辑处理组件
进销存业务处理组件处理进销存理系统中业务逻辑负责界面进行数传递时界面端请求应业务逻辑数库进行操作包含功:商品类型信息理应clsMType类clsMTypes类商品信息理应clsMerchandise类clsMerchandises类供商信息理应ClsProvider类ClsProviders类进货信息理应clsBuy类clsBuys类 销售信息理应clsSell类clsSells类报损信息理应clsDispose类clsDisposes类理员信息理应clsAdmini类clsAdminis类
511 信息理类加集合类设计思想
组件中模块设计模块信息理类加应集合类求实现具体完成功:信息理类:实现单信息相关操作包括添加修改删信息理集合类:实现信息先观操作根条件查找
模块设计独立非逻辑分割关系进货信息操作商品库存直接挂钩进货信息表操作商品表操作放入事务中样确保数安性致性
512 商品类型信息理模块
商品类型信息理模块功需clsMTypeclsMTypes两类实现功:添加商品类型信息修改商品类型信息删商品类型信息查找商品类型信息商品类型相关常操作
(1)商品类型信息理类clsMType创立clsMType类添加属性
商品类型信息类clsMType处理单商品类型信息实现商品类型操作根功添加修改删等
选择菜单[工程]—[添加类模块]命令翻开添加类模块〞话框选择VB类生成器〞类生成器工程中添加clsMType类基拉列表框中选择clsDBbase表示
表51
属性名称
数类型
属性声明
ID
Long
GetLet
SuperID
Long
GetLet
TypeName
String
GetLet
属性添加完毕应clsMType类中已动添加类成员变量属性
〔2〕AddNew方法功:添加耽误商品类型参数设计:返回值:gxcAddNew类型请参考clsPublic类中gxcAddNew枚举类型定义
〔3〕Update方法功:修改商品类型返回值:gxcUpdate类型请参考clsPublic类中gxcUpdate枚举类型定义
〔4〕Delete方法功:删商品类型参数设计:选参数lngID表示商品类型ID默认1返回值:gxcDelete类型请参考clsPublic类中gxcDelete枚举类型定义
商品类型信息理集合类clsMTypes
商品类型信息集合类clsMTypes处理商品类型信息单元clsMType完成组商品类型信息相关操作方查找功
选择菜单[工程]—[添加类模块]命令翻开添加类模块〞话框选择VB类生成器〞类生成器工程中添加集合类命名clsMTypes类基〞拉列表框中选择clsDBbases集合组成〞栏中选择clsMType类应设置系统会动生成标准集合类具根属性方法外参加clsDBbases中方法定义添加AddEx方法添加Find方法
功:根定参数查找商品类型结果clsMTypes类型返回参数设计:选类型ID默认值1返回值:clsMTypes类型clsMType集合省略参数时返回全部商品类型
513商品信息理模块
商品信息理模块功需clsMerchclsMerchs两类实现功:添加商品信息修改商品信息删商品信息查找商品信息商品信息相关常操作
(1)商品信息理类clsMerch
创立clsMerch类添加属性
属性名称
数类型
说明
ID
Long
商品编号
MerchName
String
商品名称
Introduce
Integer
商品介绍
TypeId
gxcSex
商品类型ID
Storage
Long
库存量
UnitID
String
单位编号
Remark
String
备注
TypeName
String
商品类型名称
AddNew方法功:添加单商品信息参数设计:返回值:gxcAddNew类型参考clsPublic类中gxcAddNew枚举类型定义
Update方法功:修改商品信息参数设计:返回值:gxcUpdate类型请参考clsPublic类中gxcUpdate枚举类型定义
Delete方法功:删商品信息参数设计:选参数lngID表示商品ID默认1返回值:gxcUpdate类型请参考clsPublic类中gxcUpdate枚举类型定义商品信息理集合类clsMerchs
商品信息集合类clsMerchs具体处理商品信息单元clsMerch完成组商品信息相关操作方查找等
选择菜单[工程]—[添加类模块]命令翻开添加类模块〞话框选择VB类生成器〞类生成器工程中添加集合类命名clsMerchs类基〞拉列表框中选择clsDBbases集合组成〞栏中选择clsMerch类应设置系统会动生成标准集合类具根属性方法面clsMerchs添加必方法
添加AddEx方法添加Find方法功:根定参数查找商品信息结果clsMerchs类型返回参数设计:表52返回值:clsMerchs类型clsMerch集合显然面两参数指定时返回全部商品
表52 Find参数设计
参数名
参数类型
功
否选默认值
说明
lngID
Long
传入商品ID
选默认值0
果取默认值表示限制商品ID
lngTypeId
Long
传入商品类型ID
选默认值0
果取默认值表示限制商品类型
添加FindStorage方法功:库存量排序查找商品结果clsMerchs类型返回参数设计:参见表返回值:clsMerchs类型clsMerch集合
表53 FindStorage方法参数设计
参数名
参数类型
功
否选默认值
说明
IsDesc
Boolean
表示否采降序
选默认值true
nCount
Integer
显示少条记录
选默认值10
514 供货商信息理模块
供货商信息理模块功需clsProviderclsProviders两类实现功:添加供货商信息修改供货商信息删供货商信息查找供货商信息供货商信息相关常操作
供货商信息理类clsProvider创立clsProvider类添加属性
供货商信息类clsProvider具体处理单条供货商信息完成供货商信息根操作功添加修改删等
表54 clsProvider类属性设置
属性名称
数类型
说明
ID
Long
供货商编号
ProviderName
String
供货商名称
Introduce
String
供货商简介
Remark
String
备注
AddNew方法功:添加单供货商信息参数设计:返回值:gxcAddNew类型参考clsPublic类中gxcAddNew枚举定义
pdate方法功:修改供货商信息参数设计:返回值:gxcUpdate类型参考clsPublic类中gxUpdate枚举类型定义
Delete方法功:删供货商信息参数设计:选参数lngID表示供货商信息ID默认1返回值:gxcDelete类型参考clsPublic类中gxcDelete枚举类型定义
删供货商时必须先删供货商相关进货信息两操作放事务里面供货商信息理集合类ClsProviders
供货商信息集合类clsProviders处理条供货商信息单元clsProvider完成组供货商信息相关操作方查找等
选择菜单[工程]—[添加类模块]命令翻开添加类模块〞话框选择VB类生成器〞类生成器工程中添加集合类命名clsProviders类集合组成〞栏中选择clsProvider类应设置系统会动生成标准集合类具根属性方法面clsProviders添加必方法添加AddEx方法添加Find方法功:根定参数查找供货商信息结果clsProviders类型返回参数设计:选类型ID默认值1
返回值:clsProviders类型clsProvider集合省略参数返回全部供货商
515 进货信息理模块
进货信息理模块功需clsBuyclsBuys两类实现功:添加进货信息修改良货信息删进货信息查找进货信息商品统计分析进货信息进货信息相关常操作进货信息理类clsBuy
表55 创立clsBuy类添加属性
属性名称
数类型
说明
ID
Long
进货ID
ProviderId
String
供商ID
ProviderName
String
供商名称
MerchandiseID
Long
商品ID
MerchName
String
商品名称
StockDate
Date
进货时间
Deliver
String
送货姓名
Consignee
String
手姓名
Count
Long
购入量
StockPrice
Single
进货单价
OperatorId
String
操作员ID
Remark
String
备注
TypeName
String
商品类型名称
StockTimes
Long
进货次数
TotalPrice
Single
总进货支出
AddNew方法功:添加单条进货信息参数设计:
返回值:gxcAddNew类型请参考clsPublic类中gxcAddNew枚举定义
Update方法功:修改良货信息参数设计:返回值:gxcUpdate类型请参考clsPublic类中gxcUpdate枚举类型定义Delete方法功:删进货信息参数设计:选参数lngID表示供货商信息ID默认值1
返回值:gxcDelete类型请参考clsPublic类中gxcDelete枚举类型定义
进货信息理集合类clsBuys添加AddEx方法添加Find方法功:根定参数查找进货信息结果clsBuys类型返回参数设计:两选参数进货编号商品类型编号 返回值:clsBuys类型clsBuy集合省略参数时返回全部进货
添加FindStorage方法功:统计种商品进货次数累计进货总支出进货总支出排序结果clsBuys类型返回返回前nCount条记录
表56 参数设计
参数名
参数类型
功
否选默认值
说明
IsDesc
Boolean
表示否采降序
选默认值True
nCount
Integer
显示少条记录
选默认值10
l 返回值:clsBuys类型clsBuy集合
516 销售信息理模块
销售信息理模块功需clsSellclsSells两类实现功:添加销售信息修改销售信息删销售信息查找销售信息商品统计分析销售信息销售信息相关常操作
销售信息类clsSell具体处理单条销售信息完成销售信息根操作功添加修改删等
选择菜单[工程]—[添加类模块]命令翻开添加类模块〞框选择VB类生成器〞类生成器工程中添加clsSell类
表517 销售信息类clsSell
属性名称
数类型
说明
ID
Long
销售编号
MerchandiseID
Long
商品ID
MerchName
String
商品名称
RegDate
Date
登记日期
Count
Long
售出数量
SellPrice
Single
售出单价
OperatorId
String
操作员ID
Remark
String
备注
TypeName
String
商品类型名称
RegTime
Long
登记次数
TotalPrice
Single
售出总价
clsASell类中AddNewUpdateDelete方法进货信息中处理类似数库中字段已
517 报损信息理模块
报损信息理模块功需clsDisposeclsDisposes两类实现功:添加报损信息修改报损信息删报损信息查找报损信息商品统计分析报损信息报损信息相关常操作
报损信息类clsDispose具体处理单条报损信息完成报损信息根操作功添加修改删等
选择菜单[工程]— [添加类模块]命令翻开添加类模块〞话框选择VB类生成器〞类生成器工程中添加clsDispose类
表57 报损信息类clsDispose
属性名称
数类型
说明
ID
Long
报损编号
MerchandiseID
Long
商品ID
MerchName
String
商品名称
RegDate
Date
登记日期
Count
Long
报损数量
Reason
Single
报损原
OperatorId
String
操作员ID
Remark
String
备注
RegTimes
Long
登记次数
TotalCount
Long
报损总数量
TypeName
String
商品类型名
clsDispose类中AddNewUpdateDelete方法进货信息中处理类似数库中字段已
518 理员信息理模块
理员信息理模块功需clsAdminclsAdmins两类实现功:添加理员信息修改理员信息删理员信息查找理员信息验证理员密码理员信息相关常操作
理员信息类clsAdmin具体处理单条理员信息完成理员信息根操作功添加修改删验证密码等
选择菜单[工程]—[添加类模块]命令翻开添加类模块〞话框选择VB类生成器〞类生成器工程中添加clsAdmin类列图示
表58理员信息类clsAdmin表
属性名称
数类型
说明
Account
String
理员账号
Pwd
String
密码
IsDefault
Boolean
否默认户
clsAdmin中AddNewUpdateDelete方法类中处理类似数库中字段已
52 开发根界面组件
进销存理系统根界面组件处理进销存理系统中界面相关操作负责户界面层进行数传递时界面端请求传递业务处理层进步转化数库操作包括功:
商品类型操作理应frmMType窗体clsOpMType类商品操作理应frmMerch窗体clsOpMerch类供货商操作理应frmProvider窗体clsOpProvider类进货操作理应frmBuy窗体clsOpBuy类销售操作理应frmSell窗体clsOpSell类报损操作理应clsDispose窗体clsOpDispose类理员操作理应frmUser窗体clsOpAdmin类
521信息输入界面加操作类设计思想
(1〕模块组成
组件中模块信息输入界面相应操作类实现具体完成功:
信息输入界面:供添加修改时调获取户输入户输入封装应信息理类中操作类:供界面端程序调实现两功:调出信息输入界面接收户输入输入存入数库出数库操作结果二通传引方式户界面端传入控件添加数户截面端显示
(2〕输入界面代码结构
方便维护快速开发界面实现代码结构相似包括方法:ShowDlg:显示话框部调MeShow vbModal程序停止里SetStatus:设计话框控件默认状态SetDefaultValue:设计话框默认值OKButton_Click:[确定]钮单击处理事件CheckValid:检查户输入效性SaveValue:保存户输入CancelButton_Click:[取消]钮单击处理事件户单击[确定][取消]钮程序继续执行ShowDlg函数面语句保存放弃户输入
(3)操作类代码结构
样方便维护快速开发操作类代码结构相似包括方法Add理增加操作Modify:理修改操作Delete:理删操作AddToLvw:单象参加列表列表中更新InitListview:设置ListView显示样式ObjsToListView:象集合显示ListView中FillListView:显示指定类型象列表控件GetObjFromControl:列表树形图中象ObjsToCornbo:传入参数象单类组合框FillCombo:全部象参加组合框中
(4)创立组件公模块
扩展方便里参加公模块命名mdlMain 现添加空Sub Main作组件初始化函数
(5)商品类型操作理模块
商品类型理模块实现功处理添加商品类型操作处理修改商品类型操作处理删商品类型操作处理列举查找商品类型操作
(6)商品操作理模块
商品操作理模块实现功:处理添加商品操作处理修改商品操作处理删商品操作处理分析商品库存量操作处理列举查找商品操作
(7)供货商操作理模块
供货商操作理模块实现功:处理添加供货商操作处理修改供货商操作处理删供货商操作处理列举查找供货商操作
(8)进货操作理模块
进货操作理模块实现功:处理添加进货操作处理修改良货操作处理删进货操作处理分析进货总支出操作处理列举查找进货操作
(9)销售操作理模块
销售操作理模块实现功:处理添加销售操作处理修改销售操作处理删销售操作处理分析销售总收入操作处理列举查找销售操作
(10)报损操作理模块
报损操作理模块实现功:处理添加报损操作处理修改报损操作处理删报损操作处理分析报损总数量操作处理列举查找报损操作
(11)理员信息操作理模块
理员信息操作理模块实现功:处理添加理员信息操作处理修改理员信息操作处理删理员信息操作处理列举查找理员信息操作
53界面端应程序设计
531 公模块设计
创立户界面端应程序时导已生成名mdlMain模块模块稍微修改添加成员变量修改Main程
532户登入模块设计
户登入话框设计:户输入正确户名密码登陆系统
密码错误弹出提示进入系统
图51 户登入界面设计图
修改[确定]钮处理代码
Private Sub cmdOK_Click()
'ToDo 创立测试密码否正确
'检查正确密码
Dim Account As String
Dim Pwd As String
Account RealString(txtUserNameText)
Pwd RealString(txtPasswordText)
'判断密码否正确
If Not m_AdminCheckPwd(Account Pwd) Then
m_nErrCount m_nErrCount + 1
If m_nErrCount > 3 Then
MsgBox 输入密码错误次数太请稍重试 vbExclamation
End
End If
MsgBox 密码错误试次 & 3 m_nErrCount & 次时机注意密码区分写 vbCritical 登录
txtPasswordSetFocus
txtPasswordSelStart 0
txtPasswordSelLength Len(txtPasswordText)
Else
OK True
g_Account Account
MeHide
End If
End Sub
533系统界面设计
表59设计窗体控件布局
控件名称
属性
属性取消
功
frmMain
Caption
进销存理系统
系统窗体
inlViewSIcon〔ListView〕
ImageHeight
16
树形控件列表框图标图片
ImageWidth
16
inlViewBIcon〔ImageList〕
ImageHeigh
32
列表框图标图片〔未:扩展〕
ImageWidth
32
tvTreeView〔TreeView〕
LineStyle
TvwRootLines
显示商品类型树
ImageList
inlViewSIcon
sstabView〔ListView〕
Style
OssStyleTabbedDialog
右侧选项卡做容器
TabOrientation
OssTabOricntationTop
lvMerch〔ListView〕
lvBuy〔ListView〕
lvSell〔ListView〕
lvDispose〔ListView〕
lvProvider〔ListView〕
FullRowSelect
True
分显示商品商品信息列表
进货信息列表
销售信息列表
报损信息列表
供货商信息列表
GridLines
True
View
lvwRiport
Icon
imlViewBIcon
SmallIcon
imlViewSIion
l 设计选项卡sstabView
sstabView控件添加5选项卡选项卡标题分设置商品库存〞进货记录〞销售记录〞报损记录〞供商〞分应5ListView添加菜单
534 添加界面模块
界面设计:包括系统视图商品类型理进货理销售理报损理供货商理销售分析帮助等等图52
图52 界面效果图
代码
Private Sub Form_Load()
LoadResStrings Me
MeLeft GetSetting(AppTitle Settings MainLeft 1000)
MeTop GetSetting(AppTitle Settings MainTop 1000)
MeWidth GetSetting(AppTitle Settings MainWidth 6500)
MeHeight GetSetting(AppTitle Settings MainHeight 6500)
lvMerchView Val(GetSetting(AppTitle Settings ViewMode 0))
'初始化数
Call InitMain
End Sub
Private Sub Form_Unload(Cancel As Integer)
Dim i As Integer
'close all sub forms
For i FormsCount 1 To 1 Step 1
Unload Forms(i)
Next
If MeWindowState <> vbMinimized Then
SaveSetting AppTitle Settings MainLeft MeLeft
SaveSetting AppTitle Settings MainTop MeTop
SaveSetting AppTitle Settings MainWidth MeWidth
SaveSetting AppTitle Settings MainHeight MeHeight
End If
SaveSetting AppTitle Settings ViewMode lvMerchView
End Sub
Private Sub Form_Resize()
On Error Resume Next
If MeWidth < 3000 Then MeWidth 3000
SizeControls imgSplitterLeft
End Sub
535 户理模块
图53户理话框界面设计图
户理话框代码设计
Option Explicit
Dim opAdmin As New clsOpAdmin
Private Sub CancelButton_Click()
Unload Me
End Sub
Private Sub cmdAdd_Click()
opAdminAdd lvAdmin
End Sub
Private Sub cmdDel_Click()
opAdminDelete lvAdmin
End Sub
Private Sub cmdModify_Click()
opAdminModify lvAdmin
End Sub
Private Sub Form_Load()
opAdminFillListView lvAdmin
End Sub
营分析模块
营分析模块超市运作情况进行分析具功:库存量排行进货总量登记次数排行销售总量登记次数排行报损总量登记次数排行
表510营分析话框界面设计
控件名称
属性
属性取消
功
FrmAnalysis〔Form〕
Caption
营分析
营分析话框
List
库存分析
进货分析
销售分析
报损分析
CboOrder〔ComboBox〕
Style
2DropDownList
前↓:降序排列取前假设干项↑:降序排列取假设干项然显示
List
前↓
↑
TxtCount〔TextBox〕
MaxLength
3
显示数量
CmdSearch〔CommandButtom〕
Caption
查
[查]钮
CmdClose〔CommandButtom〕
Caption
关闭
[关闭]钮
LvAna〔ListView〕
GridLines
True
显示数容器
View
lvwRiport
界面设计 销售分析模块清楚出类产品销售情况图54
图54 界面设计图
代码分析
Option Explicit
Private Sub cmdClose_Click()
MeHide
End Sub
Private Sub cmdSearch_Click()
Dim nCount As Integer
Dim IsDesc As Boolean
Dim opMerch As New clsOpMerch
Dim opBuy As New clsOpBuy
Dim opSell As New clsOpSell
Dim opDispose As New clsOpDispose
nCount Val(txtCountText)
If nCount 0 Then nCount 10
IsDesc IIf(cboOrderListIndex 0 True False)
Select Case cboAnaTypeListIndex
Case 0 '库存分析
opMerchFindStorage lvAna IsDesc nCount
Case 1 '进货分析
opBuyFindStorage lvAna IsDesc nCount
Case 2 '销售分析
opSellFindStorage lvAna IsDesc nCount
Case 3 '报损分析
opDisposeFindStorage lvAna IsDesc nCount
Case Else
End Select
End Sub
Private Sub Form_Load()
cboAnaTypeListIndex 0
cboOrderListIndex 0
txtCountText 10
End Sub
6 测试分析
61 强制变量声明
选择菜单[工具]—[选项]命令翻开选项话框〞编辑器〞属性页中求变量声明〞复选框选者手工文件开头加关键字:
option Explicit
样编译时会没声明变量报错减少必调试
62 常见错误防止
1数类型匹配
数类型判断错误方功模块接受传入数id求值必须正数果写程序时传入数者非数字字符串程序会出现错误查询数表时WHERE子句数类型匹配数库中字段类型数字值字符串查询会出现错误
2数数库限制相突
数数库限制相突值超数库限限方数库中户名称字符数量限20字符程序中没进行判果添加新商品时名字21字符SQL语句插入数记录时候会出错
3变量声明错误
常识性错误方If…Else…End If程中认判断会执行中段代码两段中Dim obj as clsMerch事实编译器语法分析阶段首先函数声明全部变量放符号表中变量声明函数什位置
Select Case中Case条件字符串没加引号变成Case空变量
4资源建立释放
类实例化时必须New关键字未实例化类法例:
误:
Dim obj as clsMerch
ClsMerchAddNew
正:
Dim obj as clsMerch
Set objNew clsMerch
ClsMerchAddNew
理调Set objNothing资源已释放法调类方法
5系统编译发行
3工程工程属性前面创立工程时均已设置完毕系统中生成名
BuySellstorageDBdllBuySellstorageUIdll组件移植机器时需先注册组件外系统中默认数库路径BuySellstorageDBdll目录DB文件夹移植机器时路径关系然改变
总结
系统针超市进行供销理设计系统中超市进销存理系统研究容涉超市进销存理全程包括入库出库退货订货超市统计查询等等然系统许方面够完善存缺乏需改良设计界面简洁美观方根功拟完善
通系统开发软件开发程更清晰解首先问题定义需求分析然功设计详细设计等软件测试方法手段较深理解时超市进销存理系统流程系统认识开发程认真学系统相关知识极拓宽知识面感收获
系统开发初期必须熟悉超市进销存理系统整流程初步解超市进销存理系统相关知识样进入设计程中开始熟悉知识整体设计解概设计详细设计开始编码测试整程感觉充实然遇少困难通查资料指导老师请教学请教设计出解决方案成功实现时种成感满足感足鼓励加班加点辛苦
前vb设计理软件验次设计程中遇专业知识方面困难非常困难集中理知识业务流程等方面缺乏实际开发中深刻体会做课程设计实际客户求间距离空想象开发软件需客户断沟通交流客户真正需求反映软件中
详细设计构架终完成毕业文选题系统开发次开发程中遇困难指导老师李迎辉细心帮助包括数库设计方面技术实现方面系统测试方面时受启发希通学够系统安性方面进行进步完善
参考文献
[1] 陆惠恩陆陪恩软件工程[M]电子工业出版社2002年1月
[2] 王春森程序员教程[M]清华学出版社2001年5月
[3] 蒋加伏张林峰Visual Basic程序设计教程[M]北京邮电学出版社 2003年
[4] 赵玮Visual Basic中文版快捷编程实战训练[M]民邮电出版社2003年9月
[5] 孟峰WEB数理研究综述[M]清华学出版社2001年
[6] 黄吻现代远程教育结教育开展启示[N]浙江学学报1995年5月
[7] 吴竞华陈根基三层模式档案理系统设计实现[M]北京机械工业出版社2000年
[8] 金汉均数库实现方法[N]华中师范学学报1999专辑
[9] 杨汉王蕾等数库中间件技术三层操作系统模型中实现[N]华中师范学学报2001年 4月
[10]廖信彦Visual Basic应全[M]清华学出版社2002年
[11]康博Visual Basic应程序开发新技术[M]民邮电出版社2003年
[12]陈子侠基BS结构线商店技术开发[N]浙江学学报2002
[13]清源计算机工作室Visual Basic设计制作[M]机械工业出版社2004年
[14]周佩德数库原理应[M]电子工业出版社2005年
[15]刘炳文等VISUAL BASIC程序设计数库篇[M]民邮电出版社1999年3月
[16]李光明Visual Basic 60编程实例制作[M]冶金工业出版社2002年8月
[17]刘炳文精通VISUAL BASIC 60入门提高[M]民邮电出版社2001年
[18]黄淼云VB60办公动化编程[M]国防工业出版社2003年
[19]王武信息理系统[M]电子工业出版社2003年
[20]李红等编著理信息系统开发应[M]电子工业出版社2003年
文档香网(httpswwwxiangdangnet)户传
《香当网》用户分享的内容,不代表《香当网》观点或立场,请自行判断内容的真实性和可靠性!
该内容是文档的文本内容,更好的格式请下载文档