VB实验报告WY..docVIP

  • 0
  • 0
  • 约1.83千字
  • 约 8页
  • 2018-05-06 发布于河南
  • 举报
VB实验报告WY.

课程设计报告 姓 名: 学 号: 专 业:计算机科学与技术 班 级: 指 导 教 师:谢老师 2011年 6 月11 日 课程设计报告 —————饭店点菜系统 实验题目:饭店点菜系统 问题描述 主要功能有: 1.菜式浏览功能:能分类浏览饭店的所有菜式、采样及价格; 2.点菜功能:进行点菜操作后能预览点菜结果,并可对其进一步修改; 3.留言板功能:记录顾客的意见和建议,并具有浏览功能; 4.抽奖功能:当顾客的消费达到指定金额时,可分档抽取小奖品。 实验时间、地点: 6月7至6月9日、信工楼302室 三、实验目的: 通过该题目的设计,使学生掌握软件开发过程的问题分析、系统设计、程序编码、测试等基本方法和技能;掌握利用VB开发数据库系统的方法。 实验要求: (1)2-3人完成 (2)用数据库或文件保存相关信息。 五、实验设计 1. 实验流程图 数据库的结构设计: 菜式的表结构 字段名称 数据类型 字段大小 菜式 文本 20 价格 货币 8 六、实验过程 1. 主窗体的设计: A、主界面 程序代码: Private Sub Command1_Click() Form1.Hide 隐藏主菜单系统 Form2.Show 显示点菜系统 End Sub Private Sub Command2_Click() Form1.Hide 隐藏主菜单系统 Form4.Show End Sub B、点菜单 程序代码: Private Sub Command2_Click() Dim zj!, a If zj = 500 Then a = 获得一等奖 If zi = 400 Then a = 获得二等奖 If zj = 300 Then a = 获得三等奖 If zi = 200 Then a = 获得幸运奖 If zj = 200 Then a = 未达到获奖金额 Label3 = a End Sub Private Sub Command3_Click() Form2.Hide Form3.Show End Sub Private Sub Command4_Click() Form2.Hide Form1.Show End Sub C、已选菜单浏览 程序代码; Private Sub Command1_Click() Form3.Hide Form2.Show End Sub Private Sub List1_Click() List1.AddItem = DataGrid1 End Sub D、留言板 程序代码: Private Sub Command1_Click() Text2.Text = Text1.Text Text1.Text = End Sub Private Sub Command3_Click() Form4.Hide Form1.Show End Sub Private Sub Text1_Change() End Sub 数据的库的建立 在Microsoft SQL Server 2000 中建立了caidan这个数据库 以及所需要的caishi表 通过调用数据库,将信息显示在窗体上,供顾客浏览。 实验总结: 由于,对实验的不熟悉,在实验中未尽到力大部分都不会做,但在看了小组队友的,和问,基本搞懂了整个实验过程,但还有欠缺,对于这次实验我感觉到的就是失败,有很多原因,主要是太匆忙了,没有足够的时间来准备和设计完成。 同时在实验中我了解到,本人对与各个方面的知识点还不够了解,有的地方甚至一窍不通。 这次实验让我认识到我在VB程序设计的不足。 登陆界面 留言板界面 点菜界面 点菜数据 抽奖数据 浏览留言 留言板

文档评论(0)

1亿VIP精品文档

相关文档