课程设计（论文）-库存管理系统设计

目录1 系统概述1 系统调查概述 1 系统目标 2 系统开发工具及方案22 系统分析3 2.1 系统需求分析 3 业务流程分析 3 数据流程分析 4 2.2 系统可行性分析 6 6 77 2.3 系统逻辑模型 83 系统设计 8 3.1 系统总体设计 8 3.2 系统详细设计 8 3.3 系统数据库设计 114 系统实施12 12 12 13 15 15 16 17 18 18 195系统调试 19 6 总结与展望 20 致谢 21参考文献 21附录 221 系统概述系统调查概述本小组组员上一次暑假期间在百利公司进行社会实践，通过那次的体验进行了调查了解，对该公司的出库、入库、库存管理环节的流程有了较为详细的了解，同时发现了公司采用传统的库存管理存在的问题。商品入库的过程是，当购入商品到货后，负责进货的人员首先填写入库单，然后经仓库管理人员对商品的质量及数量进行核查前方可入库，并更新商品入库流水账，另外如果是新产品，那么还要在库存台账中建立新账页。商品出库管理过程是管理人员根据销售人员提供的商品出库单，经核查后付货，同时登记商品销售流水帐，累计汇总出各种商品当日的累计购入入库量、累计销售出库量和库存结余量等数据，并将这些数据填入库存信息表。作为制造类企业，公司的往来业务较为频繁，库存作业相对较大，平均看来，仓库每天分别要对35笔入库单据和40笔出库单据进行登记汇总并形成库位信息表和库存信息表。产品入库单如表所示表1.1. 1产品入库单Table1.1.1 StoreIn form机型货号名称单价规格颜色数量备注经办人：产品出库单如表所示表1. 产品出库单Table1.1.2 StoreOut form机型货号名称单价规格颜色数量备注编制单位：经办人：库位信息表如表所示表1.1.3 库位信息表Table1.3 StoreRoom Information Form库位代号仓库号位号库位描述库存信息表如表所示表1.1.4 库存信息表Table1.4 Store information form货号名称所在库房所在位置从以上库存管理业务的分析中，本小组成员认为现行库存管理中存在以下问题：1不能及时获得库存信息2库存信息不够准确3无法及时了解进货与发货情况基于该公司库存管理现状及库存管理对整个企业管理的重要性，有必要专门开发一个应用于库存管理的系统，以为方案及决策人员提供实时准确的存货信息，以便及时地调整采购与生产，保证企业的各种管理业务顺利进行。开发本系统的目标为：有库存管理子系统权限的用户登录进入库存管理子系统后，能够方便地进行仓库管理、入库管理、出库管理、库存管理。仓库管理可用于配置企业的仓库信息；出库、入库管理可以使管理人员管理各种类型的货物进出：库存管理可提供便捷的库存查询管理。同时，用户还可以方便地得到整理后的各种报表，包括仓库信息表、入库清单、出库清单和库存信息表。通过这四个报表的自动生成和格式化，用户可以更为直观地得到库存部门日常所需的各种信息，以做好整个企业的销售工作。1.3 系统开发工具及方案本系统采用Visual Basic + SQL Server2000进行开发，开发方案如下15月1日至5月16日：对企业进行调查，准备课程设计的原始资料25月17日至5月23日：分析相关的调查结果35月24日至5月30日：系统分析，系统设计，系统实施45月31日至6月6日：由老师验收、指导系统设计56月7日至6月15日：由老师验收、指导系统文档撰写66月16日：系统论文工程开发背景 某公司是专营家电的中型企业，该公司经营10大类几十个品种的家电产品。管理工作主要是进货商品的入库管理和销售商品的出库管理及库存商品的保管管理。现有的管理工作主要依靠手工完成，工作量大，且效率不高。为了能更好地利用现代信息技术的成果，提高管理工作的效率和水平，以适应企业开展的需要，决定开发库存管理系统。2系统分析可行性研究 根据调查，商品入库的过程是当购入商品到货后，负责进货的人员首先填写入库单，然后经仓库管理人员对商品的质量及数量进行核查前方可入库，并更新商品入库流水帐，另外如果是新产品，那么还要在库存台账中建立新账页。商品出库管理过程是管理人员根据销售人员提供的商品出库单，经核查后付货，同时登记商品销售流水帐，累计汇总出各种商品当日的累计购入入库量、累计销售出库量和库存结余量等数据，并将这些数据填入库存台账。原有的手工操作方式存在的主要问题：A手工模式下的工作劳动强度高、效率低、错误多、处理速度慢，不适应企业开展的需要。B在具体工作中，存在着大量数据的保存、汇总、查询等工作，手工模式速度慢而且不利于数据的分析，已不适应现代管理模式。 本系统开发的目的，就是通过系统开发，实现库存管理工作计算机化，提高业务的处理速度和标准化程度，并对有关的工作进行集成和重组，进一步通过计算机网络系统实现整个企业管理信息化。该系统可以提高管理工作的质量和效率，主要表现在以下几个方面：A实现库存管理的“动态化，能及时地提供库存商品动态信息，配以库存报警功能，在库存过高或过低时，都给予提示。B强大的统计分析功能，利用计算机工具以各种方式统计出销售等情况，以便于整体营销策略的调整。C方便的查询功能，能快速实现对各种商品的入库、销售及库存情况的查询。 从技术上讲，现行的网络技术和计算机技术完全能完本钱系统的功能要求。经济方面，该企业用于系统开发的预算根本可满足设备的投入和人力投入。就收益而言，系统投入使用后能加快资金的周转，提高资金的利用率，而且可以提高管理效率，减少人力资源的浪费。 在社会可行性方面，系统的开发与使用与现行的管理制度没有冲突，而且现在员工通过培训可以很容易掌握和使用系统。综上所述，该系统具备可开发的条件，工程可行，建议开始开发。 2 系统分析系统需求分析从企业的库存物资管理方面来说，由于所掌握的物资种类众多，订货、管理、发放的渠道各有差异，各个企业之间的管理体制不尽相同，各类统计报表繁多，假设采用人工记账的方式进行管理，很难满足企业库存管理需求。而从企业整体管理的角度上看，一个完整的企业物资供给管理系统应包括采购方案管理、合同托收管理、仓库库存管理、定额管理、统计管理、财务管理等模块。其中的仓库管理是整个物资供给管理系统的核心。因此有必要开发一套独立的库存管理系统来控制合理的库存费用、适时适量的库存数量，是企业生产活动效率最大化。库存管理系统通过对仓库、货位、入出库类型与入出库单据的管理，通过库存分析、清仓盘库管理来实现对企业库存的管理，全面监控企业商品的进、出、存等各种状况。通过分析总结可以得出，企业的库存管理系统需满足以下功能：1具有进行起初建账、系统盘点、数据备份等系统初始化功能；2能够进行企业物料根底数据的设置包括仓库、货物、部门、工程设置3可以根据企业实际情况，进行仓库管理。如出库、入库、盘点操作等；4对库存货物可进行数据查询，如出入库统计查询、库存信息查询等。业务流程分析：系统的业务流程主要包括三个局部：采购、部门领料和库存盘点。1采购的业务流程是：采购员持采购订单交货、仓库保管员在系统中对采购订单做送检通知单，并打印一式两份后，到质检部门申请质检；质检员在送检通知单上填写质检结果，一份由质检部存档，一份交采购员办理入库手续 ；仓库保管员凭送检通知单在系统中做物料接收业务，并打印百利厂采购单交采购员 ；采购接收业务完成登记 。 物料登录时按照入库单上的实收数量，进货途径，进货价等内容进行。如仓库原有此物料，那么在原有库存量上增参加库数量；如仓库没有这种物料，那么应在库存总帐上登录新品种。2部门领料的流程很简单，各部门主要通过仓库领取物资，只需要填写部门领料单即可。领料业务的根本流程有:领料人员持领料单，到仓库领料,仓库保管员对领料单上的领料用途，根据领料单上的物料编码和数量按照系统发料数量进行实物发料。 领料业务流程完成 。 3库存盘点用于登记仓库中物质的养活和增加情况，并使实际库存和数据库中的库存数目保持一致。现行产品库存管理业务流程图如下图：车间入库单合格入库单检 验仓库出库单出库登记出库清单入库清单仓库清单仓库清单入库记账入库帐图2.1商品入库、出库图Fig2.1Figure out the library storage of goods数据流程分析使用该系统首先登入，随后进行用户信息验证，通过后进入主窗体，然后进入以下任一子模块：系统，仓库管理，入库管理，出库管理，综合管理，盘存管理，附项分类，历史数据管理，打印查询。其中入库管理，综合管理，出库管理。要进入下一模块库存汇总再进入数据备份单元，其他除打印查询模块外，直接进入数据备份单元，然后将备份数据输出。打印查询模块那么进入货品入库单，货品出库单，经办人员报表环节。数据流程图如下：登录库存管理系统验证用户信息系统主窗体仓库管理入库管理出库管理综合管理盘存管理附项分类历史数据管理打印、查询货品入库单货品出库单经办人人员报表库存汇总数据备份备份输出密码错误汇总计算图 2.2数据流程图Fig.2.2 Data flow diagram货品信息管理数据流程为：首先进行货品登记，录入根本信息，然后进行货品根本信息管理，之后进入货品调配汇总单元，随后进入货品其他信息管理单元。入库货品信息管理和出库货品信息管理单元那么直接进入货品调配汇总单元再进入货品其他信息管理模块。如下列图：货品信息管理数据流程图：入库货品信息管理出库货品信息管理货品其他信息管理货品调配汇总根本信息录入货品登记货品根本信息管理 Information management data flow of goods 系统可行性分析经济可行性分析由于本库存管理系统所要求的硬件计算机及相关硬件和软件环境(Visual Basic+SQL Server 2000)，市场上都容易购置到或从相关网站下载，系统本钱主要集中在本管理系统的开发与维护上，对用户不会造成过重的经济负担。而一旦此系统投入使用,不仅可以减少库存的工作强度，提高工作效率，而且方便了库存对信息的管理，延续了传统的管理模式，极大限度地方便了库存管理人员，而且，目标系统不是很复杂，开发的周期较短，人员经济支出不大，所节省的大量人力、财力产生的效益将远远大于本系统的开发本钱，所以从经济方面讲开发此系统是可行的。技术可行性分析技术上的可行性分析要考虑现有技术条件能否顺利完成开发工作及将来要采用的硬件和软件技术能否满足用户提出的要求如计算机的容量、速度等。本系统采用Visual Basic作为系统应用程序开发工具，采用SQL Server 2000建立数据库，并通过Visual Basic中的ADO控件使两者进行连接从而进行系统软件开发。Visual Basic不仅能帮助软件开发者提高软件开发的质量和效率，缩短开发周期，而且还具备强大的数据库管理功能，完全能够满足本系统的开发需求。 此外，从开发人员的水平考虑，作为信息管理与信息系统专业毕业的学生，大学三年所积累的专业知识使我们从一定程度上具备了开发一个小型系统的能力，而且学校现有的计算机设备也完全能够满足开发的需要。管理可行性分析该系统可以提高管理工作的质量和效率，主要表现在以下几个方面：1实现库存管理的“动态化，能及时地提供库存商品动态信息，配以库存报警功能，在库存过高或过低时，都给予提示。2强大的统计分析功能，利用计算机工具以各种方式统计出销售等情况，以便于整体营销策略的调整。3方便的查询功能，能快速实现对各种商品的入库、销售及库存情况的查询。4系统的开发与使用与现行的管理制度没有冲突，而且现在员工通过培训可以很容易掌握和使用系统。综上所述，本库存管理系统投资少、收益大，且其运行操作简单易学，具备了开发的可行性。2.3 系统逻辑模型产品出入库单录 入库存台帐统计分析查 询收发存月报报警数据查询条件显示结果根据前面的分析结果，我们提出的系统逻辑模型如下列图所示：图系统逻辑图Fig. System logic diagram3 系统设计 系统总体设计系统开发的总体任务是实现企业物资设备管理的系统化、标准化和自动化，从而到达企业仓库库存管理效率的目的。系统功能分析是在系统开发总体任务的根底上完成的。本库存管理系统需要完成的功能有：1库存管理的各种信息的输入，包括入库、出库、货品信息的输入等。 2库存管理的各种信息的查询、修改和维护。 3入库单、出库单的生成，日报表、月报表的生成。 4在货品库存中参加所允许的最低库存字段，对所有库存物资实现监控报警。 3.2 系统详细设计进入系统管理子系统之后，用户可进行的操作有主系统初始化设置、主系统用户管理、数据库存配置检查和数据表管理。库存管理子系统功能结构图如下图仓库管理出库管理库存管理仓库信息查询入库清单查询出库清单查询库存信息查询仓库信息的查询入库管理仓库信息的录入仓库信息的修改仓库信息的查询添参加库信息货物查询库存查询库存转移仓库信息的查询表入库清单出库清单库存信息的查询报表库 存 管 理 子 系 统Fig. Function Chart本应用程序由10个窗体组成，主要的分别是：主窗体，登陆窗体，仓库管理窗体，入库管理窗体，出库管理窗体，库存管理，、仓库信息查询等窗体组成。库存管理相关界面设计仓库管理窗体可进行对仓库管理信息的工作，包括浏览所有的仓库管理信息。通过添加、修改、删除等功能键实现对仓库管理信息的工作，以便仓库部门的管理员能够具有一个管理仓库信息的平台。仓库管理信息编辑窗体那么具体完成对库位信息的添加和修改工作。如果是添加状态，那么在该窗体上可以添加一个新的库位资料。同时当进入窗体为修改状态时，可以方便地在窗体中修改库位资料中的各项信息。 入库管理相关界面的设计入库管理窗体可以完成对入库信息的管理工作，包括浏览所有的入库信息。通过添加功能键实现对入库信息的管理工作，以便仓库管理部门的管理员能够具有一个管理入库信息的平台。入库信息编辑窗体那么具体完成对入库信息的添加工作。如果是添加状态，那么在该窗体上可以添加一个新的入库清单资料。 出库管理相关界面设计出库管理窗体可进行对出库信息的管理工作，包括浏览所有的出库信息，通过添加功能键实现对出库信息的管理工作，以使仓库部门的管理员能够具有个管理出库信息的平台。出库信息编辑窗体那么具体完成对出库信息的添加工作。如果是添加状态，那么在该窗体上可以添加一个新的出库清单资料。库存管理相关界面设计库存管理窗体可以完成对库存信息的添加工作，包括浏览所有的库存信息。通过查找等功能键实现对库存信息的管理工作，以便仓库部门的管理员能够具有一个管理库存信息的平台。库存转移管理窗体可以对库存货物进行转移库位的操作。3.3 系统数据库设计根据前一节进行的系统分析可知，本系统的数据主要从库位、库存、入库和出库四个方面获取，为此，我们设计的库存管理子系统涉及4个数据表：库位信息表，库存信息表、入库信息表和出库信息表。库位信息表StoreRoom用来保存库位信息。表StoreRoom的结构如表3.1所示。表3.1库位信息表Table StoreRoom Information Form字段名称数据类型大小必填字段说明StoreID文本30是库位代号StoreRoom文本30是仓库Location文本30是位置Dercription文本30是库位描述库存信息表Store用来保存成为库存信息表。表Store的结构如表3.2所示。 表3.2 库存信息表 Table3.2 Store Information Form字段名称数据类型大小必填字段说明Item文本30是存货货号Qty文本30是存货数量StoreRoom文本30是仓库号Location文本30是位置号入库信息表StoreIn用存储产品入库信息。表StoreIn的结构如表3.2所示。表3.3 入库信息表 Table3.3 StoreIn Infromation Form字段名称数据类型大小必填字段说明StoreInID文本30是产品入库编号StoreInType文本30是入库类型Item文本30是货号UnitPrice文本30是单价Currency1文本30是货币Qty文本30是入库数量StoreRoom文本30是仓库Location文本30是位置FillinPerson文本30是经办人FillinTime文本30是入库时间表3.4 出库时间表 Table3.3 Takeout Time From字段名称数据类型大小必填字段说明TakeoutID文本30是产品出库编号TakeoutType文本30是出库类型Item文本30是货号UnitPrice文本30是单价Currency1文本30是货币Qty文本30是出库数量StoreRoom文本30是仓库Location文本30是位置FillinPerson文本30是经办人FillinTime文本30是入库时间实现各个功能模块后，将程序连接编译成系统的可执行文件，并运行系统进行总体测试通过运行程序首先进入登陆窗体，通过输入密码，验证身份后进入主窗体，在主窗体上有8个菜单项，分别对应各自的功能模块窗体，包括系统，库存管理，入库管理，出库管理，盘存管理，综合管理，附项管理，历史数据管理，打印和查询。需要哪个功能的时候就点哪个菜单，相对应的窗体会自动弹出：以下是本系统局部窗体的运行结果：运行系统打来登陆窗口，在登录窗口用户名中输入“ssh，初始密码是“123456”单击“登录按钮进入库存管理系统，单击“取消退出登录包含的控件有Label1，Label2，Text1，Text2 ，Command1，Command2，Text控件用于录入信息，Command是按钮控件图登录界面 Login主界面用到的控件主要是Label，用这一连接相关窗体，还有一Button按钮控件用于退出系统Fig The main interface4.3仓库管理相关界面：在主界面上单击【仓库管理】按钮进入仓库管理界面，在仓库管理界面上单击【添加】按钮将进入库位信息编辑界面。如图4.3这里使用到DataGrid控件来显示库位信息记录仓库管理界面Fig Storage Management Interface这一窗体主要用到的控件是TextBox，和Button图4.4仓库管理界面Fig Storage Management Interface同样在仓库管理界面上单击【修改】按钮也将进入库位编辑界面，不同之处在于修改时窗口自动载入已有信息。在修改ID是不可修改。在仓库管理界面上单击删除，将出现删除提示，确认后将删除选定仓库信息。4.4入库管理相关界面：在主界面上单击【入库管理】按钮进入入库管理界面，如下列图4.4所示使用到的主要控件有Label，DTPicker，ComboBox，DataGrid，Image，Adodc1DTPicker是显示要选择的日期，ComboBox是用于选择入库类型，Adodc1控件连接数据库，所连接到的数据库将在DataGrid中显示出来图入库管理界面 Storage management interface在入库界面上单击【填写入库清单】按钮将进入入库编辑界面，如图主要控件有Label， DataGrid， Adodc，ComboBox，TextBox入库记录通过DataGrid显示图入库清单界面 Warehouse inventory interface4.5出库管理相关界面：在主界面上单击【出库管理】按钮进入出库管理界面，如图所使用到的主要控件有Label，DTPicker，ComboBox，DataGrid，Image，Adodc1图4.6 出库管理Fig.4.6 TakeoutManage diagram在出库管理界面上单击【填写出库单】按钮将进入出库单编辑界面，如图使用到的主要控件有Label， DataGrid， Adodc，ComboBox，TextBox图 填写出库单Figure 4.7 Fill Chu Kudan4.6库存管理相关界面在主界面上单击【库存管理】按钮将进入库存管理界面，如图4.8所示所使用到的主要控件有Label， DataGrid， Adodc，ComboBox，TextBox图库存信息Fig.4.8 Stock Information所使用到的主要控件有Label， Adodc，ComboBox，TextBox，Image图4.9 库存转移Fig 4.9 Stock Transfer4.7 仓库信息查询，仓库查询报表是通过数据环境设计来实现的，添加一个Data Environment图 4.10 仓库清单Fig 4.10 warehouse inventory4.8入库清单查询 使用到的主要控件有Label，DTPicker，ComboBox，DataGrid，Image，图 入库查询Fig Query storage图2仓库清单界面2 Warehouse inventory interface4.9出库清单查询，所使用到的主要控件有Label，DTPicker，ComboBox，DataGrid，Image，Figure 4.13 Library check确定选择工程后单击【确定】按钮进入出库 出库清单Figure 4.14 Library List4.10 库位信息查询图4.15 库存清单Fig inventory5系统调试 实现各个功能模块后，将程序连接编译生成系统的可执行文件，并运行系统进行总体测试，如有错误将会自动中断运行，跳出调试窗口， 点击“调试，如代码错误，光标会显示在出错的地方，这时就可以进行相应的调试，纠正错误，调试完再次运行测试是否调试正确。通过屡次系统调试处理一些错误命令后才可使系统正常运行。6 总结与展望本系统采用Visual Basic 6.0开发工具,开发ERP系统中的库存管理子系统，它将完成出库部门日常信息的整理。至此，经过系统分析，设计和编码等过程，整个库存管理系统的开发已经完成。用户可以方便的得到整理后的报表，通过报表，可以直观地得到库存部门日常所需的各种信息，辅助做好整个企业的销售工作。但是各部门使用的管理信息系统各不相同，在数据共享方面的业务上出现很多复杂性的工作，所以在这一方面还有开发的空间。如果经过更周密的调查制定详细的企业信息化开展战略，在企业信息化道路上的投入将能满足ERP系统的实施致谢由于以前对Visual Basic的接触并不是很多，对它的开发环境不是非常了解，所以在程序的开发过程中遇到了很多的困难，但经过指导老师和同学的帮助，一一化解了困难，并从中学到了很多编程方面的知识。但是由于经验方面的原因，以及对库存方面的操作流程了解缺乏，该系统还有许多不尽如人意的地方和功能上的缺陷，这些都有待于进一步改善。本组能够顺利地完本钱次课程设计，首先要感谢陈开慧老师对我们的悉心培养和指导。其中，无论在理论上还是实践中，都给予我们组员很大的收获，使我们得到不小的提高。参考文献1 陈华. 库存管理系统中数据库的设计与实现J. 电脑开发与应用, 2021, (01)：58-69 .2 戴小波. 基于大型超市库存管理系统的设计方法J. 物流科技, 2007, (04)：125-178 .3 张莉萍. 库存管理系统J. 考试周刊, 2021, (01):45-85 .4 于艳秋. 库存管理系统的开发与设计J. 电大理工, 2004, (04) :458-462.5 叶绍松,阮祥发,赵燕. 基于SQLServer2000数据库的库存管理系统的设计与研究J. 机械设计与制造, 2006, (02) :236-258. 6 卢圣晶. 企业库存管理系统J. 科技广场, 2007, (11):147-189 . 7 薛惠,何栋. 企业库存管理信息系统的设计与实现J. 中小企业管理与科技(上旬刊), 2021, (01):364-382 . 8 陈园. 中小型民营企业的库存管理系统的设计J. 华商, 2021, (15) :201-232. 9 朱赟花. 零售企业商品库存管理J. 中外物流, 2006, (05):18-34 . 10 杨少东,刘喜双. 物流库存管理系统J. 中国高新技术企业, 2007, (09):104-137 .11 Kemp, Z.,Meaden, G. Visualization for fisheries management from a spatiotemporal perspective. Academic Journal,2021,(2):165-19812 Gattulli, Vincenzo, Condition Assessment by Visual Inspection for a Bridge Management System. Academic Journal,2021,(5):15-3213 Chvez, Ernesto a. policy design for spiny lobster (panulirus argus) management at the meso-american barrier reef system. Academic Journal,2007,(2):236-25614 Wolfe, Joseph, A study of business game stock price algorithms. Academic Journal,2007,(3):348-36415 George,Dallery, Base stock versus WIP cap in single-stage make-to-stock production-inventory systems.2021,(6):254-298附录1.登录窗口：Private Sub Command1_Click()txtsql = select * from admin where yhm= & Trim(Text1.Text) & Set sjy = exeSql(txtsql)If sjy.RecordCount = 0 ThenMsgBox 没有这个用户, vbOKOnly + vbExclamation, 信息提示Text1.Text = Text2.Text = Exit SubEnd IfIf Trim(Text2.Text) Trim(sjy.Fields(mm) ThenMsgBox 密码不正确！, vbOKOnly + vbExclamation, 信息提示Text2.Text = Exit SubEnd IfUnload MeEnd Sub2.FrmManStocks为系统主界面:响应【仓库管理】按钮单击事件: Private Sub LblStoreRoomSet_Click()End Sub响应【入库管理】按钮单击事件: Private Sub LblStoreinSet_Click()End Sub响应【出库管理】按钮单击事件 : Private Sub LblTakeoutSet_Click()End Sub响应【库存管理】按钮单击事件:Private Sub LblStoreRoomSet_Click()End Sub响应【仓库信息查询】按钮单击事件 Private Sub LblStoreQury_Click()DataReportStore.Show 1Room.CloseEnd Sub响应【入库清单查询】按钮单击事件 Private Sub LblStoreinQury_Click()End Sub响应【出库清单查询】按钮单击事件 Private Sub LblTakeoutQury_Click()End Sub响应【库存信息查询】按钮单击事件Private Sub LblStoreQury_Click()DataReportStore.Show 1End Sub窗体加载过程Private Sub Form_Load()Adodc1.ConnectionString = driver=SQL Server;server= + Trim(Server) + ;uid= + Trim(User) + ;pwd= + Trim(Password) + ;database=ERPAdodc1.RecordSource = select * from StoreRoomSet DataGrid1.DataSource = Adodc1Set DataGrid1.DataSource = Adodc1Refresh_StoreRoomEnd Sub【添加】按钮单击事件：Private Sub LblAdd_Click()FrmStoreRoomEdit.Caption = 添加库位FrmStoreRoomEdit.Modify = FalseFrmStoreRoomEdit.Show 1Refresh_StoreRoomEnd Sub【修改】按钮单击事件：Private Sub LblModify_Click()保存待修改记录的原始IDFrmStoreRoomEdit.OriStoreID = Trim(Adodc1.Recordset.Fields(0)把待修改信息添加到编辑窗口FrmStoreRoomEdit.TxtStoreID = Trim(Adodc1.Recordset.Fields(0)FrmStoreRoomEdit.TxtStoreRoom = Trim(Adodc1.Recordset.Fields(1)FrmStoreRoomEdit.TxtLocation = Trim(Adodc1.Recordset.Fields(2)FrmStoreRoomEdit.TxtDescription = Trim(Adodc1.Recordset.Fields(3)FrmStoreRoomEdit.TxtStoreID.Enabled = FalseFrmStoreRoomEdit.Caption = 修改库位信息FrmStoreRoomEdit.Modify = TrueFrmStoreRoomEdit.Show 1Refresh_StoreRoomEnd Sub【删除】按钮单击事件：Private Sub LblDelete_Click()Dim TempStoreRoomID As String保存待删除记录的ID TempStoreRoomID = Adodc1.Recordset.Fields(0)弹出删除确认对话框 If MsgBox(是否删除 + Adodc1.Recordset.Fields(1) + ?, vbYesNo, 确认) = vbYes Then MyStoreRoom.Delete (TempStoreRoomID) MsgBox 删除成功 End IfRefresh_StoreRoomEnd Sub刷新窗口的函数：Private Sub Refresh_StoreRoom() If Adodc1.Recordset.RecordCount = 0 Then LblModify.Enabled = False LblDelete.Enabled = False Else LblModify.Enabled = True LblDelete.Enabled = True End IfEnd Sub【返回】按钮事件Private Sub LblBack_Click()Unload MeEnd Sub【确定】按钮单击事件Private Sub LblOK_Click() 判断要编辑信息是否完整 If Check = False Then Exit Sub End If With MyStoreRoom 判断操作是添加还是修改 If Modify = False Then 判断为添加操作 判断采购员ID是否已经存在 If .In_DB(TxtStoreID.Text) = True Then MsgBox 库位ID重复，请重新设置 TxtStoreID.SelStart = 0 TxtStoreID.SelLength = Len(TxtBuyerID) Exit Sub Else .Insert 添加 MsgBox 添加成功 End If Else 判断为修改操作 .Update (OriStoreID) MsgBox 修改成功 End If End With Unload MeEnd Sub【取消】按钮单击事件Private Sub LblCancel_Click()Unload MeEnd Sub 【填写入库单】按钮单击事件Private Sub LblOK_Click() FrmStoreinEdit.Frame1.Caption = ComboType.Text + 产品选择从下表中选出入库产品 FrmStoreinEdit.Show 1 Refresh_StoreinEnd Sub【选择日期】按钮单击事件Private Sub DTDate_Change() Refresh_StoreinEnd Sub【选择类型】按钮单击事件Private Sub ComboType_Click()Refresh_StoreinEnd Sub【取消】按钮单击事件Private Sub LblCancel_Click() Unload MeEnd Sub附录：外文翻译In Wang Zuoliangs translation practices, he translated many poems, especially the poems written by Robert Burns. His translation of Burns “A Red, Red Rose brought him fame as a verse translator. At the same time, he published about ten papers on the translation of poems. Some argue that poems cannot be translated. Frost stresses that poetry might get lost in translation. According to Wang, verse translation is possible and necessary, for “The poet-translator brings over some exciting work from another culture and in doing so is also writing his own best work, thereby adding something to his culture. In this transmission and exchange, a richer, more colorful world emerges. (Wang, 1991:112). Then how can we translate poems? According to Wangs understanding, the translation of poems is related to three aspects: A poems meaning, poetic art and language. 1A poems meaning “Socio-cultural differences are formidable enough, but the matter is made much more complex when one realizes that meaning does not consist in the meaning of words only, but also in syntactical structures, speech rhythms, levels of style. (Wang, 1991:93).2Poetic art According to Wang, “Blys point about the marvelous translation being made possible in the United States only after Whitman, Pound and Williams Carlos Williams composed poetry in speech rhythms shows what may be gained when there is a genuine revolution in poetic art. (Wang, 1991:93).3Language “Sometimes language stays static and sometimes language stays active. When language is active, it is beneficial to translation “This would require this kind of intimate understanding, on the part of the translator, of its genius, its idiosyncrasies, its past and present, what it can do and what it choose not to do. (Wang, 1991:94). Wang expresses the difficulties of verse translation. Frosts comment is sufficient to prove the difficulty a translator has to grapple with. Maybe among literary translations, the translation of poems is the most difficult thing. Poems are the crystallization of wisdom. The difficulties of poetic comprehension lie not only in lines, but also in structure, such as cadence, rhyme, metre, rhythm, all these conveying information. One point merits our attention. Wang not only talks about the times poetic art, but also the impact languages activity has produced on translation. In times when the language is active, translation is prospering. The reform of poetic art has improved the translation quality of poems. For example, around May Fourth Movement, Baihua replaced classical style of writing, so the translation achieved earth-shaking success. The relation between the state of language and translation is so