【正文】 e As ) Handles Dim frm As New 拼音點(diǎn)歌() () () End Sub Private Sub Button6_Click(ByVal sender As , ByVal e As ) Handles Dim frm As New 酒水頁(yè)面() () () End Sub Private Sub Button15_Click(ByVal sender As , ByVal e As ) Handles End Sub Private Sub Button14_Click(ByVal sender As , ByVal e As ) Handles End Sub Private Sub Button13_Click(ByVal sender As , ByVal e As ) Handles End Sub Private Sub Button12_Click(ByVal sender As , ByVal e As ) Handles End Sub Private Sub Button8_Click(ByVal sender As , ByVal e As ) Handles End Sub Private Sub Button5_Click(ByVal sender As , ByVal e As ) End Sub Private Sub Button4_Click(ByVal sender As , ByVal e As ) End Sub Private Sub Button3_Click(ByVal sender As , ByVal e As ) End Sub Private Sub Button2_Click(ByVal sender As , ByVal e As ) End SubEnd Class◆ 此為歌曲管理Public Class 歌曲管理 Private Sub DataGrid1_Navigate(ByVal sender As , ByVal ne As ) Handles End Sub Private Sub Inherits Private Sub AddCmd_Click(ByVal sender As , ByVal e As ) Handles = False = False = False Try (DataSet21, DepartmentTable).AddNew() = True = True = False Catch ex As Exception MsgBox() End Try End Sub Private Sub 系部數(shù)據(jù)錄入_Load(ByVal sender As , ByVal e As ) Handles = Space(13) amp。 If (0). = 0 Then If (kkk). = 0 Then () Else 39。 39。 amp。 39。 amp。DataBase=chuanshuohuiyuan。◆此為歡迎界面Public Class 歡迎界面 Private Sub PictureBox1_Click(ByVal sender As , ByVal e As ) Handles Dim frm As New 登錄頁(yè)面() () () End SubEnd Class◆此為登錄頁(yè)面Imports Imports Public Class 登錄頁(yè)面 Inherits Private Sub GpxTest(ByVal tb As String) If = 6 Then amp。在此頁(yè)面中我們將可以添加歌曲的名稱、演唱歌手、歌手的語種、歌曲的類型，方便在用戶系統(tǒng)中索引變得更加方便?！?此為此為【歌曲管理】頁(yè)面。主要信息包括：酒名、酒精度、類型、數(shù)量、單價(jià)。◆ 此為【酒水管理】頁(yè)面?！?此為【數(shù)據(jù)庫(kù)用戶表】，從此處可以看出，此系統(tǒng)在開發(fā)時(shí)預(yù)設(shè)了一個(gè)管理員的用戶，其密碼為123456，目的為第一次可以登錄進(jìn)管理員系統(tǒng)，而后在【用戶管理】頁(yè)面進(jìn)行刪除操作，并添加新的管理員、用戶。◆ 例如我現(xiàn)在單擊了【用戶管理】按鈕?！?歌曲管理：對(duì)數(shù)據(jù)庫(kù)中的歌曲信息進(jìn)行添加、刪除、更新、維護(hù)操作。◆ 用戶管理：對(duì)數(shù)據(jù)庫(kù)中的用戶信息進(jìn)行添加、刪除、更新、維護(hù)操作。接下來就讓我們來一一了解這些功能帶給我們的便捷！◆ 此為【管理系統(tǒng)】歡迎界面。酒吧管理系統(tǒng)簡(jiǎn)介： 【管理系統(tǒng)】是“會(huì)員酒吧系統(tǒng)”中另一大板塊，此板塊的主要作用是和SQL數(shù)據(jù)庫(kù)做一個(gè)數(shù)據(jù)交互，用這一套VB管理系統(tǒng)管理數(shù)據(jù)庫(kù)?！?此為【酒水服務(wù)】頁(yè)面，本頁(yè)面擁有三個(gè)選項(xiàng)卡，切換后可以看到對(duì)應(yīng)的酒水信息。我們可以單機(jī)任何一個(gè)明星的頭像或者上面的索引條件，即可跳轉(zhuǎn)到【拼音點(diǎn)歌】頁(yè)面完成點(diǎn)歌操作，并且本頁(yè)也設(shè)置主頁(yè)和返回兩個(gè)按鈕，不選擇明星的情況下也可以返回主菜單?！?例如我現(xiàn)在單擊了【明星點(diǎn)歌】按鈕。本頁(yè)面中扔然包含明星點(diǎn)歌、呼叫吧臺(tái)、酒水服務(wù)三個(gè)核心跳板。（豎置↓）例如12323243243243243243223234423234234423234234◆ 例如我現(xiàn)在單擊了【拼音點(diǎn)歌】按鈕。 區(qū)域四個(gè)按鈕，分別對(duì)應(yīng)四個(gè)窗體。最后是歌曲控制中的五個(gè)控制按鈕，分別為：快進(jìn)、快退、播放、暫停、停止。用戶點(diǎn)歌系統(tǒng)簡(jiǎn)介： 用戶點(diǎn)歌系統(tǒng)是“傳說會(huì)員酒吧”中最重要的板塊之一，本板塊主要包括歌曲狀態(tài)控制中的：靜音、原唱、播放、重播、切歌、音量+、音量 等功能?！?此為【登錄失敗】頁(yè)面，本頁(yè)面的出現(xiàn)說明您的VIP號(hào)未在數(shù)據(jù)庫(kù)中注冊(cè)，或者您的密碼被惡意修改、遺忘。為了您的個(gè)人賬戶密碼安全，本開發(fā)小組特編輯一個(gè)虛擬小鍵盤供各位用戶使用，小鍵盤的鍵位分別為1~0、A~C、小數(shù)點(diǎn)，完全符合一般錄入密碼要求，也可以使用虛擬鍵盤與實(shí)體鍵盤切換的方式輸入。（豎置↓）◆◆ 此為“傳說會(huì)員酒吧”的【登錄頁(yè)面】，此處VIP為系統(tǒng)預(yù)設(shè)管理員賬戶，密碼為123456?！?此為“傳說會(huì)員酒吧”的【歡迎頁(yè)面】，也就是一般所謂的待機(jī)頁(yè)面。故，此系統(tǒng)被稱為半交互系統(tǒng)。酒水服務(wù)頁(yè)面中的酒水信息。其次，我們可以將用戶點(diǎn)歌系統(tǒng)看作前臺(tái)界面，而數(shù)據(jù)庫(kù)作為用戶點(diǎn)歌系統(tǒng)的后臺(tái)，數(shù)據(jù)庫(kù)主要提供數(shù)據(jù)給用戶點(diǎn)歌系統(tǒng)，主要提供的數(shù)據(jù)為：登錄頁(yè)面中的用戶帳號(hào)、用戶密碼、用戶等級(jí)。首先可以講數(shù)據(jù)庫(kù)和數(shù)據(jù)庫(kù)管理系統(tǒng)看為一個(gè)整體，即數(shù)據(jù)庫(kù)管理系統(tǒng)是為管理數(shù)據(jù)庫(kù)而存在的。四、 設(shè)計(jì)理念登錄頁(yè)面一、畫圖數(shù)據(jù)管理系統(tǒng)用戶點(diǎn)歌系統(tǒng)用戶管理數(shù)據(jù)庫(kù)提供數(shù)據(jù)管理拼音點(diǎn)歌酒水管理明星點(diǎn)歌歌曲管理酒水服務(wù)呼叫吧臺(tái)彈出提示二、文字說明 PS：系統(tǒng)預(yù)設(shè)一個(gè)賬戶為“管理員”，初始密碼為123456。學(xué)生自己?jiǎn)为?dú)分組完成。并為今后從事應(yīng)用程序開發(fā)打下一定的基礎(chǔ)。正確建立的程序設(shè)計(jì)思想，能夠根據(jù)用戶提出的要求，設(shè)計(jì)出系統(tǒng)功能框架和數(shù)據(jù)庫(kù)，通過程序編碼來實(shí)現(xiàn)系統(tǒng)的各項(xiàng)功能。學(xué) 期： 2010/2011 專 業(yè)： 計(jì)算機(jī)信息管理 班 級(jí)： 計(jì)信1001 姓 名：高培翔、付楠、曹春濤 指導(dǎo)教師： 韓天成 內(nèi)蒙古機(jī)電職業(yè)技術(shù)學(xué)院信息與管理工程系VB課 程 設(shè) 計(jì) 報(bào) 告 評(píng) 語專 業(yè)班 級(jí)學(xué)號(hào)姓 名成績(jī)計(jì)算機(jī)信息管理計(jì)信10011040110107高培翔題目傳說會(huì)員酒吧管理（點(diǎn)歌）系統(tǒng)總體評(píng)價(jià)評(píng)閱人（簽字） 年 月 日VB課 程 設(shè) 計(jì) 報(bào) 告 評(píng) 語專 業(yè)班 級(jí)學(xué)號(hào)姓 名成績(jī)計(jì)算機(jī)信息管理計(jì)信10011040110140付楠題目傳說會(huì)員酒吧管理（點(diǎn)歌）系統(tǒng)總體評(píng)價(jià)評(píng)閱人（簽字） 年 月 日VB課 程 設(shè) 計(jì) 報(bào) 告 評(píng) 語專 業(yè)班 級(jí)學(xué)號(hào)姓 名成績(jī)計(jì)算機(jī)信息管理計(jì)信10011040110111曹春濤題目傳說會(huì)員酒吧管理（點(diǎn)歌）系統(tǒng)總體評(píng)價(jià)評(píng)閱人（簽字） 年 月 日目 錄第一部分 設(shè)計(jì)任務(wù)……………………………………… 6一、 課程設(shè)計(jì)目的……………………………………… 6二、 課程設(shè)計(jì)任務(wù)與要求……………………………… 6一）基本任務(wù)……………………………………………… 6二）開發(fā)工具……………………………………………… 6三）設(shè)計(jì)成果………………………………………………6三、 課程設(shè)計(jì)題目及主要功能要求…………………… 6一）設(shè)計(jì)題目………………………………………………… 7二）主要功能………………………………………………… 7四、 設(shè)計(jì)理念…………………………………………… 7一）畫圖……………………………………………………… 7二）文字……………………………………………………… 7第二部分 窗體及其作用介紹…………………………… 7一、用戶點(diǎn)歌系統(tǒng)………………………………………… 11二、酒吧管理系統(tǒng)………………………………………… 16第三部分 代碼公示……………………………………… 18第四部分 實(shí)訓(xùn)總結(jié)……………………………………… 41一、 實(shí)訓(xùn)總結(jié)……………………………………………… 41二、 特別感謝……………………………………………… 41第一部分 設(shè)計(jì)任務(wù)一、課程設(shè)計(jì)目的VB設(shè)計(jì)是VB程序設(shè)計(jì)基礎(chǔ)的重要教學(xué)環(huán)節(jié)，其目的是鞏固和深化VB程序設(shè)計(jì)的基礎(chǔ)知識(shí)，是學(xué)生進(jìn)行程序設(shè)計(jì)的初步訓(xùn)練。通過本課程設(shè)計(jì)，使學(xué)生進(jìn)一步掌握面向?qū)ο蟪绦蛟O(shè)計(jì)的基本思想；掌握常用對(duì)象的基本屬性、事件和方法；掌握基本語法和程序設(shè)計(jì)方法；掌握各種數(shù)據(jù)處理控件的使用方法，掌握數(shù)據(jù)庫(kù)應(yīng)用程序的開發(fā)技術(shù)；掌握程序的運(yùn)行、調(diào)試方法。提高學(xué)生綜合應(yīng)用知識(shí)能力；提高學(xué)生分析問題和解決問題能力；提高撰寫書面報(bào)告能力；訓(xùn)練學(xué)生自主學(xué)習(xí)能力、創(chuàng)新能力和協(xié)作能力；學(xué)生通過查閱資料或參考書，增加對(duì)VB知識(shí)應(yīng)用領(lǐng)域的了解。二、課程設(shè)計(jì)任