Advertisement

饭店菜品点单系统(使用VB语言开发)。

  •  5星
  •     浏览量: 0
  •     大小:None
  •      文件类型:None


简介:
该程序提供了一个可爱的图形界面,并包含可执行的代码菜谱管理功能。首先,创建了一个 ADODB.Connection 对象,命名为 cnn,用于连接到数据库。随后,创建了一个 ADODB.Recordset 对象,命名为 rsImage,用于存储图像数据。程序定义了两个常量:ChunkSize 和 lngDataFile,分别用于指定块大小和文件标识符。此外,还定义了变量 cnn、rsImage、Chunk()、lngLengh、intChunks 和 intFragment,用于处理文件读取和图像块的分割。 接下来,`back_Click()` 子程序被定义(虽然未实现),`Command1_Click(Index As Integer)` 子程序用于删除指定名称的菜谱信息。它首先构建一个 SQL 语句 `delete * from huncai where cname= & (Text1(2).Text) & `, 用于从 huncai 表中删除符合条件的记录。然后连接到数据库并执行该 SQL 语句以完成删除操作。成功删除后显示消息框提示用户。`Command2_Click()` 和 `Command3_Click()` 子程序也未实现。 `Command3_Click()` 子程序负责插入新的菜谱信息。首先检查输入字段是否为空,如果为空则显示错误消息框并退出程序。然后构建一个 SQL 语句 `insert into huncai(sort,cname,price) values ( & (Combo1.Text) & , & (Text3.Text) & , & Val(Text4.Text) & )`, 用于将新菜谱信息插入到 huncai 表中。如果未选择文件路径则显示提示信息并退出程序。接着打开指定的文件进行二进制读取操作,获取文件长度 `lngLengh` 。如果文件长度为0则关闭文件并退出程序。计算块的数量 `intChunks` 和剩余块的数量 `intFragment` 。重新定义 Chunk 数组的大小以适应剩余块的数量. 然后循环读取文件数据到 Chunk 数组中, 并将每个 Chunk 添加到 rsImage!picImage 中, 最后更新 rsImage 并刷新数据集. 最后调用 ShowPic 函数来显示图片. `cmdBrowse_Click()` 子程序用于浏览文件选择对话框, 选择JPG或BMP格式的文件, 并将文件名保存到 txtFilePath 文本框中, 同时加载图片到 Picture1 的 Picture 属性中. `ShowPic()` 函数用于将图片临时存储到文件中, 然后加载该图片到 Picture1 的 Picture 属性中. `Command4_Click()` 子程序隐藏 Form7 并显示它. `Command5_Click()` 子程序清空所有文本框的数据源, 然后刷新 DataGrid1 和 Text1 的数据源, 以及 Text1(3) 的数据源. 在 Form Load 事件中初始化 Text1(0), Text1(2), Text1(3) 的文本框内容为空, 设置 rsImage 的锁定类型为 adLockOptimistic , 设置 rsImage 的游标类型为 adOpenKeyset , 设置 cnn 的 Provider 为 Microsoft.Jet.OLEDB.4.0 , 构建 SQL 连接字符串 F:\课程设计\数据库\菜谱.mdb, 打开数据库连接, 并执行 Select * From huncai 查询语句以获取菜谱数据并填充 rsImage 对象

全部评论 (0)

还没有任何评论哟~
客服
客服
  • 餐馆VB
    优质
    本项目旨在利用Visual Basic编程语言开发一套高效的餐馆点菜系统,该系统能有效提升餐饮业的服务质量和运营效率。 漂亮的界面以及可执行的代码菜谱管理: ```vb Dim cnn As New ADODB.Connection Dim rsImage As New ADODB.Recordset Dim Chunk() As Byte Dim lngLengh As Long Dim intChunks As Integer Dim intFragment As Integer Const ChunkSize = 1000 定义分块大小为1000字节 Const lngDataFile = 1 Private Sub back_Click() End Sub 删除菜谱信息按钮点击事件处理代码: Private Sub Command1_Click(Index As Integer) Set DataGrid1.DataSource = Nothing sql = delete * from huncai where cname= & Text1(2).Text & 修正SQL语句中的语法错误 cnn.Execute (sql) 执行删除操作 MsgBox (成功删除信息) Adodc1.Recordset.Update 更新记录集数据源 Adodc1.Refresh Set DataGrid1.DataSource = Adodc1 End Sub 退出程序按钮点击事件处理代码: Private Sub Command2_Click() End End Sub 添加菜谱信息按钮点击事件处理代码: Private Sub Command3_Click() If Text3.Text = Or Text4.Text = Then MsgBox (请输入完整信息!) 提示输入完整的信息 Else sql = insert into huncai(sort,cname,price) values ( & Combo1.Text & , & Text3.Text & , & Val(Text4.Text) & )修正SQL语句中的语法错误 If Trim(txtFilePath.Text) = Then MsgBox 未选择文件.!!, vbInformation + vbSystemModal, 保存出错 Exit Sub 如果用户没有选择图片文件,则退出子过程 End If Open Trim(txtFilePath.Text) For Binary Access Read As lngDataFile 打开选定的图片文件以读取模式 lngLengh = LOF(lngDataFile) 获取文件大小 If lngLengh = 0 Then Close lngDataFile: Exit Sub 如果文件为空,则关闭它并退出子过程 End If intChunks = lngLengh \ ChunkSize 计算需要多少个分块来存储数据,以及最后一个分片的大小 intFragment = lngLengh Mod ChunkSize rsImage.AddNew 在数据库中添加新记录以保存菜谱信息和图片 ReDim Chunk(intFragment) Get lngDataFile, , Chunk() rsImage!picImage.AppendChunk Chunk() ReDim Chunk(ChunkSize) For i = 1 To intChunks Get lngDataFile, , Chunk() rsImage!picImage.AppendChunk Chunk() Next i rsImage.Update 更新记录集数据源以保存所有新菜谱信息和图片 Close lngDataFile Call ShowPic() cnn.Execute sql Adodc1.Refresh MsgBox (添加成功!) End If End Sub 浏览按钮点击事件处理代码: Private Sub cmdBrowse_Click() On Error Resume Next With cmdlFilePath 使用文件对话框选择图片文件 .Filter = JPG Files|*.JPG|Bitmaps|*.BMP .ShowOpen txtFilePath.Text = .FileName End With Picture1.Picture = LoadPicture(FileName) 加载选定的图片 End Sub Public Sub ShowPic() On Error Resume Next Open pictemp For Binary Access Write As lngDataFile lngLengh = rsImage!picImage.ActualSize intChunks = lngLengh \ ChunkSize intFragment = lngLengh Mod ChunkSize ReDim Chunk(intFragment) Chunk() = rsImage!picImage.GetChunk(intFragment) Put lngDataFile, , Chunk() For i = 1 To intChunks ReDim Buffer(ChunkSize) Chunk() = rsImage!picImage.GetChunk(ChunkSize) Put lngDataFile, , Chunk() Next i Close lngDataFile FileName = pictemp Picture1.Picture = LoadPicture(FileName) 加载临时图片文件中的内容 End Sub 切换到另一个表单的按钮点击事件处理代码: Private Sub Command4_Click() Me.Hide Form7.Show End Sub SQL查询刷新按钮点击事件处理代码: Private Sub Command5_Click() Set DataGrid1.DataSource = Nothing Adodc1.Refresh Set Text1(0).DataSource = Adodc1 Set Text1(2).DataSource = Adodc1 Set Text1(3).DataSource = Adodc1 End Sub 表单加载时的初始化代码: Private Sub Form_Load() Text1(0).Text = Text1(2).Text = Text1(3).Text = rsImage.LockType = ad
  • 的数据库课程设计
    优质
    本课程设计旨在通过开发饭店点菜系统数据库,培养学生在实际项目中应用数据库原理与技术的能力。学生将学习并实践如何规划、设计及优化数据库结构以满足餐厅运营需求,同时掌握SQL编程技巧用于实现高效的数据管理功能。 本系统的目标是为用户提供迅速且高效的服务,减少手工处理的繁琐与误差,并及时、准确地反映饭店的工作情况及经营状况,从而提高服务质量并获得更好的经济效益。具体目标包括: 1. 快速完成顾客点菜。 2. 准确记录每笔消费信息。 3. 实时提供最新菜单内容。 4. 方便查询顾客的消费详情。 5. 简化职工管理流程。 本系统旨在为用户提供一站式服务,涵盖从工程实施到文档整理的所有方面。
  • C的书管理
    优质
    本项目采用C语言编程技术,旨在构建一个功能简易但实用性高的书店管理信息系统。系统涵盖图书信息录入、查询、修改及删除等基础操作,为小型书店提供高效便捷的管理解决方案。 基于C语言与DevC++开发一个简易的书店管理系统,该系统具备图书列表查询、图书销售记录管理、图书入库操作、图书检索以及删除功能,并附有课程设计报告。
  • 使8086汇编
    优质
    本项目采用8086汇编语言设计并实现了一个简易点歌系统,用户可以通过界面输入歌曲编号来点播音乐,体验经典处理器架构下的编程乐趣和挑战。 使用8086汇编语言编写一个点歌系统:输入不同的数字来播放相应的音乐。“1”代表《刚好遇见你》,“2”代表《成都》,“3”代表《暧昧》。如果输入“0”,则退出该点歌系统。
  • C++酒
    优质
    C++酒店菜单点餐系统是一款专为餐饮业设计的高效点餐软件,利用C++语言开发。该系统提供直观易用的用户界面,支持快速录入与查询菜品信息、处理订单及统计销售数据等功能,旨在优化顾客就餐体验和餐厅运营管理效率。 计算机点餐系统能够完成权限管理、点餐管理、订单管理、结账管理和菜谱评分等功能。欢迎大家一起进行交流。
  • C
    优质
    本项目采用C语言编程技术,旨在设计并实现一个功能全面、用户友好的点歌系统。该系统能够支持歌曲查询、播放以及管理等核心功能。通过高效的数据结构和算法优化,提供流畅的用户体验,是学习C语言与软件开发实践相结合的理想案例。 主要内容:请模仿KTV点歌系统,使用C语言编写软件来完成以下任务: 1. 读取功能:从song.txt文件中读取歌曲的信息; 2. 查看功能:允许用户浏览所有的歌曲,并查看某个歌手演唱的所有歌曲; 3. 删除功能:删除指定的歌曲。 提示:每首歌曲包含如下信息:歌曲编号、歌曲名、歌手姓名、专辑名称和歌曲流派。
  • C
    优质
    本项目采用C语言编程技术,旨在设计并实现一套高效、用户友好的餐厅点餐系统。该系统简化了点餐和订单处理流程,提升了顾客就餐体验与餐厅运营效率。 本段落实例展示了C语言点餐系统的具体代码,供参考。 ```cpp #include #include #include using namespace std; class shiwu { public: string mingzi; int price; shiwu() {} shiwu(string n, int p) : mingzi(n), price(p) {} }; shiwu zhucan[3] = {shiwu(大汉堡, 13), shiwu(烤肉饭, 13), shiwu(鸡肉卷, 1}; ```
  • C管理
    优质
    本项目旨在运用C语言编程技术构建一个高效、稳定的酒店管理信息系统,涵盖客房预订、入住登记、账单处理等功能模块。 本段落详细介绍了如何使用C语言实现酒店管理系统,并提供了示例代码供参考学习。对于对此主题感兴趣的读者来说,这些内容具有很高的实用价值。
  • C管理
    优质
    本项目采用C语言编程实现了一个功能全面的酒店管理系统,涵盖客房管理、订单处理及客户信息维护等模块,旨在提高酒店运营效率与服务质量。 这是我完成的一个项目,使用C语言和c++ Qt实现了酒店的管理系统功能,包括点菜、删菜以及查询菜单等一系列操作。该项目采用SQLite作为数据库,并已在mini2440设备上成功测试通过。
  • C管理
    优质
    本项目采用C语言编程实现一个功能全面的酒店管理系统,涵盖客房管理、客户信息处理及预订系统等核心模块,旨在提高酒店运营效率与服务质量。 本段落实例展示了如何用C语言实现酒店管理系统,并提供相关代码供参考。 以下是部分代码: ```c #include #include #include #include #include #define NUM 1000 // 控制房间个数 int j; void LoginRoom(); // 登记房屋 void SearchRoom(); // 搜寻房屋 void ChangeRoom(); // 更换住房 void OutRoom(); // 退房 void save(); // 保存信息 ``` 以上代码定义了一些基本函数,用于处理酒店管理系统的各项功能。