超市零售管理系统总体设计

1、HYPERLINK N:整理后http：shu.nN:整理后http：shu.nHYPERLINK N:整理后ttp:wwwcN:整理后ttp:wwwc摘 要21世纪，超市的竞争也进入到了一个全新的领域,竞争已不再是规模的竞争，而是技术的竞争、治理的竞争、人才的竞争。技术的提升和治理的升级是超市业的竞争核心。零售领域目前呈多元进展趋势,多种业态:超市、仓储店、便利店、特许加盟店、专卖店、货仓等相互并存。如何在激烈的竞争中扩大销售额、降低经营成本、扩大经营规模，成为超市营业者努力追求的目标。此次我使用Vsual FoxPro .编程,实现了一个简易的超市零售治理系统。本系统通过对超市零售治理系统

2、进行需求分析和设计逐步将该系统的实现过程呈现出来。该系统能够对超市商品的入库和出库进行登记，同时还能对商品信息和价格进行查询。关键词:数据库;Visua oPro 6.;零售；查询目 录 TOC 13 z u HYPERLINK N:整理后l1 前言PAGEEF _Toc29578h1 HYPRINK l _oc29857802 1. 作业背景 AGRF Toc29801HYPERLINK N:整理后1. 选题讲明 PGEREF _To2985703hYERLIK l _Toc2857884 1.2.1 差不多思路 PAGRFoc9888 h 1HYPERLINK N:整理后l1.2. 作业目

3、标AERE _Toc295885 h 1 YELIN l_298578 .3 工作业绩 PAGEF _T98578086 h HPRIN l _Toc2985708713.1要紧收获 AGERF _To298578 h 2 RLI l oc29578088.3.2 自我评定 PEREF _Toc29857808 2HYPERLINK N:整理后2 系统总体设计 AGER Toc857889 3 HPERLINKl _To2957090 1系统结构图 PAGF _Tc8090 h HYPRLN l _To298789.2 数据库总体设计 PAGEREF _o287891 h 3 PERINK l

4、 Toc987802 .3 需求分析 GRF _oc29857892h 3HYPERLINK N:整理后24 所需的数据表 PGERF _Toc85793 h HYERLIN l _Toc29580942.4.1 所需的数据表结构 PERE Tc29857094hHYPERLINK N:整理后.5 建立项目 PAGEREF _c2985785 h 5 HYRLINl _oc2985096 建立数据库和数据库表 PGREF_Tc29578096 7HYPRLINKl _To29578097 3. 建立数据库 PAGERE To2987897 h 7HYPERLINK N:整理后l3.2 建立数据

5、表 PGERE _To2857098 7HYPERLINK N:整理后l4 表单的设计 AEREF_o2985099h HYERLINK l_Tc98578100 . 登录表单设计 PGREF _oc9881 h8 HYPERLIN l _c9857811 4.2 商品入库出库输入表单设计AGEEF_Toc9851 8ERLIN l _Toc985810 42.1商品入库表单设计 PAGREF Toc298578102 h 8 HYPLINK l _Toc29857103 4.22商品出库输入表单设计 PAEREF_o2988103 h 0 HYPLINK l _Toc2878104 43 商

6、品价格查询表单设计 PAGREF To2578104 h 12HYPERLINK N:整理后l4.查询表单设计 PAGEREF _Tc28578105 h 2HYPERLINK N:整理后l4.3.2信息修改表单AEEF_To858106 1HYPERLINK N:整理后l.4 销售表单设计AGEREF Toc2985707 h YPERLNK l _To29857108 4.4.1销售价格信息表单设计 AEREF _c28108 hHYPEINK l_Toc8578109 .2表单销售汇总表设计 PAGEEF _oc985789 27HYPERLINK N:整理后l5 主程序和系统连编 PA

7、GEEF _Tc9878110 h30HYPERLINK N:整理后 l _Toc29581115.1 主程序设计 PAGERE c29571 h3 HYPERLINK l_Toc287112 5.系统连编 PAEE Toc957812 h 31HYPERLINK N:整理后结束语 PGER _c878113 32HYPERLIN l _Toc2957114 参考文献 AGERF Toc28581 h 31 前言1.1 作业背景本文依照数据库应用与开发课程要求而做。课程作业要求如下:用数据库治理系统开发工具(sual Foxro）开发一个有用的小型治理信息系统。依照课程设计时刻选择适当规模大小

8、的设计题目，按照系统开发的流程及方法,踏实地开展课程设计活动。课程设计活动中，撰写相关技术文档。最后提交详细的课程设计报告。开发出可上机运行的治理信息系统,通过上机检查。1.2 选题讲明要在有限的两周时刻设计出一个小型的超市零售治理系统,考虑到我们知识面和视野以及信息系统的价值性,我决定设计一个日常生活中比较常见的超市零售治理系统。那个系统能够对大学生成绩进行查询和治理,比较贴近我们大学生的实际,具有较强的可行性、实践性和价值性。1.2 差不多思路设计该系统时,采纳自底向上的设计方法。首先设计数据结构,然后设计表单、菜单、报表，最后设计主程序。12.2 作业目标要实现对超市商品信息和销售价格的

9、治理,应该有库存治理和价格查询功能。要退出系统，需要有退出功能。假如想打印价格表,应该提供打印功能。因此超市使用本系统，能够迅速提升超市的治理水平，降低经营成本,提高效益，增强超市扩张力,提供有效的技术保障。13 工作业绩 31要紧收获通过这学期对数据库这门课的学习，我对数据库有了差不多的了解。学会了如何样制作表单,菜单等内容,这对以后的学习工作有了专门重大的关心。我通过这两周的课程设计:课程设计的选题，构思，讨论,分配任务，设计程序等工作，其中遇到了专门多的困难,然而没有放弃,解决问题，排除困难，这才一步步完成每个任务，还使我掌握了使用各种关系数据库为后台数据库设计一个信息治理系统。总之,这

10、次课程设计受益匪浅，不仅锻炼了我做事坚持不懈的心态，也慢慢地培养了我不明白就查书的好适应，我的自学能力也有了一定的提高，我更明白了搞计算机程序设计,要学到真正的技术完全要靠自己，在课堂上只能学到最差不多的东西，但这最差不多的东西也一定要学好。1.3. 自我评定 优 良 中及格 不及格2 系统总体设计2.1系统结构图开发该系统前,先要有一个清晰的系统总体功能图。在超市零售治理系统中,由项目治理器统一治理系统中的表单、数据表、程序、报表以及主菜单。系统的整体结构是先运行主程序。表单和报表中的数据来自数据表中的数据。如图2.图21该系统应包括如下几个功能模块，功能模块结构如下图所示（1）输入单据:出

11、库、入库、产成品清单(）查询:出库查询、入库查询、产成品查询()销售：销售费用、销售退款、进/退货(4)打印报表:入库报表、出库报表。2 数据库总体设计进行数据库总体设计首先要进行需求分析,由需求确定系统所需要的数据表，然后确定表所需的字段,最后确定各个表之间的关联。23 需求分析超市销售治理系统要紧包括商品入库出库情况登记、商品信息及价格查询和销售业绩汇总等功能。每个功能都要通过表单和报表来操作数据表中的数据，每个数据表存储了本系统所需要的数据信息。因此在进行数据库设计之前,要分析出系统所需要的数据表。.4 所需的数据表分析超市零售治理系统的情况,首先需要了解商品的差不多信息，即需要差不多状

12、况表。用户需要查询商品的生产厂商和价格等信息,因此需要的数据表有商品入库表、商品厂商信息表和销售表等。2.4.1 所需的数据表结构 表1：入库单 字段名 数据类型 长度（字节)备注 入库编号文本 20主键 商品型号 文本 2 计量单位 文本 单价 货币 16 数量 数字 金额 货币 6 生产厂商 文本 0外键 出厂日期日期16 仓管员 文本 20 外键表2：厂商信息表 字段名 数据类型 长度(字节)备注 厂商编号 文本 20 主键 厂商名称 文本 50 厂商地址 文本 5 联系电话 数字 法人地表 文本 20 表：销售单 字段名 数据类型 长度(字节） 备注 单据编号文本 20 主键 商品型号

13、 文本 2 计量单位文本 8 单价 货币 数量 数字 金额 货币6 生产厂商 文本50外键 销售日期 日期 6 营业员 文本 20 外键 表：进货单 字段名 数据类型 长度（字节）备注 单据编号 文本 20主键 厂商编号 文本 外键 进货厂商 文本50 商品型号 文本 计量单位 文本 8 单价货币 16 数量数字 1 金额货币 16 进货日期 日期 采购员 文本 20外键 备注 备注 20 2.5 建立项目项目治理器是val foxro 提供的强大的治理工具，它负责治理和组织本系统所需要的数据库、菜单、报表、表单、程序以及一些其他的文件，它是系统中文件、数据、文档和对象的集合。项目治理器共有个

14、选项卡,分不是【全部】选项卡、【数据】选项卡、【文档】选项卡、【类】选项卡、【代码】选项卡和【其他】选项卡。每个选项卡按一定的顺序和逻辑关系治理着项目中的文件。项目文件以扩展名.pjx和pjt进行保存。通过项目治理器,用户能够快速、方便地存取存放在项目文件中的任何对象。建立项目治理器的步骤如下所示。（1)启动visual fopo,进入程序主界面。单击菜单栏的【文件】 【新建】命令，在弹出的【新建】对话框中选择【项目】单选按钮,如图2.2。图2.2单击【新建文件】按钮。在弹出的【创建】对话框中设置一个文件名,文件名设为大学生成绩查询系统，单击【保存】按钮后即可弹出【项目治理器】对话框，那个新项

15、目就在项目治理器中建立起来了,如图23。图33 建立数据库和数据库表3. 建立数据库首先创建数据库,在项目治理器中创建数据库，保存数据库名为【销售治理.c】。3.2 建立数据表我们要在数据库中建立表。在数据库设计器中建立商品入库出库输入表、商品信息表、商品价格表为了保持表中数据的一致性,需要在各数据表之间建立参照完整性。当插入、删除或者修改表中记录时,就会参照引用相关联的另外一个表中的数据。关系数据库治理系统一个重要的功能确实是参照完整性。必须先建立表之间的关系的,才能使用参照完整性。4 表单的设计4.1 登录表单设计图.1登录表单提供销售者登录接口。销售者只有输入了正确的用户编号和密码,才能

16、登录进入系统。该表单使用差不多情况表,其界面如图4.所示。4.2 商品入库出库输入表单设计42.1商品入库表单设计 、表单（输入入库单据)实现功能：可通过那个表单将商品的相关信息输入，例如编号、单价、数量等, 起到一个存储信息的作用，方便以后查询、总结等工作需要。实现过程：实现过程:单击“文件”下拉菜单,再点击“新建”,选择“表单”，再单击“新建文件”后开始表单输入入库单据的设计。如图.2图4.2设计界面如下:入入库单据的设计的差不多结构如图.：图43“输入”按钮代码=ntm(vl(atri(iform.tex5.aue)=allrim（thisfr.Tt6.alue)g=altrim(hsf

17、orm.tex7.vue)h=vl(trim(thfrm.tt8.valu)i=ctd(allim(thisform.Text9.vau)）if mpty（a).o.epy(）orempty().or.epy(d）.or.epty(e)rempty(）or.empty().orempt(h)o.py（i)messgebx(请输入完整信息) rturnndifinrt ino表入库单；(入库编号,商品型号,计量单位，单价，金额，生产厂商,仓管员,数量，出厂日期) valu(a，b,c,，f,g，h，i）z0can for 商品库存表.商品型号=b =nscnsef z1updat 商品库存表 s

18、 数量=数量+ whee商品型号=mesagebo(输入入库单据成功！,64,系统提示) eturnseine ito 表商品库存表; (商品型号,数量) vale (b,h） iser into 表商品资料单;(商品型号) value () messgeox(你所输入的是新商品,请输入商品名称) use form 表单输入新商品名retrnedif“取消”按钮代码Thiorm.reese.2.2商品出库输入表单设计实现功能:可通过那个表单将出库的商品相关信息输入，例如编号、单价、数量等， 起到一个存储信息的作用，方便以后查询,总结等工作需要。实现过程:单击“文件”下拉菜单，再点击“新建”，选

19、择“表单”,再单击“新建文件”后开始表单输入入库单据的设计。设计界面如下：输入入库单据的设计表单如图4.4图4.“输入”按钮代码aatrim(thisrm.tx1.vu)b=altrim(thisorm.Tet2.valu）c=lltrim（thisfr.tet3vlue)=nto（val(llti(thisrm.xt4.valu)entom(va（alltrim（thsform.tet5.alue)f=ltrim(thsorm.Txtva)g=alltrim(tsfom.tex7valu)h=val(alltim(thormtext8value)）ito(alrm(thiso.ext9val

20、u)if empty(a).or.empt(）.or.epty（).py（d）epy(e).or.empty(f).or.emty（g）.or.mpty(h）epty(i) messagox(请输入完整信息) reurnend0 x0use 表商品库存表sca fo 商品库存表商品型号bz=1x=数量endscaif z=0essabox(库存不足,无法出库！)leif x mesebo(库存不足,无法出库！） else pate 表商品库存表set 数量=数量-h hre商品型号= insert into出库单; (出库编号，商品型号,计量单位，单价,金额,生产厂商，仓管员，数量,出库日期)

21、vlue(a，b,c,d,e，f,g,h,i) esgeo(输入出库单据成功！，4,系统提示)ifendif取消按钮代码iform.rase.3 商品价格查询表单设计4.3.1查询表单设计1、项目详细设计查询模块：出库查询、入库查询、库存查询、商品资料查询例：入库查询表单如图5图4.2、界面操作讲明：按钮操纵策略:组合框内有9个选项，编辑框为空，查询按钮及取消按钮一直为亮。查询处理过程:此查询为模糊查询，按下组合框内的选项，在编辑框内输入内容,点击查询,屏幕上将显示一系列与输入内容相关的记录。取消后将返回原界面。注意:出厂时刻的输入需要符合格式才能正确查询，否则将出现运行错误的提醒。3、项目具

22、体实现例:入库查询表单本表单用于查询入库商品情况。在组合框中选择要查询的条件，如入库编号、商品型号等,在文本框中输入信息,按查询按钮,即可显示出相关信息。如若输入信息有误则会有信息“数据库中不存在您所要查询的记录”提示。而按取消键则返回到主菜单。在表单上设计如下事件过程:、新建表单form1，并将其aption属性值设为“入库查询”,width属性值设置为290,heigt属性值设置为175,AuoCeter属性值设置为.，并将其保存为“入库查询.sc”。2、向表单添加一个gi控件，并将其dth属性值设置为290,heigh属性值设置为1。、在grd控件的下方添加一个组合框控件Comb1和一个

23、文本框控件, 并将组合框控件的RowSourcp属性值设置为“8-结构”,RowSu属性值设置为“入库单”。4、在文本框的右侧再添加两个命令按钮commad1和commn，并将commnd1和comad2的caption属性值分不设置为“查找”和“取消”。5、对表单上各控件的位置进行适当的调整,调整后的表单设计器如图4.6图重点:（1)“查找”按钮(command1） 的ic事件如下 :i emty(tisorm.Tet.vu)=.gotophiorm.omb1value=alltrim（thifom.Tet1vale）locee if =入库编号 Slec*fro 入库单 whee 入库编号

24、 lkeb +% inoso bas sele bs c=rccut（) if 1 (图“查询”按钮（comd）的click事件如下: use msgebox（数据库中不存在您所要查询的记录,系统提示) thisrmcomand2clik() eturn endif edif if a商品型号 lt * frm 入库单 hre 商品型号 ke b+% into cusor bas le bas c=ccount（） i 1 ue messgebox(数据库中不存在您所要查询的记录,16，系统提示) d2.lck（) rtun eni nf if a计量单位 Slec * m 入库单 here

25、计量单位 ik b+% no cursor ba selebs =recn() i cue mesagebx（数据库中不存在您所要查询的记录,1，系统提示） thmand2click() reurn endifend f a=生产厂商 ect* fro 入库单 whr 生产厂商 like +% itocrsor bs selebs ceccout() c us messgebx(数据库中不存在您所要查询的记录,16,系统提示) thsformcomnd.cli() rtrn endif edi fa=仓管员 Selct * fom入库单whr 仓管员 lkeb+into curor b sel

26、e bas c=rccout（) f1 us messgebox（数据库中不存在您所要查询的记录,16,系统提示) thifmand2lick() tur endif ndi if a=单价 b=nm(al(alltm(thisform.text1.alue）)） Select from入库单whre 单价 =b ito crsor bas sl bas c=ccoun() f c1 e essagebx(数据库中不存在您所要查询的记录,16,系统提示） mand2ick() etun endf enifif a=金额 b=ntom(val(alltrim(thifor.tet1.vaue)

27、Select * from 入库单 where金额 b no csr ba s c=reccoun（) if c1 use messagex（数据库中不存在您所要查询的记录,16,系统提示） hsfrmcommand2.clck() reurn edi endif =数量 val(alltrim(thisfomtex1.vle) Select * from 入库单wher数量 =b nto curso as selebas crnt() i 1 se messageox(数据库中不存在您所要查询的记录,16,系统提示) thisformommand2click() ren endif edf

28、if a=出厂日期 b=ct(allti(tsfo.text1.valu) Seec * frm 入库单 whee 出厂日期 =binocr bs selebas c=reccunt（) if c1 ue ssabox(数据库中不存在您所要查询的记录，16,系统提示) hisformcomm2.lick() reurn endif endif ih hisform.gd入库单 .idt=58 .heght=200 .left=10 .recrdsourcebas .deetmrk=.f. .visible=.t. .eadnl=t.ColumnCut .olumn1.HaerCaptin=入库

29、编号 .olun1Heaer1BackCoor=RB(55,25，19) .Colun2.Heade.BcCoo=RG（25,25,190) .Coumn2.Header1.aption=商品型号 .Coumn3Her1.BackClor=GB(255,25，10) Colmn.Hader1.aton=计量单位 .Colmn.eade.BackCl=RGB(5,25，190） .Colum4.Header.Caption=单价 .Column5.eader.Bckolor=GB(25，25,90） .Column.Hader1.Capin=数量 .Column6.eader.cCor=RB（2

30、55,255，10) .Colmn6.er1.Capton=金额 .Clmn7.Hade.Bakolr=GB(2,255，10) .Colun7.eade1.Cption=生产厂商 .Clumn8.Header1.Bckoor=RB(25，5,19) .Coumn8.HeaderCapton出厂日期 .Colun9.Hader1akColor=G(25,55,10) .Coum.Headerati=仓管员 .Colun1with=0 Colum2.widh=8 Coumn3width=0 .Cln4.width=8 .Cou.wdth .Column6.width=80 .Colun7wid=

31、0 omn8.idth=0 .Column9width80endwithto.gr入库单.Seall(ynicaCoor,RGB(24,225，25),Col） tisform.gd入库单.stfocuselse mesaebo(请输入要查找的内容！，1,系统提示) sfrmText1.vle= thisfrm.Text.Setfcusnf取消”按钮（cmmnd2)的cick事件如下：Thiom.rlease下图为查询模块其余的出库查询、库存查询和商品资料查询的界面设计，其制作过程与入库查询相似。如图47和48图7图4.8.2信息修改表单1、项目详细设计修改模块:出库修改、入库修改、商品资料修

32、改例：入库修改 如图49图42、界面操作讲明：按钮操纵策略:查找方式组合框共有个选项,查找内容为空，查找、修改、取消按钮一直为亮。修改处理过程:需要修改时,在组合框中选择要查找的条件,在文本框中输入相应信息(输入信息要正确,否则系统会出现错误提示），按按钮查找，即下面的文本框中会出现所要查找的记录的详细信息(其中入库编号是固定的)。对相应信息进行修改后,按按钮修改，即可保存修改好的信息。、项目具体实现例：入库修改本表单用于对入库商品的相关信息进行修改。在组合框中选择要查找的条件,在文本框中输入相应信息（输入信息要正确,否则系统会出现错误提示），按按钮查找,即下面的文本框中会出现所要查找的记录的

33、详细信息（其中入库编号是固定的)。对相应信息进行修改后，按按钮修改，即可保存修改好的信息。按取消按钮则返回主菜单。本表单使用的数据环境为入库单和厂商信息表。在表单上设计如下事件过程:1、新建表单fom1,并将其cpto属性设置为“入库修改”，wdth属性值设为20,eigt属性值设为2，AutoCnter属性值设为.t.,并将其保存为“入库修改.scx”。2、向表单添加一个grid控件，将其readonl属性设置为.t，其RecdoucType值采纳默认的“1-不名”,在表单设计器中将其宽和高粗略调小一些即可,具体属性值我们将在表单的int事件代码中对其进行设置。3、在i控件下方添加两个Lab

34、e控件,使其排成一行,并将其caption属性依次设为“请选择查找方式”和“请输入要查找的内容”。4、在abel控件下方添加一个组合框控件Com1及一个文本框控件Text1,文本框控件的属性值采纳默认即可,组合框控件ombo1的owSorceType属性值设置为“值”,RwSoure属性值设置为“入库编号、商品型号、计量单位、单价、数量、金额、生产厂商、生产日期和仓管员”,如此在运行时我们能够在该组合框中选择要查询的字段。5、在表单上添加3个命令按钮oman1omand2和commad,将其cpton属性依次设为“查找”、“修改”和“取消“。6、在命令按钮下方添加9个l控件，将这9个ae控件排

35、成两行，并将其cption属性依次设置为“入库编号”、“商品型号”和“计量单位”等等。7、在这两行label控件下方添加9个文本框控件,属性值采纳默认,并把这9个文本框排成两行。8、调整表单上各个控件的位置,调整后的表单设计器如图40重点：图4.0“查找”按钮(cmmand）的i事件如下：if mty(thior.ext1value）.f. go topatisform.mbo1valueb=alltim(hisfm.Text1.ale）c=.f if =入库编号 loatfr 入库编号=b feo()messaebo(数据库中不存在您所要查询的记录,16,系统提示) gotop rturn

36、ele (图） c=.t ndif enif if a=商品型号 locate or商品型号=b if eof() egbx(数据库中不存在您所要查询的记录,16,系统提示) go to rturn es =. ndf endif ifa=计量单位 ocate fo 计量单位=b （) msagebox(数据库中不存在您所要查询的记录,16,系统提示) go tp reurn es =. ndif endif f a=单价 b=ntom（val(lltim(thsformtext1.value) oae for 单价= if (） ssaebox(数据库中不存在您所要查询的记录,1,系统提示）

37、 o top reun ele .t enif eniff a=数量 b=vl(altrim(thisform.text1alue）) lcate or 数量= i eof（) mesgebo(数据库中不存在您所要查询的记录,，系统提示) g op reurn se c=.t. endf ndif if a金额 =ntom(v（lltm（thsfomtext1.au) oct for 金额 if (） messgeb(数据库中不存在您所要查询的记录,16,系统提示) go top retur ls c= endif enff a=生产厂商 ocat or生产厂商=b ieof() messae

38、box(数据库中不存在您所要查询的记录,16，系统提示) go top reurn ele . nif endif if=出厂日期 b=cto（va(alltri(thiform.text1value) oct or出厂日期=b f o（) messaebox（数据库中不存在您所要查询的记录,16,系统提示） goop return se t. edif ndi i=仓管员 lateor仓管员=b f eo(） essgebx(数据库中不存在您所要查询的记录,1,系统提示) top rtun ee c=.t endif edif fc tior.ext1.eale=.f. grecno() t

39、hfom.xt2visible=.t. thiform.ext2.nabld=.f. tisform.ext3.visibl.t. thisfrm.ext4.visible. tisfrm.Text5.iile=.t. thiorm.Text6.visibe=. thisfrm.Txt7.visile=.t. hisorm.Text8.sbl=.t hisfor.Text9.visble=.t. thsform.Tet0.visl.t. hifor.Label.visible.t. tiformlabel4.viib=t thisform.Labelisilet thirmael6.vibe.

40、t. thisfrm.ael7.vsib=.t. thisform.Label8.visible=. thiformLabel9.vsile=. thsfoLabe1.visible=.t. thisobe1.ible.t. tsforTex2.alue=入库单.入库编号 thifom.t.lue=入库单商品型号 tsfor.et4.vale=入库单.计量单位 thsformex5.value=入库单.单价 thisform.ext6value=入库单.数量 hsfomText7.valu=入库单.金额 thisformText8.ale=入库单生产厂商 hisforTet.value=入库单

41、.出厂日期 thsorm.Tet1.alu=入库单.仓管员 thiorm.r入库单.setfocus thisnab=.f isfomand2.ealed=.t. endiesemessagebox（请输入要查找的内容!，16,系统提示) thisom.Te1.alue= thisform.Txt1Setfcusedfhisfrmrfreh“修改”按钮的lick的事件如下:tisfo.tet3readonly.thiform.textreadony.f.thisortext5eaonly.f.thsform.txt6radnly=f.tiform.tet7.readol.f.thisr.tt8

42、.readoly=.thsfom.tex9.readony=.f.thirmtext0.reanly=.“取消”按钮的cck的事件如下:thisorm.elase下图4.11为修改模块的其余的出库修改和商品资料修改的界面设计,其制作过程与入库修改的制作过程相似。图4.114.4销售表单设计4.1销售价格信息表单设计表 销售单 如图.1、43、4.字段名数据类型长度(字节）备注单据编号文本20主键商品型号文本0计量单位文本8单价货币16数量数字16金额货币16生产厂商文本50外键销售日期日期16营业员文本20外键图.12图4.3图41表 退货单 如图4.5字段名数据类型长度(字节）备注单据编号文

43、本0主键商品型号文本0计量单位文本单价货币8数量数字16金额货币16退货日期日期1图4.154.4.表单销售汇总表设计实现功能:商品正常销售治理。销售情况的明细记录、各地收银员收银记录以及交结帐情况等，实现对数据库添加销售记录 。实现过程：单击“文件”下拉菜单,再点击“新建”，选择“表单”,再单击“新建文件”后开始表单输入入库单据的设计。如图4.图4.16设计界面如下:表单销售情况记录表的设计的差不多结构如图4.17：图4.17数据环境(如图4.1)图418“输入”按钮代码:对象：con 过程：clicka=altri（hiform.tt1.vue)balrim（thisformet2.ve）c=alrm（thiformtx3.vau）=ntm(vl(allti(thsfor.Text4.vle)e=nto（l(altrim(tifomtet5value)faltri（ifrm.Txt6.vaue）gllri(thisformte7.value)h=al(allt