2022年饭店餐饮管理系统设计说明 .pdf

《2022年饭店餐饮管理系统设计说明 .pdf》由会员分享，可在线阅读，更多相关《2022年饭店餐饮管理系统设计说明 .pdf（18页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、 . 1 / 18 饭店餐饮管理系统设计说明- -日期：名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 1 页，共 18 页 - - - - - - - - - . X x 学院面向对象程序设计课程设计说明书题目：饭店餐饮管理系统系(部)：电子与通信工程系专业 ( 班级 ) ： 07级电子信息工程专业1 班：万# _ 2007# 指导马#、# 起止日期： 2010.11.292010.12.4 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - -

2、- - - - - - 名师精心整理 - - - - - - - 第 2 页，共 18 页 - - - - - - - - - . I / 18 课程任务书课题名称饭店餐饮管理系统设计容与要求设计一个饭店餐饮管理系统，要求界面美观，具有操作菜单与工具栏；系统应包括以下功能模块：用户管理模块：用户登录、用户的添加、删除、密码修改功能。用户根据口令进入系统，不同的用户拥有不同权限：可读可写、只读、只读部分信息。菜单浏览模块：能浏览饭店的所有菜品、菜样与价格，要求能显示菜样图片。点菜模块：进行点菜操作后能预览点菜结果，并统计金额；买单模块：进行买单操作，可记录菜单信息、时间信息与收款员等相关信息，并

3、实现全款买单、打折买单与免单等功能；要求能按时间段查询买单信息。留言模块：记录并浏览顾客的意见和建议；抽奖功能：当顾客的消费达到指定金额时，可分档抽取小奖品。学院课程设计鉴定表万# 学号2007# 专业电子信息工程班级1 设计题目饭店餐饮管理系统指导教师马#、# 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 3 页，共 18 页 - - - - - - - - - . II / 18 指导教师意见：评定等级：教师签名：日期：答辩小组意见：评定等级：答辩小组长签名：日期：教研室意见：

4、教研室主任签名：日期：系（部）意见：系主任签名：日期：说明课程设计成绩分“优秀”、“良好”、“与格”、“不与格”四类；目录1 设计思路分析.5 1.1、Access数据库5 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 4 页，共 18 页 - - - - - - - - - . III / 18 1.2、餐厅系统.5 2 系统结构设计与分析6. 2.1 、部分程序与窗体6 3 设计总结15 参考文献 . 16名师资料总结 - - -精品资料欢迎下载 - - - - - - - -

5、 - - - - - - - - - - 名师精心整理 - - - - - - - 第 5 页，共 18 页 - - - - - - - - - . 4 / 18 摘 要中国是举世闻名的美食大国，拥有五千年的饮食文化和巨大的餐饮市场，满足个人的温饱问题已不是当今的热点，人们的生活方式逐渐在转变着，饮食已经成为了一种时尚，一种享受。民以食为天，随着人民生活水平和生活方式的转变，渐渐的人们发现餐饮业具有巨大的投资市场。随着餐饮业投资者的不断涌入，许多新一代的快餐店，披萨店，餐馆在国开始风靡，随处可见。如今，国外饮食企业进入中国，同时也是中国企业进入国际市场的重要开端，由此必将为国外饮食企业提供更加

6、广阔的市场机会。餐饮业不仅面临着巨大的发展机遇，也面临着前所未有的挑战和考验。随着中国对外的不断开放，会有大量的企业或公司介入到餐饮领域。同时，随着中国兑现承诺和中国社会信息化的深化，很多地区性企业的“环境优势”对国外企业的障碍和不利条件被不断地消除，中国市场的竞争将更为激烈，而且 随 着 餐 饮 业 的 迅 速 扩 展 ， 其 中 所 暴 露 的 问 题 也 是 不 容 忽 视 的 。首先，人才的专业化程度不够导致供不足：因餐饮业门坎较低，中国的大多数餐饮企业的老板是从小店发展起来的，家族式管理的居多，还没有发展到聘请职业经理人，许多还是 人治 ，并没有一套现代企业制度和监督管理体制，所以从

7、观念意识、经营思想和管理水平还有待专业化。其次，应变能力差，缺乏先进的信息工具：现在的餐饮市场火爆，许多以前做电子、房地产等其他行业的老板都凭借雄厚的资金实力挤进餐饮市场，争先恐后的上规模、上档次、比菜品、比服务、拼价格，使餐饮市场竞争激烈，但是许多餐饮企业缺乏对市场的应变能力和灵敏的信息工具，在现今网络经济的时代，许多餐饮企业还处在手工与半手工状态，即使有计算机也只当个点菜器和计算器用，并没有真正通过计算机系统来实现改造流程、强化管理、降低成本、堵漏节流等作用。最后缺乏科学和标准的管理体系：国外著名的快餐连锁经过上百年的探索都形成了标准化的工作流程和方法。中餐因其菜品的多样化和特色化的服务很

8、难实现标准化管理，这使中餐企业的成本控制很难实现，但近两年也出现了引进快餐式经营特点的中餐企业，从流程、服务、出品都开了中餐标准化的先河。信息系统的引进，则会缓解和解决以上问题：首先，餐饮管理信息系统不是单纯的用于结帐计算的工具，它有着科学的、标准的管理体系，它是通过对目前餐饮市场的具体情况科学的调研分析后设计而成的，它能够针对中餐因其菜品的多样化和特色化的服务很难实现标准化管理，使中餐企业的成本控制很难实现这些问题给与解决。其次，餐饮管理信息系统能够给出具体的相应的符合企业自身要求的较科学的标准化管理流程，这暂时缓解了专业人才的需求，通过使用该系统就能完成专业人员所要做的事。最后，餐饮管理信

9、息系统可以针对企业的经营现状而做出科学的分析，使得企业对市场的应变能力得到了提高，从而通过餐饮管理信息系统来实现强化管理、降低成本、堵漏节流等作用。更好的完善企业的经营管理，提高企业自身的竞争实力。名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 6 页，共 18 页 - - - - - - - - - . 5 / 18 一、设计思路1.1 、 Access 数据库Access2003 就是关系数据库开发工具，数据库能汇集各种信息以供查询、存储和检索。那么什么叫数据库呢？数据库(Dat

10、abase) 是由一些有意义和有关系的数据(data)所组合而成。一个数据库中，包含了许多条记录(Record),而每条记录是由多个字段(Field)所组成 ,不同的字段存放这不同的数据。所以数据库的严格定义是一组相关记录的集合，而字段则是最基本的数据项，也是数据库中最小的单位。在计算机中用来帮我们管理数据库的系统，我们称之为数据库管理管理系统（Database Management System DBMS ）。数据库管理系 统 是 架 构 在 一 个 或 多 个 数 据 库 之 上 ， 并 针 对 数 据 库 中 的 数 据 进 行 管 理 运 用 。Access 的优点在于它能使用数据表示

11、图或自定义窗体收集信息，数据表示图提供了一种类似于 Excel 的电子表格，可以使数据库一目了然。另外，Access 允许创建自定义报表用于打印或输出数据库中的信息。Access 也提供了数据存储库，可以使用桌面数据库文件把数据库文件置于网络文件服务器，与其他网络用户共享数据库。如上所述，Access 作为关系数据库开发具备了许多优点，可以在一个数据包中同时拥有桌面数据库的便利和关系数据库的强大功能1.2 、餐厅系统餐厅系统是按国餐饮行业最新要求开发的全新概念信息管理系统。该系统将餐厅收银、往来帐务结算管理与销售情况统计工作在单微机或网络系统中完成。主要特点包括：（1）代码菜谱编制，方便统计，

12、方便输入；（2）开单、改单、结算、打印、用户界面方便友好；（3）系统专设往来帐、部帐，结算方式灵活多样，结算信息详尽翔实；（4）帐务系统的可扩充性。由于餐厅业务的扩展，势必要求帐务结算系统随之扩展，在不修改程序的前提下，本系统可在相当可观的围，由用户扩展其营业项目和结算手段。（5）帐务操作数据的可校验性。本系统提供了多种方便的查询、校核和统计功能，供帐务操作人员和专职核数人员自核与校对帐务数据。例如，当班收银员下班时直接统计当班期间的输单、收银情况。为餐饮企业管理人员提供与时准确的经营状况和帐务信贷情况。餐厅系统需要完成的功能有以下几点。（1）美食档案：添加、修改、按菜系、原料、烹饪方法查询（

13、2）订餐管理：订餐、订餐修改、订餐取消、订餐查询。（3）收款管理：立帐、折扣设定。（4）销售查询：可按年、月、日检查销售情况，也可按销售额查询并画出销售额图表。名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 7 页，共 18 页 - - - - - - - - - . 6 / 18 二系统结构设计与分析上面我们创建了饭店餐饮管理系统中餐饮管理部分的数据库结构。Access 的优点在于它能使用数据表示图或自定义窗体收集信息，数据表示图提供了一种类似于 Excel 的电子表格，可以使数据

14、库一目了然。另外，Access 允许创建自定义报表用于打印或输出数据库中的信息。 Access 也提供了数据存储库，可以使用桌面数据库文件把数据库文件置于网络文件服务器，与其他网络用户共享数据库。2.1 、部分程序与窗体-frmmain 进入主页面Private Sub Form_Load() strExplain(0) = 由餐饮部门的工作人员输入各种菜肴的原始资料，以供编辑菜单使用。 strExplain(1) = 编辑、制作出令客人满意的菜单，并可预览所点的各种美味佳肴，同时管理收费。 strExplain(2) = 供餐饮部门经理查看各种销售记录，统计分析各种数据。 strExplai

15、n(3) = 退出美食向导程序。 strExplain(4) = 本产品用于各级酒店餐饮部门的订餐点菜与收费管理。 。Private Sub lblDir_Click(Index As Integer) lblDir(Index).MousePointer = 11 Select Case Index Case 0 If MsgBox(您是“ & strHotelName & ”餐饮部门工作人员吗？, vbYesNo + vbQuestion, 美食档案 -输入、编辑菜单原始资料) = vbNo Then Exit Sub End If frmInput.Show Me.Hide Case 1

16、 Load frmGuest Case 2 If MsgBox(您是“ & strHotelName & ”餐饮部门管理人员吗？, vbYesNo + vbQuestion, 美食档案 -销量查询 ) = vbNo Then Exit Sub End If Load frmQuery Case 3 If MsgBox(要退出美食向导吗？, vbQuestion + vbYesNo, 退出提示) = vbNo Then Exit Sub End If Dim frm As Form For Each frm In Forms Unload frm 名师资料总结 - - -精品资料欢迎下载 - -

17、 - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 8 页，共 18 页 - - - - - - - - - . 7 / 18 Next End End Select End Sub -frmguest(code) 可以订餐、点餐、查看菜系等Private Sub cmdAdd_Click() If lstCustomer.ListCount = 0 Then If Trim(txtCustomerID) = Then MsgBox 请填写您的标识！, vbInformation, 订餐提示 txtCustomerID = txtCu

18、stomerID.SetFocus Exit Sub End If If Trim(txtSetCount) = Then MsgBox 请填写订餐套数！, vbInformation, 订餐提示 txtSetCount = txtSetCount.SetFocus Exit Sub End If If Trim(txtOrderDate) = Then MsgBox 请填写订餐日期！, vbInformation, 订餐提示 txtOrderDate = txtOrderDate.SetFocus Exit Sub Else With txtOrderDate If IsDate(Trim(

19、.Text) Then .Text = Format(Trim(.Text), YYYY-MM-DD) Else MsgBox 订餐日期无效！请按默认的日期格式填写。, vbInformation, 订餐提示 .Text = Format(Date, YYYY-MM-DD) .SetFocus 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 9 页，共 18 页 - - - - - - - - - . 8 / 18 .SelStart = 0 .SelLength = Len(txt

20、OrderDate) Exit Sub End If End With End If If Trim(txtDinnerDate) = Then MsgBox 请填写用餐日期！, vbInformation, 订餐提示 txtDinnerDate = txtDinnerDate.SetFocus Exit Sub Else With txtDinnerDate If IsDate(Trim(.Text) Then .Text = Format(Trim(.Text), YYYY-MM-DD) Else MsgBox 用餐日期无效！请按默认的日期格式填写。, vbInformation, 订餐提

21、示 .Text = Format(Date, YYYY-MM-DD) .SetFocus .SelStart = 0 .SelLength = Len(txtOrderDate) Exit Sub End If End With End If Rec2.FindFirst CustomerID = & Trim(txtCustomerID) & And DinnerDate = # & CDate(txtDinnerDate) & # If Rec2.NoMatch = False Then MsgBox 在相同的用餐日期（ & txtDinnerDate & ）， & vbCrLf _ &

22、已有一位标识为“ & txtCustomerID & ”的客人。 & vbCrLf _ & 请您换一个标识吧！, vbInformation, 订餐提示 txtCustomerID.SetFocus txtCustomerID.SelStart = 0 txtCustomerID.SelLength = Len(txtCustomerID) Exit Sub End If txtCustomerID.Locked = True txtSetCount.Locked = True 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名

23、师精心整理 - - - - - - - 第 10 页，共 18 页 - - - - - - - - - . 9 / 18 txtOrderDate.Locked = True txtDinnerDate.Locked = True cmdCheck.Enabled = True cmdPreview.Enabled = True AddToCustomerMenu If txtFindDate = txtDinnerDate Then cmdFind_Click End If Else 如果 lstCustomer中有容的话 Dim I As Integer For I = 0 To lstC

24、ustomer.ListCount - 1 If Trim(Mid(lstCustomer.List(I), 4) = lstShowMenu.Text Then lstCustomer.ListIndex = I MsgBox 您已经选择了这道菜。如果想再加一份的话，请单击“增加一份”按钮。, vbInformation, 请餐提示 cmdAddOne.SetFocus Exit Sub End If Next I AddToCustomerMenu -frmguest 窗体-frminput 可添加、修改、删除菜单，可按菜色、烹饪方法、原料显示，可修改订餐等Private Sub File

25、1_Click() If Len(File1.FileName) 20 Then MsgBox 这个文件的名字太长，请把它的名字改为20 个字以。 , vbInformation, 输名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 11 页，共 18 页 - - - - - - - - - . 10 / 18 入、编辑菜单原始资料 File1.Visible = False Exit Sub End If Dim L As Long L = FileLen(AppDir & Imag

26、e & File1.FileName) If L 350000 Then MsgBox 图片太大，请把它缩为大约300300 象素， 300k 左右。 , vbInformation, 输入、编辑菜单原始资料 File1.Visible = False Exit Sub Private Sub MnuFileSave_Click() If Trim(txtName) = Then MsgBox 菜名不能空白！, vbExclamation, 输入、编辑菜单原始资料 txtName = txtName.SetFocus Exit Sub End If If Trim(txtABC) = Then

27、 MsgBox 请填写菜名的拼音字头！, vbExclamation, 输入、编辑菜单原始资料 txtABC = txtABC.SetFocus Exit Sub End If If DBState = Add Then Rec.Close Set Rec = Nothing Set Rec = DB.OpenRecordset(Select * from Menu order by ABC,Name) Rec.FindFirst Name= & txtName & If Rec.NoMatch = False Then MsgBox “ & txtName & ”这道菜已经存在！, vbIn

28、formation, 保存提示 txtName.SetFocus SendKeys Home+End Exit Sub End If End If OutputToDB MnuShowWhole_Click DBState = saved FrameState (DBState) End Sub 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 12 页，共 18 页 - - - - - - - - - . 11 / 18 -frmnutrition 主要用于查看食物的营养组成。-fr

29、mpreview 生成账单并打印出来。Dim sngH As Single Dim I As Integer W = 12.5 cmdPrint.Visible = False lblWait.Visible = True DoEvents With Printer .ScaleMode = 7 .Font.Size = 12 sngH = .TextHeight(frmGuest.lblWelcome(0) + 0.1 .Width = 576 * W .Height = 576 * (10 + lstCustomer.ListCount * sngH) .Font.Name = 隶书 .F

30、ont.Size = 20 .CurrentX = (W - .TextWidth(frmGuest.lblWelcome(0) / 2 .CurrentY = 1 For I = 0 To lstCustomer.ListCount - 1 .CurrentX = 2 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 13 页，共 18 页 - - - - - - - - - . 12 / 18 .CurrentY = 3 + sngH * (I + 6) Printer.Print

31、 lstCustomer.List(I) Next I .CurrentX = 2 .CurrentY = 3 + sngH * (I + 8) Printer.Print lblTotal .CurrentX = 2 .CurrentY = 3 + sngH * (I + 9) Printer.Print lblPay .CurrentX = 2 .CurrentY = 3 + sngH * (I + 12) Printer.Print -完毕( 打印日期 : & Format(Date, YYYY-MM-DD) & )- .CurrentX = 2 .CurrentY = 3 + sngH

32、 * (I + 16) Printer.Print lblWait.Visible = False If MsgBox(现在开始打印。请加纸。, vbInformation + vbOKCancel, 打印菜单 ) = vbOK Then .EndDoc Else .KillDoc End If End With cmdPrint.Visible = True Exit Sub Eh: MsgBox 打印时发生错误： & vbCrLf & Err.Description, vbInformation, 打印出错 End Sub -frmprice 按消费围进行查询等。Private Sub c

33、mdOK_Click() With txtPrice1 If Trim(.Text) = Then .SetFocus Exit Sub End If End With With txtPrice2 If Trim(.Text) = Then .SetFocus Exit Sub End If End With 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 14 页，共 18 页 - - - - - - - - - . 13 / 18 With frmGuest .Rec1.Clo

34、se Set .Rec1 = Nothing Set .Rec1 = .DB.OpenRecordset(Select Name,Price From Menu Where Other3 = 0 And Price Between & CCur(Trim(txtPrice1) & And & CCur(Trim(txtPrice2) & Order By ABC,Name, dbOpenSnapshot) .ShowNamePrice .Rec1, .lstShowMenu, 请 选 择 （ 价 格 在 & txtPrice1 & - & txtPrice2 & 元之间）： End With

35、Unload Me End Sub -frmquery 查销售额，可以按年、月、日进行查询，也可生成销售额的柱状图。-月销售额查询Private Sub cmdMonthFind_Click() Dim datFind As Date Dim strFind As String strFind = Trim(InputBox(请 输 入年 、 月 ： ( 格 式 ： YYYY-MM 如 ： & Format(Date, YYYY-MM) & ), 月销售额查询 , Format(Date, YYYY-MM) If strFind = Then Exit Sub If Not IsDate(Le

36、ft(strFind, 7) Then MsgBox “ & strFind & ”不是一个有效的年月！, vbInformation, 月销售额查询 Exit Sub End If datFind = Format(strFind, YYYY-MM) If MsgBox(您要查询的年月是 & Year(datFind) & 年 & Month(datFind) & 月吗？ , vbQuestion + vbYesNo, 月销售额查询 ) = vbNo Then Exit Sub End If Dim Rec As Recordset Dim S As Currency Set Rec = D

37、B.OpenRecordset(Select Sum(Pay) From Sale Where Year(Date) = & Year(datFind) & And Month(Date) = & Month(datFind) If Not IsNull(Rec.Fields(0) Then S = Rec.Fields(0) End If MsgBox Year(datFind) & 年 & Month(datFind) & 月的销售额是： & Format(S, 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理

38、- - - - - - - 第 15 页，共 18 页 - - - - - - - - - . 14 / 18 #0.00) & 元。 , vbInformation, 月销售额查询 Rec.Close Set Rec = Nothing End Sub -年销售额查询Private Sub cmdYearFind_Click() Dim datFind As Date Dim strFind As String strFind = Trim(InputBox(请输入2 位或 4 位年份： (如： & Format(Date, YYYY) & 或 & Format(Date, YY) & 代表

39、 & Format(Date, YYYY) & 年), 年销售额查询, Format(Date, YYYY) If strFind = Then Exit Sub Dim strDate As String strDate = Left(strFind & -01-01, 10) If Not IsDate(strDate) Then MsgBox “ & strFind & ”不是一个有效的年份！, vbInformation, 年销售额查询 Exit Sub End If datFind = CDate(strDate) If MsgBox(您要查询的年份是 & Year(datFind)

40、 & 年吗？ , vbQuestion + vbYesNo, 年销售额查询) = vbNo Then Exit Sub End If Dim Rec As Recordset Dim S As Currency Set Rec = DB.OpenRecordset(Select Sum(Pay) From Sale Where Year(Date) = & Year(datFind) If Not IsNull(Rec.Fields(0) Then S = Rec.Fields(0) End If MsgBox Year(datFind) & 年 的 销 售 额 是 ： & Format(S,

41、 #0.00) & 元 。 , vbInformation, 年销售额查询 Rec.Close Set Rec = Nothing End Sub 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 16 页，共 18 页 - - - - - - - - - . 15 / 18 三、设计总结通过一周的课程设计，使我增加了对课程的了解。VB在原来 BASIC语言的基础上进一步发展至今包含了数百条语句, 函数与关键词 , 其中很多和WINDOWS GUI 有直接关系,VB 不仅是可视语言,

42、而且是面向对象的编程语言. 其特点是概念多, 实践性强 , 涉与面广 . 之后 , 了解到一些基本的概念, 含义 . 例如类 , 就是创建对象实例的模板包含了创建的属性描述和行为特征的定义. 而此中的对象又是类的一个实例, 继承了类的属性, 方法 , 而 VB中长用的对象有窗体 , 控件等 . 但我们在建立之前必须清楚对象的三要素: 属性 , 方法和事件 . 再用VB 创建一个应用程序, 第一步骤是创建窗体, 它是用户与应用程序进行交互操作的可视部分,窗体是创建界面的基本构造模块, 也是创建应用程序所使用的对象. 而后必要设置窗体的属性, 从而构出窗体的外观, 设置好的窗体 ,窗体就作为对象,

43、 能够对其定义的事件作出响应, 这也是所谓的窗体事件, 而窗体事件又包括窗体本身事件, 键盘事件和鼠标事件. VB 程序设计同时可设计出一个更好的酒店点餐系统, 这样就可以使用户了解到更大量有关应用程序设计和结构的信息, 精心规划菜单与工具栏有助于提高应用程序的可用性. 同时在基于WINDOWS 的应用程序中 , 对话框被用来提示应用程序继续运行所需的数据或者用户显示信息 .对话框是一种特殊类型的窗体对象, 在 VB中按对话框的创建有三种类型的对话框,他们是预定义对话框, 自定义对话框和标准对话框. 对于自定义对话框和标准对话框, 使可以完成与用户之间的交互. 学习 VB程序设计后 , 增加对

44、此的认识, 深入学习 VB程序就可掌握新的软件, 新的编程环境,学习此课程 , 也可学会使用开发环境, 开发工具的方法. 才能更好地跟上计算机学科的发展.名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 17 页，共 18 页 - - - - - - - - - . 16 / 18 参考文献1. 人杰，殷人昆，永雷，实用软件工程（第二版）清华大学 1997.4 ；2. 子锐，visual basic 6.0数据库开发自学教程人民邮电 2001.6 3. 萨师煊，王珊，数据库系统概论（第

45、三版）高等教育 2002.3 ；4 建中 , 王珊, 数据库系统原理电子工业 1998.5 ；5 昭原，数据库原理与应用科学 1998.5；6 生平，洪力，数据库技术与其应用地震 2000.8；7 万科， vb 数据库开发经典案例解析清华大学1999.5；8. 诗斌，数据库系统基础，计算机工程与应用 1981 年第 8 期；9. 朱海滨，面向对象技术原理与设计国防科技大学 1992.6；10. 晓华，计算机软件可靠性与质量管理中国经济1992.8；11. 施伯乐，何继潮，关系数据库的理论与应用科技 1990.6；12. 艺， Thinking in Patterns with vb 6.0 机械工业 2004.9 ；名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 18 页，共 18 页 - - - - - - - - -