精编餐饮管理系统设计

课程设计报告课程名称： PowerBuilder10.5程序设计基础设计题目： 酒店餐饮管理系统 专业：信息与计算科学班级: 姓名： XXXX学号：XXXXXXXX指导教师：XXX XXX学院数理系XXXX年XX月课程设计题目（问题）描述随着人们生活的富裕，人们出入酒店也越来越多，随之而来，酒店管理人员管理酒店的事情越来越多，为了帮助酒店管理人员更好的管理酒店，我们设计了这个酒店管理系统。它实现了对值班人员的调配与管理和对菜单的变更，以及对订餐，订餐的修改、取消、查询及在收费时的立账，打折设定的等方面的功能。本组成员情况姓名学号承担的任务成绩杜雅笛2012314201登陆界面、系统维护、打印、帮助模块的代码编写及系统的调试郭晓丽2012314206登陆界面、订餐管理、收费管理模块的代码编写及系统的调试莫鹏飞20123142资料查询、登陆界面、代码编写及系统的调试20教师评语签名：注：本设计报告中各个部分如果页数不够，请大家自行扩页，原则是一定要把报告写详细，能说明本组设计的成果和特色，能够反应小组中每个人的工作。报告中应该叙述设计中的每个模块。设计报告将是评定每个人成绩的一个重要组成部分。一、本组设计的功能描述（含所有实现的模块的功能）登录界面的功能：在登陆界面正确输入用户名与口令就可以登陆主界面，如用户名与口令不匹配则有提醒,点开免费注册界面，可以录入新的管理人员的信息，退出注册界面输入刚注册的用户名和口令就可登陆主界面。系统主界面的功能：•系统维护：☆值班员信息维护：实现对值班员的添加、删除功能☆菜谱信息维护：实现对已有菜单的查询、添加和删除☆修改口令：实现对用户口令的更改。•订单管理：☆订餐：实现对订餐信息的添加☆订餐修改：实现对已经订餐的信息的修改☆订餐取消：实现对已经订餐的信息的取消☆订餐查询：实现对订餐订单按桌号、菜谱号、菜名的查询•收费管理：☆折扣设定：实现了对用餐人员的折扣设定☆客户信息：显示客户信息•打印：☆打印客户消费账单二、本组设计的主要特色主要特色有如下：1、 登陆界面可以注册新用户2、 在登陆主界面是弹出交班管理制度的界面3、 可对值班人员、菜谱信息进行添加，删除4、 可对订餐情况进行添加、删除、查询等功能5、 对客户的费用进行打折，打印客户消费单、系统分析与设计2.1数据库的设计与连接（1）在SQLSEVER2005开发环境下打开对象资源管理器，依据创建数据库的步骤，创建物理数据库XSCJ,在PowerBuilder开发环境下打开数据库画板，依次定义 ODBC数据源,定义DBProfile，连接数据库。根据功能需求，在数据库中先创建5个表列名数据类型可否为空说明DC_DESKChar(20)Notnull桌号（主键）CP_NOChar(10)Notnull菜谱号CP_NAMEChar(20)null菜名DC_NUMBERChar(3)null数量DC_DATEdatetimeNull订餐日期表1订餐信息表DC列名数据类型可否为空说明CP_NOCHAR(10)NOTNULL菜谱号（主键）CP_NAMECHAR(20)NULL菜名CP_KINDCHAR(20)NULL种类CP_PRICENUMBER(10)NULL价格CP_DETAILCHAR(50)NULL备注表2菜谱信息表CP

列名数据类型可否为空说明KH_NOCHAR(20)NOTNULL客户号（主键）DC_DESKCHAR(20)NULL桌号JS_DZCHAR(3)NULL打折情况TOTALCHAR(5)NULL总计JS_DATEDATETIMENULL日期表3结算信息表JS列名数据类型可否为空说明KH_NOCHAR(10)NOTNULL客户号（主键）KH_NAMECHAR(20)NULL姓名KH_SEXCHAR(2)NULL性别KH_AGECHAR(3)NULL年龄KH_JOBCHAR(20)NULL职务KH_TELCHAR(20)NULL联系电话KH_COMPANYCHAR(20)NULL工作电话表4荣誉客户信息表KH列名数据类型可否为空说明ZBY_NAMECHAR(20)NOTNULL值班员名(主键)ZBY_PAWDCHAR(10)NUTNULL口令表5值班员表ZBY实体和实体之间的关系E-R图系统详细设计单击菜单“File|New”，选择应用程序对象模板画板，单击“0K”按钮在出现的对话框中完成应用程序对象名、库文件名的设置 •单击“Finish”按钮，进入应用程序对象设计画面。1、 在应用程序对象的Open事件中输入如下的程序代码//ProfilejiudianSQLCA.DBMS="ODBC"SQLCA.AutoCommit=FalseSQLCA.DBParm="ConnectString='DSN=jiudian;UID=;PWD=”'connect;open(w_open)sleep(1)close(w_open)open(w_login)该语句就是打开w_open窗口的语句。“欢迎登陆餐饮管理系统”如图：2、 登录窗口的设计。登录窗口如图⑴在W_login窗口的Open事件中输入如下的程序代码Environmentl_envintl_ScrWidth,l_ScrHeightsetRedraw(false)GetEnvironment(l_env)//取得屏幕的高度和宽度l_ScrWidth=PixelsToUnits(l_env.ScreenWidth,XpixelsToUnits!)l_ScrHeight=PixelsToUnits(l_env.ScreenHeight,YpixelsToUnits!)Move((l_scrwidth-this.width)/2,(l_scrheight-this.height)/2)//移动窗口到屏幕中间setredraw(true)//打开窗口刷新⑵按钮控件cb_1(确定)的Click事件中的程序代码如下:stringl」d,l_passwardstringl_passwardOintil_id=trim(sle_1.text)l_passward=trim(sle_2.text)ifl_id=""thenmessagebox("提示"，”请输入用户名r‘)returnendifsle_1.setfocus()ifl_passward=""thenmessagebox("提示","请输入密码r‘)returnendifsle_2.setfocus()selectcount(*)into:ifromzbywherertrim(zby_name)=:l_idusingsqlca;ifi<1thenmessagebox("提示"，”该用户不存在!")sle_1.text=""sle_2.text=""sle_1.setfocus()returnendifselectzby_pawdinto:LpasswardOfromzbywherertrim(zby_name)=:l_idusingsqlca;iftrim(l_passwardO)=l_passwardthenopen(w_main)close(parent)integerli_FileNumstringls_Emp_InputIongll_FLengthll_FLength=FileLength("D:\MicrosoftSQLServer\1.txt")li_FileNum=FileOpen("D:\MicrosoftSQLServer\1.txt",StreamMode!,read!,shared!)IFll_FLength<32767THENFileRead(li_FileNum,ls_Emp_Input)filewrite(li_FileNum,ls_Emp_Input)messagebox("",ls_Emp_Input,None!)returnENDIF//显示交班管理制度elsemessagebox("警告","密码错误，请重新输入法!")sle_2.text=""sle_2.setfocus()endif按钮控件cb_2(取消)的Click事件中的程序代码如下:Halt用于终止应用程序的执行⑷按钮控件cb_3(免费注册)的Click事件中的程序代码如下：open(w_zhuche)用来打开注册窗口.交班管理制度显示的制作。(5)在该系统文件目录下新建一个” 1.txt”在里面输入相应的内容在登录窗口的cb_1(确定)下的代码integerli_FileNumstringls_Emp_InputIongll_FLengthll_FLength=FileLength("D:\MicrosoftSQLServer\1.txt")li_FileNum=FileOpen("D:\MicrosoftSQLServer\1.txt",StreamMode!,read!,shared!)IFll_FLength<32767THENFileRead(li_FileNum,ls_Emp_Input)filewrite(li_FileNum,ls_Emp_Input)messagebox("",ls_Emp_Input,None!)returnENDIF这段代码就是在进入系统时显示该信息，如下图，注册窗口的设计在”检测用户名”按扭控件的click事件中输入如下代码：stringl_userl_user=sle_1.textifl_user=""thenmessagebox("警告","请输入用户名!",Exclamation!)sle_1.setfocus()returnlendifintiselectcount(*)into:ifromZBYwhereZBY_NAME=:l_user;ifi>0thenmessagebox("警告","用户名已存在，请重试!",Exclamation!)sle_1.text=""sle_1.setfocus()returnelsemessagebox("","恭喜你，该用户名可以使用!")returnendif在”提交”按扭控件的click事件中输入如下代码stringl_userl_user=sle_1.text

ifsle_1.text=""thenmessagebox("提示"，”请输入用户名r‘)returnlendifstringaa,bbaa=sle_2.textbb=sle_3.textifaa=""then请重新输入!")messagebox("提示"，”密码不能为空r‘)请重新输入!")messagebox("提示","输入的密码不一致~n~rsle_2.text=""sle_3.text=""sle_2.setfocus()returnendifinsertINTOzby(zby_name,zby_pawd)VALUES(:l_user,:aa)usingsqlca;ifsqlca.sqlcode=Othenmessagebox("提示","注册成功，请牢记~r~n用户名"+sle_1.text+"~r~n 密码"+sle_2.text)close(parent)elsemessagebox("提示"，”注册失败!")returnendif⑶在”取消”按扭控件的click事件中输入如下代码:close(parent)主菜单的设计“系统维护”菜单下“退出”子菜单的 Click事件程序代码：halt其功能是关闭主窗口w_main，退出应用程序。“系统维护”菜单下“值班员信息维护”子菜单的 Click事件程序代码：open(w_zby)“系统维护”菜单下“菜谱信息维护”子菜单的 Click事件程序代码：open(w_choose_receive)“系统维护”菜单下“修改口令”子菜单的 Click事件程序代码：open(w_changekl)“订餐管理”菜单下“订餐”子菜单的 Click事件程序代码：open(w_dc)“订餐管理”菜单下“订餐修改”子菜单的 Click事件程序代码：open(w_ujttyyytt)“订餐管理”菜单下“订餐取消”子菜单的open(w_dc_qc)“订餐管理”菜单下“订餐查询”子菜单的open(w_dc_search)“订餐管理”菜单下“订餐取消”子菜单的open(w_dc_qc)“订餐管理”菜单下“订餐查询”子菜单的open(w_dc_search)“收款管理”菜单的“折扣设定”子菜单的Click事件程序代码:Click事件程序代码:Click事件程序代码:open(w_zksd)“收款管理”菜单下的“客户信息”子菜单的 CLICK事件程序代码：open(w_kh)“打印”菜单的“打印帐单”子菜单的 Click事件程序代码：open(w_print)“帮助”菜单的”版本信息”子菜单的Click事件程序代码：open(w_help)快捷键及工具栏如图所示。还要建个w_main窗口用来挂上菜单。该窗口类型为mdihelp!。Title为酒店餐饮管理系统1.0。另外在窗口上布置一个图片控件，用来做为系统的背景。在登录窗口的“确定”按扭的click事件中有句open(main)的代码，即为打开此窗口。值班员信息维护窗口w_zby的设计该窗口上的控件好上图所示，其显示部分是一个数据窗口。数据窗口对象zby在编辑状态下如下图，dw_1.deleterow(dw_1.getrow())dw_1.deleterow(dw_1.getrow())〃 删除当前行"■■.IMi,I(fi IK!Ut^LJtngimil1)Vrii'lh.Vlnd*v该数据窗口对象所链接的数据库表格为ZBY,其数据源表示如下:SELECT"zby"."zby_name","zby"."zby_pawd"FROM"zby"(1)open事件代码：dw_1.settransobject(sqlca)dw_1.retrieve()（2）窗口的closequery 事件代码：inti_countIongbbi_count=dw_1.modifiedcount()+dw_1.deletedcount()ifi_count>Othenbb=messagebox(" 提示","是否保存未保存的数据 ",question!,yesnocancel!,1)choosecasebbcase1ifdw_1.update()=1thencommitusingsqlca;return。elserollbackusingsqlca;messagebox("提示"，”数据保存失败r‘)endifcase2returnOcase3returnlendchooseendif(3)增加按钮代码：dw_1.scrolltorow(dw_1.insertrow(O))dw_1.setcolumn(0)dw_1.setfocus()(4)删除按钮代码：longnetnet=messagebox("","你确定要删除吗",question!,yesno!,1)//提示是否要删除choosecasenetcase1case2returnlendchoose(5)保存按钮代码：inti_counti_count=dw_1.modifiedcount()+dw_1.deletedcount()〃 判断改变和删除的数目。ifi_count>Othenifdw_1.update()=1thencommitusingsqlca;messagebox("提示","已成功保存"+string(i_count)+" 纪录")elserollbackusingsqlca;messagebox("提示"，”保存失败")endifendif菜谱信息维护窗口w_choose_receive设计ddlb_1、ddlb_2属性相同，其Items属性页如下图所示。ddlb_3、ddlb_4属性也相同，其Items属性页如下图所示。General FontOtherItemddlb_5的Items属性页如下图所示其他的控件如窗口上所示。所链接的数据窗口对象在编辑状态下，如图下所示*IIIhbfedR4rv （tfi lifkVlUBFHiT44ftiiiLaydmr,<*^1?*IIIhbfedR4rv （tfi lifkVlUBFHiT44ftiiiLaydmr,<*^1?-・■laV^MMP"■MH停」Mt L池r * yr*■W衲F"该数据窗口对象所链接的数据库表格为CP,其数据源表示如下:SELECT"cp"."cp_no","cp"."cp_name"."cp"."cp_kind","cp"."cp_price","cp"."cp_detail"FROM"cp"（1） Open事件:dw_1.settransobject（sqlca）ddlb_1.text="菜谱号”ddlb_4.text="="ddlb_5.text="and"（2）查询代码intistringlookforcondition〃 定义参数：查询条件综合结果定义参数：要查询的列定义参数：要查询的内容定义参数：查询的符号定义参数：不同查询条件组合操作符号stringlookforitem1,lookforitem2,lookforitem3〃stringlookforwhat1,lookforwhat2,lookforwhat3〃stringlookforhow1,lookforhow2,lookforhow3〃stringlookforoperator1,lookforoperator2〃定义参数：要查询的列定义参数：要查询的内容定义参数：查询的符号定义参数：不同查询条件组合操作符号ifddlb_5.text="与"thenlookforoperator1="and"elseifddlb_5.text=" 或"thenlookforoperator仁"or"elseifddlb_5.text=" 非"thenlookforoperator仁"not"endififddlb_1.text="菜谱号"thenlookforitem1="cp_no"lookforwhat仁""'+sle_1.text+""'elseifddlb_1.text="菜名"thenlookforitem1="cp_name"lookforwhat仁""'+sle_1.text+""'elseifddlb_1.text="种类"thenlookforitem1="cp_kind"lookforwhat仁""'+sle_1.text+""'elseifddlb1.text="价格"thenlookforitem仁"cp_price"lookforwhat1=sle_1.textelseifddlb1.text="备注"thenlookforitem1="cp_detail"lookforwhat1=""'+sle_1.text+""'endififddlb_2.text="菜谱号"thenlookforitem2="cp_no"lookforwhat2="”'+sle_2.text+"”'elseifddlb2.text="菜名"thenlookforitem2="cp_name"lookforwhat仁"”'+sle_2.text+"”'elseifddlb2.text="种类"thenlookforitem2="cp_kind"lookforwhat2="”'+sle_2.text+"”'elseifddlb2.text="价格"thenlookforitem2="cp_price"lookforwhat2="”'+sle_2.text+"”'elseifddlb2.text="备注"thenlookforitem2="cp_detail"Iookforwhat2="”'+sle_2.text+"”'endififddlb_2.text=""orddlb_4.text=""thenlookforcondition=lookforiteml+lookforhowl+lookforwhatlelselookforcondition=lookforitem1+lookforhow1+lookforwhat1+""+lookforoperator1+""+lookforitem2+lookforhow2+lookforwhat2endifdw_1.setfilter(lookforcondition)filter(dw_1)i=dw_1.retrieve()ifi<1thenmessagebox("提示","没有相关记录!",Exclamation!)sle_1.text=""sle_2.text=""returnendif增加代码：dw_1.scrolltorow(dw_1.insertrow(O))dw_1.setcolumn(0)dw_1.setfocus()“删除”按钮控件的Click事件用于删除一个菜谱，程序代码与上述的“删除”按钮相同.“保存”按钮控件的Click事件将用于保存用户所做的修改，程序代码与上述“保存”按钮相同.⑹“退出”按钮控件的Click事件将用于退出该程序窗口。修改口令w_changek 设计(1)修改按钮代码：stringcorrect_pswd,ls_user,ls_pswdls_user=trim(sle_1.text)ls_pswd=trim(sle_2.text)ifls_user=""thenmessagebox("","用户名不能为空r‘)returnendififls_pswd=""thenmessagebox("","请输入原口令!")returnendififsle_4.text<>sle_3.textthenmessagebox("警告","两次输入的口令不一致，请重新输入")sle_3.text=""sle_4.text=""sle_3.setfocus()elseselectrtrim(zby_pawd)into:correct_pswdfromzbywherertrim(zby_name)=:ls_user;ifcorrect_pswd<>ls_pswdthenmessagebox("警告"，”原口令不正确r‘)elseupdatezbysetzby_pawd=:sle_3.textwherertrim(zby_name)=:ls_user;commitusingsqlca;close(parent)messagebox("注意"，”你的口令已经修改，请牢记!")endifendif(2)“取消”按扭用来退出该窗口。8、订餐w_dc窗口设计所链接的的数据窗口对象在编辑状态如图该数据窗口对象所链接的数据库表格为 DC,其数据源表示如下:SELECT"dc"."dc_desk","dc"."cp_no","dc"."cp_name","dc"."dc_num","dc"."dc_data"FROM"dc"open事件intg_rownumberg_rownumber=dw_1.insertrow(O)dw_1.settransobject(sqlca)dw_1.setfocus()dateg_dc_dateg_dc_date=today()//在数据窗口的日期这列显示当前日期dw_1.scrolltorow(g_rownumber)dw_1.setcolumn(0)下一道菜intg_rownumberg_rownumber=dw_1.insertrow(O)dateg_dc_dateg_dc_date=today()dw_1.setfocus()dw_1.scrolltorow(g_rownumber)dw_1.setcolumn(1)“删除”按钮控件的Click事件用于删除一个菜谱，程序代码与上述的“删除”按钮控件相同.“保存”按钮控件的Click事件将用于保存用户所做的修改，程序代码与上述的“保存”按钮相同。“退出”按钮控件的Click事件将关闭该窗口。9、订餐修改窗口w_ujttyyytt设计Ddlb_1和ddlb_2两个控件的属性一样，其item属性如下图，所链接的数据窗口对象 dc（1） open事件//设置事务对象dw_1.settransobject（sqlca）ddlb_1.text="="ddlb_2.text="="（2） 显示订单intistringlookforconditionstringlookforitem1,lookforitem2stringlookforwhat1,lookforwhat2stringlookforhow1,lookforhow2lookforhow仁ddlb_1.textIookforhow2=ddlb_2.textlookforitem1="dc_desk"lookforwhat仁""'+sle_1.text+""'Iookforitem2="dc_date"Iookforwhat2="datetime(”'+sle_2.text+"00:00:00')"ifsle_2.text=""thenlookforcondition=lookforitem1+lookforhow1+lookforwhat1elselookforcondition=lookforitem2+lookforhow2+lookforwhat2//lookforitem1+lookforhow1+lookforwhat1+""+"and"+""+endifdw_1.setfilter(lookforcondition)filter(dw_1)i=dw_1.retrieve()ifi<1thenmessagebox("提示","没有相关记录!",Exclamation!)returnendif增加intg_rownumberg_rownumber=dw_1.insertrow(O)dateg_dc_dateg_dc_date=today()//为数据窗口的日期列显示当前日期messagebox（""," messagebox（""," 请选择要退餐的桌号!"）messagebox（""," messagebox（""," 请选择要退餐的桌号!"）dw_1.setfocus()dw_1.scrolltorow(g_rownumber)dw_1.setcolumn(1)“删除”按钮控件的Click事件用于删除一个值班员，程序代码与上面所述的“删除”按钮控件相同.“保存”按钮控件的Click事件将用于保存用户所做的修改，程序代码与上面所述的“保存”按钮控件相同.⑹“退出”按钮控件的Click事件将用于退出该程序窗口。10、订餐取消w_dc_qc设计，控件如图所示，所连接的数据窗口为dc.ddlb_1与ddlb_2的属性相同.ddlb_1的item属性图a,ddlb_2的item属性图bGererelI怕俗FontOtherItem图a图b（1） open:dw_1.settransobject（sqlca）（2） 确定intiifddlb_1.text=""thenreturnret=messagebox(""," ret=messagebox(""," 你确定要退定"+string(l_dc_num1)+" 份ret=messagebox(""," ret=messagebox(""," 你确定要退定"+string(l_dc_num1)+" 份endifstringl_dc_deskl_dc_desk="dc_desk="'+ddlb_1.text+""'dw_1.setfilter(l_dc_desk)filter(dw_1)i=dw_1.retrieve()ifi<1thenmessagebox(""," 此桌无消费记录!")ddlb_1.text=""elsemessagebox(""," 请选择要退定的菜r‘)returnendif退订的菜doublel_dc_num1,l_dc_num2stringl_cp_namel_dc_num仁double(ddlb_2.text)l_cp_name=dw_1.getitemstring(dw_1.getrow(),"cp_name")l_dc_num2=Long(dw_1.getitemstring(dw_1.getrow(),"dc_number"))intret"+l_cp_name,question!,yesnocancel!,2)choosecasereteaselifddlb_2.text="all"thendw_1.deleterow(0)ifdw_1.update()=1thenmessagebox("","退定成功!")close(parent)elsemessagebox(""," 退定失败，请重试!")returnendifelseifl_dc_num1>l_dc_num2thenmessagebox("警告"，”退定出错，请查看数量!")return1endifUPDATEdcSETdc_number=:l_dc_num2-:l_dc_num1;ifdw_1.update()=1thenmessagebox("","退定成功!")close(parent)returnmessagebox（"messagebox（"提示"，”请输入要查询的桌号!"）messagebox（"messagebox（"提示"，”请输入要查询的桌号!"）endifreturnendifcase2return。case3returnlendchoose11、订餐查询w_dc_search设计控件如上图所示•其中有一个选项卡，卡上有三页，三页的数据窗口控件所连接的数据窗口都是dc,界面如下图，该数据窗口对象所链接的数据库表格为 CP和DCopen:tab_1.tabpage_1.dw_1.settransobject(sqlca)tab_1.tabpage_2.dw_2.settransobject(sqlca)tab_1.tabpage_3.dw_3.settransobject(sqlca)按桌号查询intistringl_desk,conditionl_desk=sle_1.textifl_desk=""thenmessagebox（"","messagebox（"","无相关记录，请重新输入!"）returnendifcondition="dc_desk="'+sle_1.text+""'dw_1.setfilter(condition)filter(dw_1)i=dw_1.retrieve()ifi<1thenmessagebox(""," 无相关记录，请重新输入r‘)sle_1.text=""sle_1.setfocus()returnendif按菜谱号查询：intistringl_cp_no,conditionl_cp_no=sle_2.textifl_cp_no=""thenmessagebox("提示"，”请输入要查询的菜谱号 !")returnendifcondition="cp_no="'+sle_2.text+""'dw_2.setfilter(condition)filter(dw_2)i=dw_2.retrieve()ifi<1thenmessagebox(""," 无相关记录，请重新输入r‘)sle_2.text=""sle_2.setfocus()returnendif按菜名查询intistringl_cp_name,conditionl_cp_name=sle_3.textifl_cp_name=""thenmessagebox("提示"，”请输入要查询的菜名!")returnendifcondition="cp_namelike'%"+sle_3.text+"%"'dw_3.setfilter(condition)dw_3.filter()i=dw_3.retrieve()ifi<1then其数据源表示如下:!")其数据源表示如下:!")sle_3.text=""sle_3.setfocus()returnendif(5)”退出”按扭用于退出该窗口.12、折扣设定W_zjsd窗口设计该数据窗口对象所链接的数据库表格为 jsSELECT"js"."kh_no","js"."dc_desk","js"."js_dz","js"."total","js"."js_date"FROM"js"Open:dw_1.settransobject(sqlca)确定intiifddlb_1.text=""thenmessagebox(""," 请选择要计算折扣的桌号ddlb_1.setfocus()returnendifstringl_desk,conditionmessagebox（"","messagebox（"","总金额大于500但小于1000~r~n 给予7扣优惠"）messagebox（"","messagebox（"","总金额大于500但小于1000~r~n 给予7扣优惠"）I_desk=ddlb_1.textcondition="dc_desk="'+l_desk+""'dw_1.setfilter(condition)filter(dw_1)i=dw_1.retrieve()ifi<1thenmessagebox(""," 该桌无消费记录r‘)returnendif开始计算doublel_totall_total=Iong(dw_1.getitemstring(dw_1.getrow(),"total"))ifl_total<200thenmessagebox("","总金额不足200~r~n 无折扣优惠")returnendififl_total>200andl_total<500thenmessagebox("","总金额大于200但小于500~r~n给予8.5扣优惠")returnendififl_total>500andl_total<1000thenreturnendififl_total>1000andl_total<5000thenmessagebox（"","总金额大于1000但小于5000~r~n 给予6扣优惠"）returnendififl_total>5000thenmessagebox（"","总金额大于5000~r~n给予8.5扣优惠"）returnendif客户信息w_kh设计该数据窗口对象所链接的数据库表格为 kh，其数据源表示如下：SELECT"ky"."kh_no","ky"."kh_name","ky"."kh_sex","ky"."kh_age","ky"."kh_job","ky"."kh_tel","ky"."kh_company"FROM"ky"14、 打印