【正文】 If 0 Then For j = 0 To 1 (j, (i).ToString) (i) Next End If Next If = 0 Then = True = True = False = False End If End Select End Sub Private Sub Button4_Click(ByVal sender As , ByVal e As ) Handles Dim i, j As Integer Select Case DirectCast(sender, Button).Name Case For i = 0 To 1 ((i)) Next () = True = True = False = False End Select End Sub 28 End Class系統(tǒng)管理中菜單編輯代碼運行的結(jié)果 點餐界面主界面中選擇前臺餐飲管理中的點餐后出現(xiàn)的點餐界面，如圖：點餐代碼Public Class Form5 Private Sub Button1_Click(ByVal sender As , ByVal e As ) Handles Dim sum As String If = True Then 29 sum = 100 End If If = True Then sum = 100 + 80 End If If = True Then sum = 100 + 80 + 20 End If = sum End SubEnd Class前臺餐飲管理中點餐代碼運行的結(jié)果 訂單界面主界面中選擇前臺餐飲管理中的訂單后出現(xiàn)的訂單界面，如圖： 30 前臺餐飲管理中訂單運行的結(jié)果 訂座界面主界面中選擇前臺餐飲管理中的訂座后出現(xiàn)的訂單界面，如圖：訂座代碼Public Class Form2 Private Sub Form2_Load(ByVal sender As , ByVal e As ) Handles (就餐) (空閑) End Sub 31 End Class前臺餐飲管理中訂座運行的結(jié)果主界面中選擇員工管理中的個人信息后出現(xiàn)的訂單界面，如圖：員工管理系統(tǒng)中個人信息代碼Public Class Form3 Private Sub Form3_Load(ByVal sender As , ByVal e As ) Handles (男) (女) 32 End Sub Private Sub Button1_Click(ByVal sender As , ByVal e As ) Handles Dim a As String Dim b As Boolean Dim c As Boolean a = b = c = Select Case Case Is = 男 If a = 001 amp。 b = 張三 amp。 c = 經(jīng)理 Then = 恭喜您，添加成功！ = True Else = 非常遺憾，添加失敗！ End If Case Is = 女 If a = 002 amp。 b = 李四 amp。 c = 員工 Then = 恭喜您，添加成功！ = True Else = 非常遺憾，添加失??！ End If End Select End Sub Private Sub Button2_Click(ByVal sender As , ByVal e As ) Handles () End SubEnd Class 33 員工管理系統(tǒng)中個人信息運行結(jié)果課程設(shè)計總結(jié)或結(jié)論本系統(tǒng)在開發(fā)過程中，嘗試著包括運用 VB 等多種數(shù)據(jù)庫連接技術(shù)。在系統(tǒng)開發(fā)的最后階段，不斷測試和調(diào)試系統(tǒng)，總結(jié)系統(tǒng)中存在的問題，最終在老師和同學的幫助下，完成整個系統(tǒng)的開發(fā)過程。盡管系統(tǒng)已經(jīng)開發(fā)完成，但由于經(jīng)驗不足和對實際生產(chǎn)生活不熟悉，在系統(tǒng)中仍然存在著許多的問題，還不能滿足實際需求，需要在功能方面繼續(xù)完善。設(shè)計過程中，小組成員積極配合，商量軟件各方面存在的問題，并認真改正不好的地方，最終完成了本次課程設(shè)計的任務(wù)，增強了小組間的凝聚力。參考文獻[1] 權(quán)明富，齊佳音，[J].南開管理評論，2022，7(3):1718.[2] 劉小洪，鄒鵬. 商業(yè)銀行客戶關(guān)系價值管理模型研究[J].管理科學，2022，18(3):5760.[3] 劉展，馮宗憲. 模型在我國上市公司信用評估中的應用研究[J].系統(tǒng)工程理論與實踐，2022(2):7682.[4] 李純青，徐寅峰，張洋. 基于知識管理的動態(tài)客戶關(guān)系管理研究[J].中國管理科學，2022，12(2): 8894.[5] 呂延杰，尹濤，王琦. 客戶關(guān)系管理與主題分析[M].北京，中國郵電出版社，2022. [6] 秦壽康等. 綜合評價原理與應用[M].北京：電子工業(yè)出版社，2022.[7] 李捷等,Visual Basic 2022 程序設(shè)計教程[M].機械工業(yè)出版社.小組成員分工說明：系統(tǒng)分析：劉睿 34 系統(tǒng)設(shè)計：王銀柳 馬新蓮 實驗報告：王銀柳