进销存管理系统的设计与实现

1、进销存管理系统的设计与实现目 录0 引言 11 系统设计开发11.1系统设计目的11.2 系统设计需求11.3系统设计软件31.4系统设计总览32 系统数据表设计42.1数据库总列表42.2数据库表字段及说明52.3数据库表关系图53 系统界面与功能63.1 登入界面 63.2 操作界面 73.2.1 操作界面 ？4 系统设计总结 275 结束语 27摘要： 本文从需求分析、可行性分析等方面进行了系统分析；在此基础上对系统进行了系统设计和系统实施。在系统设计阶段，利用e-r图描述数据库的概念结构，形成了access支持的数据库逻辑结构；同时对系统功能进行了详细的分析，总结、归纳出商品库存管理系

2、统各个功能模块。本系统采用面向对象程序设计的思想，利用vb编程语言、使用access 2003作为后台数据库管理系统进行了系统开发、设计。本系统完成了对交易方信息管理、合同信息管理、员工信息管理、商品信息管理、仓库库存管理、采购销售单据管理等方面。系统具备对各类信息进行查询、添加、删除、修改等功能。本系统中设计了一系列的类，用于实现对各个数据库表的操作。关键词：数据库 access 信息管理 进销存0 引言随着世界经济的发展，各企业及组织在交易频繁化、品种多样化、区域广泛化、手续明细化上不断提升。使得每次交易过程中总要面对大量的商品数据（供应商、收购商、收购量、销售量、等）统计、查询和处理。手

3、工记账对于不断增加的商品形成数据量大、复杂和多样从而造成了数据的归档慢、统计工作繁杂、汇总分析不及时，又容易会出现遗漏及登记错误，往往在月底结账时就应一个小数点而要进行整月的账目盘查，对一点错误就要全部重新记账等。而且在日后数据资料的查看和管理相当不便。就各界企业和组织的后台管理需求的不断提高，很多管理者开始使用计算机电子表格处理大量数据管理，此时也逐步进入了商品信息化的时代。在商场激烈竞争的推动下，管理者为了提高工作效率及市场竞争力对于信息源的准确性、可靠性、及时性，信息处理的速度、完整度，以及数据分析整合能力等要求也有了很大的提高，进而出现了erp系统，【erp（enterprise re

4、source planning）：是由美国gartner group咨询公司在1993年首先提出的，作为当今国际上一个最先进的企业管理模式,它在体现当今世界最先进的企业管理理论的同时，也提供了企业信息化集成的最佳解决方案。其主要宗旨是对企业所拥有的人、财、物、信息、时间和空间等综合资源进行综合平衡和优化管理，协调企业各管理部门，围绕市场导向开展业务活动，提高企业的核心竞争力，从而取得最好的经济效益。】随着erp的推出，各企业也为本身需求定制了有针对性的管理软件。进销存管理系统是为了更好满足企业的切实需要和方便企业管理商品贸易数据而开发的数据库管理软件。根据企业的实际要求，即实现各项信息的添加、

5、删除、查询、修改等几方面功能。进销存管理系统可以帮助企业方便快捷地管理繁琐的贸易数据。提高企业的管理水平和综合分析能力。1 系统分析1.1系统设计目的企业的商品物资管理往往都是复杂繁琐的，由于商品物资种类品项繁多，进销渠道各有相异，各企业之间甚至同一集团内部的管理体制也尽有差异，因此必须根据企业具体情况制定相适的系统以便更好地提高工作效率。1.2系统设计需求根据贸易企业基本的商品物资管理程序，一般制定为签署采购合同，执行合同发出订货单，根据订购单验收、审核入库，签署销售合同，根据对方订货单开具销售单，销售单审核出库等，概括分为基本信息、采购、销售、仓库及财务审核。为提高操作人员工作效率，系统设

6、计需：1.简洁明了的人机界面。2.根据操作员特性的权限分类。3.客户及商品信息的添加、修改、删除、查询功能。4.仓库库存的查询功能。5.商品的采购及销售功能。1.3系统设计软件microsoft access是微软公司推出的基于windows的桌面关系数据库管理系统（rdbms），是office系列应用软件之一。它提供了表、查询、窗体、报表、页、宏、模块7种用来建立数据库系统的对象；提供了多种向导、生成器、模板，把数据存储、数据查询、界面设计、报表生成等操作规范化；为建立功能完善的数据库管理系统提供了方便，也使得普通用户不必编写代码，就可以完成大部分数据管理的任务。access是一种关系型数据

7、库管理系统，其主要特点如下： （1）存储方式单一 access管理的对象有表、查询、窗体、报表、页、宏和模块，以上对象都存放在后缀为（.mdb）的数据库文件种，便于用户的操作和管理。 （2）面向对象 access是一个面向对象的开发工具，利用面向对象的方式将数据库系统中的各种功能对象化，将数据库管理的各种功能封装在各类对象中。它将一个应用系统当作是由一系列对象组成的，对每个对象它都定义一组方法和属性，以定义该对象的行为和外国，用户还可以按需要给对象扩展方法和属性。通过对象的方法、属性完成数据库的操作和管理，极大地简化了用户的开发工作。同时，这种基于面向对象的开发方式，使得开发应用程序更为简便。

8、 （3）界面友好、易操作 access是一个可视化工具，是风格与windows完全一样，用户想要生成对象并应用，只要使用鼠标进行拖放即可，非常直观方便。系统还提供了表生成器、查询生成器、报表设计器以及数据库向导、表向导、查询向导、窗体向导、报表向导等工具，使得操作简便，容易使用和掌握。 （4）集成环境、处理多种数据信息 access基于windows操作系统下的集成开发环境，该环境集成了各种向导和生成器工具，极大地提高了开发人员的工作效率，使得建立数据库、创建表、设计用户界面、设计数据查询、报表打印等可以方便有序地进行。 （5）access支持odbc（开发数据库互连，open data ba

9、se connectivity），利用access强大的dde（动态数据交换）和ole（对象的联接和嵌入）特性，可以在一个数据表中嵌入位图、声音、excel表格、word文档，还可以建立动态的数据库报表和窗体等。access还可以将程序应用于网络，并与网络上的动态数据相联接。利用数据库访问页对象生成html文件，轻松构建internet/intranet的应用。visual basic（vb）是由微软公司开发的包含协助开发环境的事件驱动编程语言。它源自于basic编程语言。vb拥有图形用户界面（gui）和快速应用程式开发（rad）系统，可以轻易的使用dao、rdo、ado连接数据库，或者轻松的

10、创建activex控件。程序员可以轻松的使用vb提供的组件快速建立一个应用程序。visual basic的特点 1. 具有面向对象的可视化设计工具 2. 事件驱动的编程机制 3. 结构化的程序设计语言 4. 提供了易学易用的应用程序集成开发环境 5. 支持多种数据库系统的访问 6. 高度可移植化的代码 7. vb6.0在开发环境上,网络功能等的大大增强 1.4系统功能模块登入界面操作界面信息管理业务管理财务管理仓库管理系统管理商品信息交易方信息合同信息仓库信息员工信息单据填开查询全部单据查询未复核单据查询已复核单据查询已处理单据单据复核查询全部单据查询未复核单据查询已复核单据查询已处理单据单据

11、处理查询全部单据查询未复核单据查询已复核单据查询已处理单据修改密码添加账号账号修改图1 系统设计图2数据库设计2.1数据库总列表序号表名称（按拼音排列）说明1仓库信息仓库名称及所在地2单据管理单据序号及开具资料3单据明细对应单据号的商品明细4合同信息合同号及签署明细5交易方信息交易往来的公司明细信息6库存管理仓库库存状况7权限管理权限名称及概述8商品信息商品名称单位等9员工信息员工资料10账号管理登入操作的账号资料2.2 数据库表字段及说明1.仓库信息序号字段名字段类型长度属性说明1仓库名文本（50）主键仓库名称无重复2所在地址文本（50）默认对应仓库详细地址2.单据管理序号字段名字段类型长度

12、属性说明1单据号自动编号（长整型）主键递增无重复2对方公司文本（50）默认对应所选合同的对方公司3制单日期文本（50）默认对应制单日期4合同号文本（50）默认对应制单所选合同5办理人文本（50）默认对应登入人员6单据类型文本（50）默认销售或采购7状态文本（50）默认未复核、已复核、已处理3.单据明细序号字段名字段类型长度属性说明1自动编号自动编号（长整型）主键递增无重复2单据号文本（50）默认所属单据号3货品名文本（50）默认商品名4数量数字（长整型）默认商品数量5单价货币（货币）默认商品单价6单位文本（50）默认计量单位7仓库文本（50）默认所操作的仓库8状态文本（50）默认未复核、已复核

13、、已处理4.合同信息序号字段名字段类型长度属性说明1合同号文本（50）主键无重复2客户名称文本（50）默认对方公司抬头3启用日期文本（50）默认合同执行起始日期4结束日期文本（50）默认合同执行结束日期5货品名文本（50）默认商品名称6合同数量数字（长整型）默认预计数量7实际数量数字（长整型）默认实际已产生数量8计量单位文本（50）默认商品计量单位9经办人文本（50）默认办理人10执行状态是/否默认合同完成状态11交易类型文本（50）默认销售或采购5.交易方信息序号字段名字段类型长度属性说明1公司全名文本（50）默认公司名称2公司税号文本（50）主键公司税号3开户行文本（50）默认银行名称4银

14、行账号文本（50）默认银行账号5公司地址文本（50）默认公司地址6联系电话文本（50）默认联系电话7交易类型文本（50）默认销售或采购6.库存管理序号字段名字段类型长度属性说明1编号自动编号（长整型）主键递增无重复2货品编号文本（50）默认货品编号3货品名文本（50）默认货品名称4库存数量文本（50）默认库存数量5单位文本（50）默认计量单位6所在仓库文本（50）默认所在仓库7.权限信息序号字段名字段类型长度属性说明1权限文本（50）默认权限2说明文本（50）默认性质说明8.商品信息序号字段名字段类型长度属性说明1编号自动编号（长整型）主键递增无重复2货品编号文本（50）默认货品编号3货品名文

15、本（50）默认货品名称4产地文本（50）默认生产地5规格单位文本（50）默认计量单位9.员工信息序号字段名字段类型长度属性说明1编号自动编号（长整型）默认递增无重复2员工编号文本（50）主键无重复3姓名文本（50）默认姓名4性别文本（50）.默认性别5年龄文本（50）默认年龄6家庭地址文本（50）默认家庭地址7出生日期文本（50）默认出生日期8部门文本（50）默认部门9职位文本（50）默认职位10学历文本（50）默认学历10.账号管理序号字段名字段类型长度属性说明1账号文本（50）主键无重复2密码文本（50）掩码*密码3权限文本（50）默认权限4员工编号文本（50）默认员工编号5注册日期文本（

16、50）默认注册日期6登入状态文本（50）默认是/否2.3 数据库表关系图如图2 单据关系说明：交易方信息-公司名称连接合同信息-客户名称，合同信息-合同号连接单据管理-合同号，单据管理-单据号连接单据明细-单据号，单据明细-货品名连接库存管理-货品名，库存管理-货品编号连接商品信息-货品编号，商品信息-货品名连接合同信息货品名，合同信息-经办人连接员工信息姓名，员工信息-员工编号连接账号管理-员工编号，账号管理权限连接权限管理-权限。图2 数据库表关系图3 系统实施3.1登入界面登入操作界面如图3：该界面操作在账号密码对应的输入框内输入正确的账号密码，点击登入按钮可进入操作界面。如账号与对应的

17、密码有误则弹出账号或密码错误!对话框。如账号为空则弹出用户名不能为空! 对话框。图3 登入界面图（1）使用控件控件类型名称属性控件功能窗体登入界面插入背景002.jpg默认标签label更改字体默认文本框text1默认输入登入账号文本框text2设置掩码输入登入密码命令按钮command2默认当登入账号与登入密码匹配时，点击进入操作页面，不匹配则有错误提示命令按钮command10默认点击关闭（2）使用表表名称表类型字段名称账号管理表账号、密码、权限、员工编号、注册日期、登入状态（3）窗体命令代码初始建立变量conn/rsoption compare databaseoption explic

18、itdim conn as adodb.connectiondim rs as adodb.recordset命令按钮command2单击登入private sub command2_click()if isnull(me.text1) or me.text1 = thenmsgbox 用户名不能为空!, vbquestionexit subend ifset conn = currentproject.connectionset rs = new adodb.recordsetrs.open 账号管理, conn, adopendynamic, adlockbatchoptimisticrs

19、.movefirstdo while not rs.eofif rs!账号 = me.text1 and rs!密码 = me.text2 thenmsgbox 登入成功!, vbquestionzhanghao = me.text1rs.updatedocmd.close acform, me.namedocmd.openform 操作界面exit subexit doend ifrs.movenextlooprs.updaters.closemsgbox 账号或密码错误!, vbquestionend sub命令按钮command3单击退出程序private sub command10_c

20、lick()on error goto err_command10_click docmd.quitexit_command10_click: exit suberr_command10_click: msgbox err.description resume exit_command10_clickend sub3.2操作界面完成登入后进入操作界面如图4：操作界面是进行各项功能进行操作的界面，主要由选项卡进行页切换，点击选项卡上的页标签可以进入对应的操作页。同时对于登入账号的权限，可进行操作的选项卡页标签也有所不同。图4 操作界面图（1）使用控件控件类型名称属性控件功能窗体操作界面插入背景0

21、01.jpg默认标签welcome默认登入账号+欢迎使用选项卡选项卡控件20默认根据登入账号权限显示对应可执行的标签，点击选项卡标签，切换选项卡页。命令按钮exit2默认单击关闭（2）使用表表名称表类型字段名称账号管理表账号、密码、权限、员工编号、注册日期、登入状态（3）窗体命令代码建立初始变量option compare databasedim conn as adodb.connectiondim rs as adodb.recordset退出按钮 exit2private sub exit2_click()on error goto err_exit2_click docmd.quite

22、xit_exit2_click: exit suberr_exit2_click: msgbox err.description resume exit_exit2_clickend sub登入账号权限private sub form_load()welcome = zhanghao + 欢迎使用!text = zhanghaoset conncl_qx = currentproject.connectionset cl_qx = new adodb.recordsetcl_qx!.open 账号管理, conncl_qx, adopendynamic, adlockoptimisticcl_

23、qx!.movefirstdo while not cl_qx.eof if cl_qx!账号 = text.text then if cl_qx!权限 = 管理 then me.仓库管理.visible = true me.财务管理.visible = true me.系统管理.visible = true me.业务管理.visible = true me.信息管理.visible = true end if else if cl_qx!权限 = 财务 then me.仓库管理.visible = false me.财务管理.visible = true me.系统管理.visible =

24、 false me.业务管理.visible = false me.信息管理.visible = true end if else if cl_qx!权限 = 仓库 then me.仓库管理.visible = true me.财务管理.visible = false me.系统管理.visible = false me.业务管理.visible = false me.信息管理.visible = true end if else if cl_qx!权限 = 业务 then me.仓库管理.visible = false me.财务管理.visible = false me.系统管理.visi

25、ble = false me.业务管理.visible = true me.信息管理.visible = true end if exit do end if cl_qx!.movenextloopcl_qx!.closeend sub3.2.1信息管理页商品信息管理点击信息管理页标签进入商品信息管理，如图5：在商品编号、货品名、计量单位、产地对应的文本输入框中填入相应信息，单击添加按钮可在数据库内添加该信息，同时在左面列表框中显示现有信息，如编号有重复则提示此编号已使用 请更改，如有未填项则显示请完整填写信息。点击左面列表框中信息，会在商品编号、货品名、计量单位、产地对应的文本

26、框中显示其资料，可对货品名、计量单位、产地的信息通过修改按钮或删除按钮进行修改删除，同时更新列表框。修改删除按钮是通过货品编号确认，如有不符则提示无此编号 请确认。图5 商品信息管理页图（1）使用控件控件类型名称属性控件功能窗体信息管理界面默认默认标签lable32字体修改默认标签lable16默认默认标签lable18默认默认标签lable20默认默认标签lable22默认默认文本框text01默认输入商品编号文本框text02默认输入商品名称文本框text03默认输入计量单位文本框text04默认输入商品产地列表框list01商品信息点击列表项，将在text对应控件中显示该项详细。命令按钮

27、command01默认将控件text的内容相对应的添加到商品信息表。如商品编号有重复将弹出提示。更新list01内容。命令按钮command02默认将控件text的内容在商品信息表中相对应的项目进行修改。如有商品编号不符将弹出信息。更新list01内容。命令按钮command03默认对与控件text的内容在商品信息表中相同的项目进行删除。如有商品编号不符将弹出信息。更新list01内容。（2）使用表表名称表类型字段名称商品信息表编号、货品编号、货品名、产地、规格单位（3）窗体命令代码添加按钮 添加新商品private sub command01_click()set conn00 = curr

28、entproject.connectionset rs00 = new adodb.recordsetrs00.open 商品信息, conn00, adopendynamic, adlockoptimisticif isnull(me.text01) or isnull(me.text02) or isnull(me.text03) or isnull(me.text04) thenmsgbox (请完整填写信息), vbokonly, 提示exit subend ifif rs00.bof or rs00.eof thenrs00.addnewrs00!货品编号 = me.text01rs

29、00!货品名 = me.text02rs00!规格单位 = me.text03rs00!产地 = me.text04rs00.updaters00.closemsgbox (成功添加新商品), vbokonly, 提示list01.requeryelsers00.movefirstdo while not rs00.eofif rs00!货品编号 = me.text01 thenmsgbox (此编号已使用 请更改), vbokonly, 提示me.text01.setfocustext01.value = exit subexit doend ifrs00.movenextlooprs00.

30、addnewrs00!货品编号 = me.text01rs00!货品名 = me.text02rs00!规格单位 = me.text03rs00!产地 = me.text04rs00.updaters00.closemsgbox (成功添加新商品), vbokonly, 提示list01.requeryend ifend sub修改按钮 修改商品信息private sub command02_click()set conn00 = currentproject.connectionset rs00 = new adodb.recordsetdim i02 as integeri02 = 0rs

31、00.open 商品信息, conn00, adopendynamic, adlockoptimisticif isnull(me.text01) thenmsgbox (请填入货品编号), vbokonly, 提示exit subend ifrs00.movefirstdo while not rs00.eof if rs00!货品编号 = me.text01 then rs00!货品名 = me.text02 rs00!规格单位 = me.text03 rs00!产地 = me.text04 rs00.update msgbox (成功修改此商品), vbokonly, 提示 i02 =

32、1 list01.requery exit do end ifrs00.movenextloopif i02 = 0 then msgbox (无此编号 请确认), vbokonly, 提示 me.text01.setfocus text01.value = end ifend sub删除按钮 删除商品private sub command03_click()set conn00 = currentproject.connectionset rs00 = new adodb.recordsetdim i03 as integeri03 = 0rs00.open 商品信息, conn00, ad

33、opendynamic, adlockoptimisticif isnull(me.text01) thenmsgbox (请填入货品编号), vbokonly, 提示exit subend ifrs00.movefirstdo while not rs00.eof if rs00!货品编号 = me.text01 then rs00.delete rs00.update msgbox (成功删除此商品), vbokonly, 提示 i03 = 1 list01.requery exit do end ifrs00.movenextloopif i03 = 0 then msgbox (无此编

34、号 请确认), vbokonly, 提示 me.text01.setfocus text01.value = end ifend sub交易方信息管理点击交易方信息按钮进入交易方信息管理页，如图6：此页操作功能一基本相同。图6 交易方信息管理页图（1）使用控件控件类型名称属性控件功能窗体信息管理界面默认默认标签lable48字体修改交易方信息管理标签lable35默认公司全名：标签lable37默认公司税号：标签lable39默认银行名称：标签lable41默认银行账号：标签lable98默认公司地址：标签lable100默认联系电话：标签lable155默认交易类

35、型：文本框text11默认输入公司全名文本框text12默认输入公司税号文本框text13默认输入银行名称文本框text14默认输入银行账号文本框text15默认输入公司地址文本框text16默认输入联系电话组合框text17默认选择交易类型列表框list11交易方信息点击列表项，将在text对应控件中显示该项详细。命令按钮command11默认将控件text的内容相对应的添加到交易方信息表。如公司税号有重复将弹出提示。更新list11内容。命令按钮command12默认将控件text的内容在交易方信息表中相对应的项目进行修改。如有公司税号不符将弹出信息。更新list11内容。命令按钮comm

36、and13默认对与控件text的内容在交易方信息表中相同的项目进行删除。如有公司税号不符将弹出信息。更新list11内容。（2）使用表表名称表类型字段名称交易方信息表公司全名、公司税号、开户行、银行账号、公司地址、联系电话、交易类型（3）窗体命令代码添加删除指令代码与类似。合同信息管理点击合同信息按钮进入合同信息管理页，如图6：此页操作功能一基本相同。图7 合同信息管理页图（1）使用控件 控件类型名称属性控件功能窗体信息管理界面默认默认标签lable64字体修改合同信息管理标签lable51默认合同号：标签lable53默认对方名称：标签lable55

37、默认启用日期：标签lable57默认结束日期：标签lable174默认货品名：标签lable111默认交易数量：标签lable113默认计量单位：标签lable115默认签办人：标签lable157默认合同类型：标签lable191默认单价：文本框text21默认输入合同号文本框text22默认输入对方名称文本框text23默认输入启用日期文本框text24默认输入结束日期文本框text25默认输入货品名文本框text26默认输入交易数量文本框text27默认输入计量单位文本框text28默认输入签办人文本框text2a默认输入单价组合框text29默认销售;采购列表框list21默认 合同信

38、息表，点击列表项，将在text对应控件中显示该项详细。命令按钮command21默认将控件text的内容相对应的添加到合同信息表。如合同号有重复将弹出提示。更新list21内容。命令按钮command22默认对与控件text的内容在合同信息表中相同的项目进行删除。如有合同号不符将弹出信息。更新list21内容。（2）使用表表名称表类型字段名称合同信息表合同号、客户名称、启用日期、结束日期、货品名、合同数量、实际数量、计量单位、经办人、执行状态、交易类型、单价（3）窗体命令代码添加删除指令代码与类似。仓库信息管理点击仓库信息按钮进入仓库信息管理页，如图6：此页添加删除

39、操作功能一基本相同，添加仓库库存查询按钮，点击后打开库存查询窗体。图8 仓库信息管理页图（1）使用控件 控件类型名称属性控件功能窗体信息管理界面默认默认标签lable80字体修改仓库信息管理标签lable67默认仓库名称：标签lable69默认所在地：文本框text31默认输入仓库名文本框text32默认输入仓库所在地列表框list31默认 仓库信息表，点击列表项，将在text对应控件中显示该项详细。命令按钮command31默认将控件text的内容相对应的添加到仓库信息表。如有重复将弹出提示。更新list31内容。命令按钮command32默认对与控件text的内容在仓库信息表

40、中相同的项目进行删除。如有不符将弹出信息。更新list31内容。命令按钮command33默认仓库库存查询（2）使用表表名称表类型字段名称仓库信息表仓库名、所在地址（3）窗体命令代码添加删除指令代码与类似。仓库查询按钮private sub command33_click()docmd.openform 库存查询end sub 员工信息管理点击员工信息按钮进入员工信息管理页，如图6：此页操作功能一基本相同。图9 员工信息管理页图（1）使用控件 控件类型名称属性控件功能窗体信息管理界面默认默认标签lable96字体修改员工信息管理标签lable83默认员

41、工编号：标签lable85默认姓名：标签lable87默认性别：标签lable89默认年龄：标签lable141默认职位：标签lable143默认学历：标签lable133默认住址：标签lable135默认联系电话：标签lable137默认出生日期：标签lable139默认部门：文本框text41默认输入员工编号文本框text42默认输入姓名组合框text43默认输入性别文本框text44默认输入年龄文本框text45默认输入职位文本框text46默认输入学历文本框text47默认输入住址文本框text48默认输入联系电话文本框text49默认输入日期文本框text4a默认部门列表框list4

42、1默认员工信息表，点击列表项，将在text对应控件中显示该项详细。命令按钮command41默认将控件text的内容相对应的添加到员工信息表。如员工编号有重复将弹出提示。更新list41内容。命令按钮command42默认将控件text的内容在员工信息表中相对应的项目进行修改。如有税号不符将弹出信息。更新list41内容。命令按钮command43默认对与控件text的内容在员工信息表中相同的项目进行删除。如有员工编号不符将弹出信息。更新list41内容。（2）使用表表名称表类型字段名称员工信息表编号、员工编号、姓名、性别、年龄、家庭地址、电话、出生日期、部门、职位、学历（3）窗体命令代码添加

43、删除指令代码与类似。3.2.2 业务管理页在操作界面中点击业务管理打开业务管理页，如图10：单击单据填开按钮进入单据界面，右边列表框中显示内容根据查询全部单据按钮、查询未复核单据按钮、查询已复核单据按钮、查询已处理单据按钮更变。图10 业务管理页图（1）使用控件 控件类型名称属性控件功能窗体信息管理界面默认默认列表框list11默认单据状态查询表 列表框list12默认未复核单据查询表列表框list13默认已复核单据查询表列表框list14默认已仓库处理查询表命令按钮command11默认打开单据界面命令按钮command12默认切换显示list11。屏蔽list12 list1

44、3 list14。命令按钮command13默认切换显示list12。屏蔽list11 list13 list14。命令按钮command14默认切换显示list13。屏蔽list11 list12 list14。命令按钮command15默认切换显示list14。屏蔽list11 list12 list13。（2）使用表表名称表类型字段名称单据状态查询查询单据号、对方公司、制单日期、合同号、单据类型、状态未复核单据查询查询单据号、对方公司、制单日期、合同号、单据类型、状态已复核单据查询查询单据号、对方公司、制单日期、合同号、单据类型、状态已仓库处理查询查询单据号、对方公司、制单日期、合同号、

45、单据类型、状态（3）窗体命令代码命令按钮单据填开打开单据指令private sub command11_click()docmd.openform 单据界面end sub命令按钮查询*显示切换指令private sub command12_click()me.list11.visible = trueme.list12.visible = falseme.list13.visible = falseme.list14.visible = falseend subprivate sub command13_click()me.list11.visible = falseme.list12.vis

46、ible = trueme.list13.visible = falseme.list14.visible = falseend subprivate sub command14_click()me.list11.visible = falseme.list12.visible = falseme.list13.visible = trueme.list14.visible = falseend subprivate sub command15_click()me.list11.visible = falseme.list12.visible = falseme.list13.visible

47、= falseme.list14.visible = trueend sub3.2.2 财务管理页在操作界面中点击财务管理打开财务管理页，如图11：单击单据复核按钮进入复核界面，右边列表框中显示内容根据查询全部单据按钮、查询未复核单据按钮、查询已复核单据按钮、查询已处理单据按钮更变。图11 财务管理页图（1）使用控件 控件类型名称属性控件功能窗体信息管理界面默认默认列表框list21默认单据状态查询表 列表框list22默认未复核单据查询表列表框list23默认已复核单据查询表列表框list24默认已仓库处理查询表命令按钮command21默认打开复核窗体命令按钮command22默认切换显示list21。屏蔽list22 list23 list24。命令按钮command23默认切换显示list22。屏蔽list21 list23 list24。命令按钮command24默认切换显示list23。屏蔽list21 list22 list24。命令按钮command25默认切换显示list24。屏蔽list21 list22 list23。（2）使用表表名称表类型字段名称单据状态查询查询单据号、对方公司、制单日期、合同号、单据类