ImageVerifierCode 换一换
格式:DOCX , 页数:38 ,大小:432.83KB ,
资源ID:8921825      下载积分:10 金币
快捷注册下载
登录下载
邮箱/手机:
温馨提示:
快捷下载时,用户名和密码都是您填写的邮箱或者手机号,方便查询和重复下载(系统自动生成)。 如填写123,账号就是123,密码也是123。
特别说明:
请自助下载,系统不会自动发送文件的哦; 如果您已付费,想二次下载,请登录后访问:我的下载记录
支付方式: 支付宝    微信支付   
验证码:   换一换

开通VIP
 

温馨提示:由于个人手机设置不同,如果发现不能下载,请复制以下地址【https://www.zixin.com.cn/docdown/8921825.html】到电脑端继续下载(重复下载【60天内】不扣币)。

已注册用户请登录:
账号:
密码:
验证码:   换一换
  忘记密码?
三方登录: 微信登录   QQ登录  

开通VIP折扣优惠下载文档

            查看会员权益                  [ 下载后找不到文档?]

填表反馈(24小时):  下载求助     关注领币    退款申请

开具发票请登录PC端进行申请

   平台协调中心        【在线客服】        免费申请共赢上传

权利声明

1、咨信平台为文档C2C交易模式,即用户上传的文档直接被用户下载,收益归上传人(含作者)所有;本站仅是提供信息存储空间和展示预览,仅对用户上传内容的表现方式做保护处理,对上载内容不做任何修改或编辑。所展示的作品文档包括内容和图片全部来源于网络用户和作者上传投稿,我们不确定上传用户享有完全著作权,根据《信息网络传播权保护条例》,如果侵犯了您的版权、权益或隐私,请联系我们,核实后会尽快下架及时删除,并可随时和客服了解处理情况,尊重保护知识产权我们共同努力。
2、文档的总页数、文档格式和文档大小以系统显示为准(内容中显示的页数不一定正确),网站客服只以系统显示的页数、文件格式、文档大小作为仲裁依据,个别因单元格分列造成显示页码不一将协商解决,平台无法对文档的真实性、完整性、权威性、准确性、专业性及其观点立场做任何保证或承诺,下载前须认真查看,确认无误后再购买,务必慎重购买;若有违法违纪将进行移交司法处理,若涉侵权平台将进行基本处罚并下架。
3、本站所有内容均由用户上传,付费前请自行鉴别,如您付费,意味着您已接受本站规则且自行承担风险,本站不进行额外附加服务,虚拟产品一经售出概不退款(未进行购买下载可退充值款),文档一经付费(服务费)、不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
4、如你看到网页展示的文档有www.zixin.com.cn水印,是因预览和防盗链等技术需要对页面进行转换压缩成图而已,我们并不对上传的文档进行任何编辑或修改,文档下载后都不会有水印标识(原文档上传前个别存留的除外),下载后原文更清晰;试题试卷类文档,如果标题没有明确说明有答案则都视为没有答案,请知晓;PPT和DOC文档可被视为“模板”,允许上传人保留章节、目录结构的情况下删减部份的内容;PDF文档不管是原文档转换或图片扫描而得,本站不作要求视为允许,下载前可先查看【教您几个在下载文档中可以更好的避免被坑】。
5、本文档所展示的图片、画像、字体、音乐的版权可能需版权方额外授权,请谨慎使用;网站提供的党政主题相关内容(国旗、国徽、党徽--等)目的在于配合国家政策宣传,仅限个人学习分享使用,禁止用于任何广告和商用目的。
6、文档遇到问题,请及时联系平台进行协调解决,联系【微信客服】、【QQ客服】,若有其他问题请点击或扫码反馈【服务填表】;文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“【版权申诉】”,意见反馈和侵权处理邮箱:1219186828@qq.com;也可以拔打客服电话:0574-28810668;投诉电话:18658249818。

注意事项

本文(超市进销存的设计与实现.docx)为本站上传会员【xrp****65】主动上传,咨信网仅是提供信息存储空间和展示预览,仅对用户上传内容的表现方式做保护处理,对上载内容不做任何修改或编辑。 若此文所含内容侵犯了您的版权或隐私,请立即通知咨信网(发送邮件至1219186828@qq.com、拔打电话4009-655-100或【 微信客服】、【 QQ客服】),核实后会尽快下架及时删除,并可随时和客服了解处理情况,尊重保护知识产权我们共同努力。
温馨提示:如果因为网速或其他原因下载失败请重新下载,重复下载【60天内】不扣币。 服务填表

超市进销存的设计与实现.docx

1、 郑州大学现代远程教育 毕 业 设 计 题 目:超市进销存的设计与实现 入 学 年 月_ _2010年秋___ 姓 名__ _杨秀平____ 学 号__ _1004328401__ 专 业_计算机网络技术_ 学 习 中 心__ 鹤壁电大_ _ 完成时间_2012年_9 月__1__日 摘要 本系统是实现一个公司进货、销售和库存管理的管理系统,并用于简单的资料管理及权限管理。是单机版应用程序。该系统使用microsoft公司的Visual Basic.

2、NET 作为前台开发工具,微软公司的SQL Server 2000做后台数据库。文章论述了系统的设计与实现。 关键词 进销存系统; 数据库; 系统设计 Abstract This system is a management system that implements the purchase,sell and storage management of a company,also for the simple information management and purview management.It is a stand-alone application prog

3、ram.This system designed with Visual Basic.NET of the microsoft company as proscenium emploiture tool,and with the SQL Server 2000 as the background data-base.This article discussed the design and implement of the system. Key words The purchase,sell and storage management system ; data-bas

4、e ; system design 目录 摘要.......................................................................2 ABSTRACT…………………………………………………………………………………………2 第一章 系统概述………………………………………………………………………….3 一. 应用背景……………………………………………………………………………3 二. 系统功能……………………………………………………………………………3 三. 系统预览………………………………………………………………………

5、……3 四. 系统特点………………………………………………………………………………4 第二章 .系统分析………………………………………………………………………………4 一. 初步调查………………………………………………………………………………4 (一)进销存系统的任务……………………………………………………………4 (二)进销存系统的作用……………………………………………………………4 二. 详细调查………………………………………………………………………………4 (一)进销存系统需求分析…………………………………………………………4

6、 (二)进销存系统数据库分析………………………………………………………5 (三)进销存系统E-R图……………………………………………………………5 三. 可行性分析……………………………………………………………………………5 (一)系统功能………………………………………………………………………5 (二)系统流程图……………………………………………………………………6 第三章 系统设计和数据库设计……………………………………………………………6 一. 系统功能模块划分……………………………………………………………………6 二. 系统流程分析

7、…………………………………………………………………………7 三. 数据库设计…………………………………………………………………………7 (一)数据库结构设计…………………………………………………………………8 (二)创建数据库………………………………………………………………………8 (三)设计数据表………………………………………………………………………8 (四)创建存储过程……………………………………………………………………一三 四. 窗体设计…………………………………………………………………………14 (一)创建系统主窗体……………………………………………………

8、……………14 (二)创建数据访问模块………………………………………………………………一五 (三)实现系统登录功能………………………………………………………………17 (四)实现商品资料维护功能………………………………………………………19 (五)实现进货功能…………………………………………………………………26 (六)实现进货单单据打印功能……………………………………………………31 第四章 系统平台选择……………………………………………………………32 一. 开发工具选择…………………………………………………………….32 二. 开发和运行平……………………………………

9、……………………………32 结束语…………………………………………………………………………………32 谢辞…………………………………………………………………………………………34 参考文献……………………………………………………………………………………35 1.绪论 1.1应用背景 随着企业的发展,以及软件开发的逐步成熟,进销存系统使得原来繁重而又容易出错的进销存管理变得简单而有条理。能够节省大量的人员成本,也使管理变得可靠方便。 它可以是一个独立的项目,也可以是一个完整的功能模块,对于整个ERP系统的开发也可以轻易的将它集成进去。 1.2系统功能 进销存管理系统的主要

10、功能如下所示。 (1)资料管理:管理商品信息,供货商信息和客户信息,分别用于维护企业所经营商品的基本信息,供货商及客户的基本信息。 (2)进货管理:管理进货单信息,用于录入企业的进货单,分为主从两张表,主表“进货单”内容包括编号、供货商号、进货日期、业务员等,从表“进货单明细”内容包括编号、进货单号、货号、进货数量、进价等。 (3)销售管理:管理销售单信息,用于录入企业的销售单。主表“销售单”内容包括编号、客户编号、销售日期、业务员等,从表“销售单明细”内容包括编号、销售单号、货号、销售价等。 (4)库存管理:管理库存信息,用于查询企业商品的库存。 (5)系统管理:管理用户权限,用于

11、设置各操作员使用系统的权限,为了方便设置,一般的应用系统都是可以将操作人员分组的,将通用的权限赋予整个组,个别的权限单独赋予个人,这样可以大大减少权限管理的工作量。 1.3系统预览 由于在下面的章节中会给出具体的介绍,在此只给出主界面的一个预览,如图2.1所示。 图1.1 主界面预览 1.4系统特点 进销存管理系统的制作就是为了将进销存管理变得简单可靠,节省人力,实现傻瓜 的操作。本系统给出了一套较完善的易学易用的进销存管理系统。 2 系统分析 2.1 初步调查 (1)进销存管理的任务 进销存管理工作的主要任务有: ① 企业的采购管理 ② 企业的销售管理(批发

12、零售、连锁) ③ 企业各部门的商品配送管理 ④ 企业库存商品的管理 ⑤ 企业应收款,应付款的管理 ⑥ 企业经营状况分析与决策 (2)进销存管理系统的作用 提高管理效率,降低人工成本 ① 降低采购成本 ② 及时调整营销策略,防止价格流失 ③ 防范陈呆死帐,降低应收帐款 ④ 减少仓储面积,提高房产综合利用 ⑤ 降低储备资金占用 ⑥ 加快资金周转,实现经济效益 ⑦ 强化财务监控制,实现经济效益 ⑧ 商业数据智能分析 2.2 详细调查 (1)进销存管理系统需求分析 根据以上对进销存管理内容和进销存管理系统的分析,一个标准的进销存管理系统应该包括如图2.1所示的几大

13、功能。 其中每个功能都由若干相关联的子功能模块组成。 图2.1 进销存管理系统的基本功能模块 (2)进销存管理系统数据库分析 根据以上需求分析,一个基本的进销存管理系统数据库中大致包括60多张数据表,分别存放相应子功能的数据信息,其中商品清单、供货商清单和客户清单是起关键作用的表,用于存放基础的数据信息。其他涉及商品、供货商和客户信息的表,都只记录这些元素的编号,根据作为外键的“编号”字段来对应。因此这3张表和其他表间的关系是1:N的关系。 因为整个系统涉及的实体和属性较多,限于时间和篇幅不能逐一列举。图2.2为进销存管理系统关键实体的E-R图。 图2.2 进销存管理系统E

14、R图 其他实体与基本信息表间的对应关系都是类似的。 2.3可行性分析 (1)系统功能分析 由于篇幅和时间有限,本设计详细介绍如下图所示功能的开发过程,并简化其中各功能所包含的属性,其他功能完全可以参照这些功能的开发方法实现。 图2.3本设计介绍的功能模块 (2)系统流程图 图2.4系统流程图 3.系统设计和数据库设计 3.1系统功能模块划分 系统大致可分为如下几个功能模块: 登录模块:登录模块是一个很重要的模块,是进入系统的门户,对用户信息起到了一定的保护作用. 资料管理模块:资料管理模块中包括了对商品信息,供货商信息以及客户信息的管理,并提供简单的查

15、询功能. 进销存管理模块:进销存系统中非常重要的就是对进货单,销售单和库存记录的管理,它是进销存系统的核心部分. 系统管理模块:该模块是对各操作员使用权限的管理,为了方便设置,一般的应用系统都是可以将操作人员分组的,将通用的权限赋予整个组,个别的权限单独赋予个人,这样可以大大减少权限管理的工作量。 3.2系统流程分析 进销存系统的流程如下所示。 第一步,进行登录,如果成功则进入第二步。 第二步,打开系统的主界面,根据相应的操作,分别跳入不同的步骤,共有五种不同的选择。 资料管理:在该模块中可以对客户信息、供货商信息和商品信息进行设置与管理。 进货管理:在该模块中可以对进货单的记

16、录进行一定条件下的查询。 销售管理:在该模块中可以对销售单的记录进行一定条件下的查询。 库存管理:在该模块中可以对库存情况进行一定条件下的查询。 系统管理:在该摸块中不同操作员的使用权限进行设置。 具体的流程如图所示。   图3.1系统流程图 3.3数据库设计 数据只有用数据库来管理才能有自动化管理的可能。数据的结构将影响整个管理机制的应用,而且一但建立以后要修改常会出现麻烦。所以一开始就要仔细慎重地搭建一个完整而合理的结构。 所谓数据库(Database)就是指按一定组织方式存储在一起的,相互有关的若干个数据的结合,数据库管理系统(Database Managem

17、ent System)就是一种操纵和管理数据库的大型软件,简称DBMS,他们建立在操作系统的基础上,对数据库进行统一的管理和控制,其功能包括数据库定义,数据库管理,数据库建立和维护,于操作系统通信等。DBMS通常由数据字典,数据描述语言及其编译程序,数据操纵(查询)语言及其编译程序,数据库管理例行程序等部分组成。 (1)数据库结构设计 本系统的数据比较复杂,存储数据的表也比较多,如何让各个表有机地结合起来充分发挥各自的作用,是结构复杂数据库的难点。本设计共需要14张表,多数是平行结构,部分表必须配对存在,有主表、副表之分。用途分别如下表所示。 数据表名称

18、 数据表用途 用户清单 保存系统使用者的信息 权限清单 保存系统使用者的权限信息,可以指定到菜单级权限 商品清单 保存企业经营商品的资料信息 供货商清单 保存企业供货商的资料 客户清单 保存企业客户的资料信息 仓库清单 保存企业库房的分类信息,可以用于数据辞典 业务员清单 保存企业的业务员信息,可以用于

19、数据辞典 进货单 进货单主表 进货单明细 进货单从表 进货单历史 保存进货单历史 进货单明细历史 保存进货单明细历史 销售单 销售单主表 销售单明细 销售单从表 销售单历史 保存销售单历史 销售单明细历史 保存销售单明细历史 库存库 保存企业商品库存

20、的数量、金额等信息 应付款、应收款 保存企业应付款明细、应收款明细 表3.1 (2)创建数据库 打开SQL Server企业管理器,新建一个数据库,将其命名为jxcbook. (3)设计数据表 创建“商品清单”数据表 CREATE TABLE [dbo].[商品清单] ( [货号] [char] (14) NOT NULL Primary Key, [条码] [char] (14) NULL, [拼音编码] [char] (40)NULL, [品名] [varchar] (80) NULL,

21、 [规格] [varchar] (40) NULL, [单位] [char] (6) NOT NULL, [产地] [varchar] (50) NULL, [类别] [char] (20) NULL, [进货价] [decimal] (28,6) NULL default(0), [销售价1] [decimal] (28,6) NULL default(0), [销售价2] [decimal] (28,6) NULL default(0), [最低售价] [decimal] (28,6) NULL de

22、fault(0) ) GO 创建“供货商清单”数据表 CREATE TABLE [dbo].[供货商清单] ( [恭货商号] [char] (10) NOT NULL Primary Key, [拼音编码] [char] (40)NOT NULL, [简称] [varchar] (80) NULL, [名称] [varchar] (80) NULL, [地址] [varchar] (80) NULL, [邮编] [char] (6) NULL, [区号] [char] (6) NULL, [地区] [cha

23、r] (10) NULL, [电话] [varchar] (20) NULL, [传真] [varchar] (20) NULL, [电报] [varchar] (20) NULL, [开户行] [varchar] (40) NULL, [开户行邮编] [char] (6) NULL, [银行帐号] [varchar] (20) NULL, [税号] [varchar] (20) NULL, [库房地址] [varchar] (40) NULL, [库房电话] [varchar] (20

24、) NULL, [业务员] [char] (10) NULL, [业务部门] [varchar] (20) NULL ) GO 创建“客户清单”数据表 CREATE TABLE [dbo].[客户清单] ( [客户编号] [char] (10) NOT NULL Primary Key, [拼音编码] [char] (20)NOT NULL, [简称] [varchar] (80) NULL, [名称] [varchar] (80) NULL, [联系人] [varchar] (30) NULL,

25、 [地址] [varchar] (80) NULL, [邮编] [char] (6) NULL, [区号] [char] (6) NULL, [地区] [varchar] (12) NULL, [电话] [varchar] (20) NULL, [传真] [varchar] (20) NULL, [电报] [varchar] (20) NULL, [开户行] [varchar] (40) NULL, [开户行邮编] [char] (6) NULL, [银行帐号] [varchar] (2

26、0) NULL, [税号] [varchar] (20) NULL, [性质] [varchar] (10) NULL, [业务员] [char] (10) NULL, [业务部门] [varchar] (20) NULL, [授信额度] [decimal] (28,6) NULL, ) GO 创建“进货单和进货单明细”数据表 CREATE TABLE [dbo].[进货单] ( [编号] [char] (14) NOT NULL Primary Key, [供货商号] [char] (10)NOT NULL,

27、 [进货日期] [datetime] NULL, [业务员] [char] (10) NULL, [制单人] [char] (10) NULL, [验收员] [char] (10) NULL, [保管人] [char] (10) NULL, [税价合计] [decimal] (28,6) NULL, [不含税价] [decimal] (28,6) NULL, [税额] [decimal] (28,6) NULL, [订单号] [char] (14) NULL ) GO CREATE

28、 TABLE [dbo].[进货单明细] ( [编号] [char] (14) NOT NULL Primary Key, [进货单号] [char] (14)NOT NULL, [货号] [char] (14) NOT NULL, [进货数量] [decimal] (28,6) NOT NULL, [进价] [decimal] (28,6) NULL, [税价合计] [decimal] (28,6) NULL, [扣率] [decimal] (28,6) NULL, [税率] [decimal] (28,

29、6) NULL, [不含税价] [decimal] (28,6) NULL, [税额] [decimal] (28,6) NULL, [仓库] [char] (20) NULL, [货物质量] [varchar] (50)NULL ) GO 创建“销售单和销售单明细”数据表 CREATE TABLE [dbo].[销售单] ( [编号] [char] (14) NOT NULL Primary Key, [客户编号] [char] (10)NOT NULL, [销售日期] [datetime] NULL,

30、 [业务员] [char] (10) NULL, [制单人] [char] (10) NULL, [保管人] [char] (10) NULL, [税价合计] [decimal] (28,6) NULL, [不含税价] [decimal] (28,6) NULL, [税额] [decimal] (28,6) NULL, [订单号] [char] (14) NOT NULL ) GO CREATE TABLE [dbo].[销售单明细] ( [编号] [char] (14) NOT NULL Prim

31、ary Key, [销售单号] [char] (14)NOT NULL, [货号] [char] (14) NOT NULL, [销售数量] [decimal] (28,6) NOT NULL, [销售价] [decimal] (28,6) NULL, [税价合计] [decimal] (28,6) NULL, [扣率] [decimal] (28,6) NULL, [税率] [decimal] (28,6) NULL, [不含税价] [decimal] (28,6) NULL, [税额] [d

32、ecimal] (28,6) NULL, [仓库] [char] (20) NULL ) GO 创建起他重要数据表 CREATE TABLE [dbo].[库存库] ( [货号] [char] (14) NOT NULL, [仓库] [varchar] (20)NOT NULL, [库存数量] [decimal] (28,6) NOT NULL, [库存金额] [decimal] (28,6) NOT NULL, [库存单价] [decimal] (28,6) NOT NULL, [最新进价] [de

33、cimal] (28,6) NULL, ) GO CREATE TABLE [dbo].[权限清单] ( [权限序号] [int] IDENTITY (1,1) NOT NULL, [用户编号] [char] (6) NULL, [部门] [char] (20)NULL, [权限名称] [char] (6) NOT NULL ) GO 创建外部关键字 ALTER TABLE [dbo].[进货单] ADD CONSTRAINT [进货单_供货商_fk] FOREIGN KEY (

34、 [供货商号] ) REFERENCES [dbo].[供货商清单]( [供货商号] ) GO ALTER TABLE [dbo].[进货单明细] ADD CONSTRAINT [FK_进货单明细_进货单] FOREIGN KEY ( [进货单号] ) REFERENCES [dbo].[进货单]( [编号] ), CONSTRAINT [进货单明细_货号_fk] FOREIGN KEY (

35、[货号] ) REFERENCES [dbo].[商品清单]( [货号] ) GO ALTER TABLE [dbo].[销售单] ADD CONSTRAINT [销售单_客户编号_fk] FOREIGN KEY ( [客户编号] ) REFERENCES [dbo].[客户清单]( [客户编号] ) GO ALTER TABLE [dbo].[销售单明细] ADD CONSTRAINT [FK_销售单明细_销售单] FOR

36、EIGN KEY ( [销售单号] ) REFERENCES [dbo].[客户清单]( [编号] ), CONSTRAINT [销售单明细_货号_fk] FOREIGN KEY ( [货号] ) REFERENCES [dbo].[商品清单]( [货号] ) GO (4)创建存储过程 系统使用了两个存储过程,分别实现进货时增加库存、产生应付款和销售时减少库存、产生应收款的功能。建库脚本如下: CREATE P

37、ROCEDURE sf_进货单 x记账人 char(10) = NULL AS Begin transaction INSERT INTO 库存库(货号,仓库,库存数量,库存金额,库存单价) SELECT DISTINCT j.货号,j.仓库,0,0,0 FROM 进货单明细 AS J left join 库存库 as k on (j.仓库=k.仓库 and j.货号=k.货号) Where k.货号 is null UPDATA 库存库 SET 库存单价=case when 库存数量<=0 or (库

38、存数量+数量ALL)<=0 then 进价 Else (库存金额+税价合计ALL)/(库存数量+数量ALL)end, 库存数量=库存数量+数量ALL, 库存金额=case when 库存数量<=0 or(库存数量+数量ALL)<=0 then 进价+(库存数量+数量ALL)Else (库存金额+税价合计ALL) end, 最新进价=进价 FROM (SELECT 仓库,货号,‘数量ALL’=sum(进货数量),‘进

39、价’=sum(税价合计)/ sum(进货数量),‘税价合计ALL’ =sum(税价合计)FROM 进货单明细 GROUP BY 仓库,货号)AS LSJ WHERE 库存库.仓库=LSJ.仓库 AND 库存库.货号=LSJ.货号 INSERT INTO 应付款(编号,进货单号,货号,进货商号,数量,进货单价,金额,进货日期,状态) SELECT ‘付’+a.编号,b.编号,a.货号,b.供货商号,进货数量,进价,a.税价合计,进货日期,‘应付’ FROM 进货单明细 as a.进货单 as b Where a.进货单

40、号=b.编号 INSERT INTO 进货单历史 SELECT * FROM 进货单 INSERT INTO 进货单明细历史 SELECT * FROM 进货单明细 Delete from 进货单明细 Delete from 进货单 Commit Go CREATE PROCEDURE sf_销售单 x记账人 char(10) = NULL AS Begin transaction UPDATA 库存库 SET 库存数量=库存数量-数量ALL,库存金额=库存单价 * (库存数量-数量ALL) FROM(SELECT 仓库,货号,‘数量ALL’=sum(销售数量)FR

41、OM 进货单明细 GROUP BY 仓库,货号)AS LSJ WHERE 库存库.仓库=LSJ.仓库 AND 库存库.货号=LSJ.货号 INSERT INTO 应付款(编号,销售单号,货号,客户编号,数量,销售价,金额,销售日期,状态) SELECT ‘收’+a.编号,b.编号,a.货号,b.客户编号,销售数量,销售价,a.税价合计,进货日期,‘应收’ FROM 销售单明细 as a.销售单 as b Where a.销售单号=b.编号 INSERT INTO 销售单历史

42、SELECT * FROM 销售单 INSERT INTO 销售单明细历史 SELECT * FROM 销售单明细 Delete from 销售单明细 Delete from 销售单 Commit Go 3.4窗体设计 (1)创建系统主窗体 1.利用系统默认生成的窗体作为主窗体,并将其对应的文件更名为frmMain.vb,为其添加一个主菜单(MainMenu)控件。 2.窗体的部分属性设置如下: 对象(控件)名 属性 取值(说明) frmMain Name

43、 frmMain frmMain Caption 进销存管理 frmMain IsMdiContainer True frmMain StartPosition CenterScreen frmMain WindowState Maximized 表3.2 3.在主菜单控件上单击鼠标左键进入菜单编辑模式,编辑菜单。

44、4.在窗体frmMain对应的代码文件中添加私有变量以及程序入口函数Main. Public UserId As String '整个程序的入口 Public Shared Sub Main() '显示登陆对话框 Dim loginFrm As frmLogin = New frmLogin loginFrm.ShowDialog() '合法用户进入系统 If loginFrm.bResult = True Then Dim frm As frmMain

45、 = New frmMain frm.UserName = loginFrm.UserName frm.UserId = loginFrm.UserId Application.Run(frm) End If 5.设置程序的启动项目,选择[项目]|[进销存管理 属性]命令,在弹出的对话框中的[启动对象]下拉列表中选择Sub Main,点击确定。 6.添加判断子窗体实例状态的函数GetInstanceState,此函数的主要作用是实现单机主窗体的某菜单项,如[进货单]只是出现一个进货单子窗体。

46、 Private Function GetInstanceState(ByVal name As String) As Boolean '获得frmMain窗体的子窗体的数量 Dim i As Integer = Me.MdiChildren.Length '循环判断是否有名为name的子窗体实例 For i = 0 To Me.MdiChildren.Length - 1 If Me.MdiChildren(i).Name = name Then '存在名为n

47、ame的子窗体,是子窗体获得焦点并返回True Me.MdiChildren(i).Focus() Return True End If Next '不存在名为Name的子窗体False Return False End Function 7.为菜单[商品资料维护]的Click事件添加相应函数。 Private Sub MenuItemGoodsInfo_Click(ByVal sender As System.Object, _

48、 ByVal e As System.EventArgs) Handles MenuItemGoodsInfo.Click '判断商品资料维护窗体是是否已经创建 If GetInstanceState("frmGoodsInfo") Then '商品资料维护窗体已经创建并返回 Exit Sub End If '创建并显示商品资料维护窗体 Dim childFrm As frmGoodsInfo = New frmGoodsInfo

49、 childFrm.MdiParent = Me childFrm.Show() End Sub 其他菜单的Click事件相应代码已上面的基本一致,这里不再一一叙述。 (2)创建数据访问模块 因为各个窗体均需要对数据库进行访问,可以把数据库的一些操作通过一个类实现,这样可以使对数据库的访问更加简单。 1.选择[文件]|[添加新项]命令添加一个名为“DataBase.vb” 的类文件。 2.用如下内容替换DataBase.vb中的内容。 Imports System.Data Imports System.Data.SqlClient Imp

50、orts SystemxponentModel Public Class DataBase '实现接口IDisposable Implements IDisposable '数据库连接对象 Private SqlConn As SqlConnection Public Shared sConn As String = "Persist Security Info=False;" _ + "Integrated Security=SSPI;database=jxcbook;" _ + "server=localhost;

移动网页_全站_页脚广告1

关于我们      便捷服务       自信AI       AI导航        抽奖活动

©2010-2026 宁波自信网络信息技术有限公司  版权所有

客服电话:0574-28810668  投诉电话:18658249818

gongan.png浙公网安备33021202000488号   

icp.png浙ICP备2021020529号-1  |  浙B2-20240490  

关注我们 :微信公众号    抖音    微博    LOFTER 

客服