【正文】 的舊密碼是否正確，并判斷操作員兩次輸入的新密碼是否一致，這就防止操作員輸入錯(cuò)誤密碼，而將其添加到數(shù)據(jù)庫(kù)。圖 所示為修改密碼工作流程圖 26 用 戶輸 入 新 密 碼修 改 成 功是是密 碼 是 否 正 確否新 密 碼 與 檢 驗(yàn) 密 碼是 否 一 致否 圖 修改密碼工作流程圖 設(shè)置上機(jī)費(fèi)率 設(shè)置上機(jī)費(fèi)率是超級(jí)用戶特有的功能，可以根據(jù)不同的客戶類型，設(shè)定不同的上機(jī)費(fèi)率 ，在這里設(shè)計(jì)為臨時(shí)用戶、普通用戶、銀卡用戶、金卡用戶，不同類型的客戶，不同上機(jī)費(fèi)率也不同。 具體操作：“操作員管理”→“設(shè)置上機(jī)費(fèi)率”命令，彈出“設(shè)置上機(jī)費(fèi)率”窗口。在這分別對(duì)臨時(shí)用戶、普通會(huì)員、銀卡會(huì)員、金卡會(huì)員的上機(jī)費(fèi)率進(jìn)行設(shè)定。完成并保存到數(shù)據(jù)庫(kù)。如圖 所示。 27 圖 設(shè)置上機(jī)費(fèi)率圖 具體代碼如： Private Sub BtOK_Click(ByVal sender As , ByVal e As ) Handles Dim TempFeeRules As New ClsFeeRules = 臨時(shí)用戶 = Val() () = 普通用戶 = Val() () = 銀卡用戶 = Val() () = 金卡用戶 = Val() () End Sub 鎖定屏幕 該功能是當(dāng)操作員需要外出，系統(tǒng)不能關(guān)閉時(shí)，防止他人的非法操作系統(tǒng)。在使用該功能時(shí)，主窗體被隱藏，登錄主窗體，要求輸入用戶密碼。 具體操作：“操作員管理” →“鎖定屏幕”命令，程序的窗口將會(huì)被隱藏，彈出鎖定屏幕的窗口，在這里輸入密碼，又可重返主窗口。如圖 所示。 28 圖 鎖定屏幕圖 用戶充值 操作員在使用此功能時(shí)，先輸入用戶名，點(diǎn)擊“讀取”就可讀取用戶的真實(shí)姓名和 余額信息，確認(rèn)輸入的用戶是正確的，再輸入本次充值的金額，“保存”更新用戶賬號(hào)上的余額信息。如圖 所示： 圖 用戶充值圖 “讀取”功能代碼： Private Sub BtnRead_Click(ByVal sender As , ByVal e As ) Handles If Trim() = Then MsgBox(請(qǐng)輸入用戶名！ , , ) Exit Sub 29 End If Dim TempUser As New ClsUser = Trim() () = = End Sub “保存”功能代碼： Private Sub BtnSave_Click(ByVal sender As , ByVal e As ) Handles If Trim() = Then MsgBox(請(qǐng)輸入用戶名！ , , ) Exit Sub End If Dim TempUser As New ClsUser = Trim() If = False Then MsgBox(該用戶不存在！ , , ) Exit Sub End If (Val()) BtnRead_Click(sender, e) = End Sub 具體操作：“用戶信息管理”→“用戶充值”命令，將會(huì)彈出“用戶充值窗口”，在這里可以對(duì)用戶費(fèi)用的讀取、查詢余額、本次充值。填寫信 息后按保存完成充值操作。 查詢費(fèi)用 費(fèi)用查詢能讓用戶清楚詳細(xì)知道費(fèi)用使用情況，操作用在使用此功能時(shí)，必須確定用戶名不為空，查詢?cè)撚脩粝嚓P(guān)的上機(jī)費(fèi)用信息，然后返回一個(gè)數(shù)據(jù)表，并顯示在界面中。 具體操作：“用戶信息管理”→“查詢用戶費(fèi)用”命令，將彈出“查詢費(fèi)用窗口”，輸入用戶 maomao，點(diǎn)確定，將會(huì)在界面的列表中顯示該用戶所有的費(fèi)用記錄，包括本次使用計(jì)算機(jī)，登錄時(shí)間，下機(jī)時(shí)間信息。如圖 所示。 30 圖 查詢用戶費(fèi)用圖 添加用戶信息 操作過程：“用戶信息管理”→“添加用戶信息”命令，將彈出“添加用戶信息”窗口，輸入賬號(hào) aa110，包括密碼、用戶類型、用戶姓名、備注等信息，確認(rèn)賬號(hào)將示意當(dāng)前賬號(hào)在本系統(tǒng)的可用性。所有信息輸入結(jié)束，點(diǎn)“確定”保存。操作過程需要輸入用戶的詳細(xì)信息，輸入完畢后，“確定”按鈕可以將用戶信息插入到數(shù)據(jù)庫(kù)中，此功能主要是記錄用戶的詳細(xì)信息。如圖 所示。 31 圖 添加用戶信息圖 修改用戶信息、刪除用戶信息 這兩個(gè)模塊在功能、操作方法 上大致相同，操作員經(jīng)過這兩個(gè)功能模塊可以即時(shí)對(duì)用戶信息進(jìn)行修改 /刪除，從而保證用戶的各類需求或更正操作員之前的操作失誤。使系統(tǒng)更加人工智能化。修改 /刪除用戶信息功能都是按用戶類型、按用戶姓名或按用戶賬號(hào)方式修改 /刪除用戶信息。 具體操作如：“用戶信息管理”→“修改用戶信息 /刪除用戶信息”命令，將會(huì)彈出相應(yīng)窗口，超級(jí)用戶可以修改 /刪除用戶任意信息。如按用戶類型修改 /刪除用戶信息，是在窗體加載時(shí)，設(shè)置用戶類型為第一選項(xiàng)，然后進(jìn)入界面修改/刪除其用戶信息。如圖 、圖 所示 32 圖 修改用戶 信息圖 圖 刪除用戶信息圖 33 添加計(jì)算機(jī)信息 添加計(jì)算機(jī)信息時(shí)，操作員需要輸入計(jì)算名稱、（ MAC 地址）、機(jī)位編號(hào)、網(wǎng)吧編號(hào)、計(jì)算機(jī)配置、備注等信息，在添加輸入完畢后，點(diǎn)擊“確定”可向數(shù)據(jù)庫(kù)添加計(jì)算機(jī)信息。 具體操作：“計(jì)算機(jī)信息管理”→“添加計(jì)算機(jī)信息”命令，將彈出“添加計(jì)算機(jī)信息”窗口，包括計(jì)算機(jī)名稱、機(jī)位編號(hào)、網(wǎng)吧編號(hào)、計(jì)算機(jī)配置，所有信息輸入結(jié)束，點(diǎn)“確定”保存。如圖 所示。 圖 添加計(jì)算機(jī)信息圖 修改 /刪除計(jì)算機(jī)信息 這兩個(gè)模塊在功能、操作方法上大致相同。操作員經(jīng)過這兩個(gè)功能模塊可以即時(shí)對(duì)計(jì)算機(jī)信息進(jìn)行修改 /刪除，從而使得網(wǎng)吧的計(jì)算機(jī)管理不出現(xiàn)混亂或同一編號(hào)計(jì)算機(jī)出現(xiàn)，使系統(tǒng)人工智能化。修改 /刪除計(jì)算機(jī)信息功能都是按網(wǎng)吧編號(hào)、按配置和按機(jī)算機(jī)名稱修改 /刪除計(jì)算機(jī)信息。 具體操作如：“計(jì)算機(jī)信息管理”→“修改計(jì)算機(jī)信息 /刪除計(jì)算機(jī)信息”命令，將會(huì)彈出相應(yīng)窗口，操作員可以修改 /刪除計(jì)算機(jī)信息。如按網(wǎng)吧編號(hào)修改 /刪除計(jì)算機(jī)信息，是在窗體加載時(shí)，設(shè)置按網(wǎng)吧編號(hào)為第一選項(xiàng)，然后進(jìn)入界面修改 /刪除其計(jì)算機(jī)信息。如圖 、圖 所示 34 圖 修改計(jì)算機(jī)信息圖 圖 刪除計(jì)算機(jī)信息圖 35 客戶端登錄 客戶端是獲取用戶的用戶名和密碼的窗口，界面設(shè)計(jì)有：用戶名、密碼輸入，四個(gè)控件：登錄、下機(jī)、設(shè)置、退出。即時(shí)支持客戶的工作，滿足客戶使用時(shí)各種需求。啟動(dòng)服務(wù)器端即可進(jìn)入客戶端，如圖 所示，登錄成功后，會(huì)顯示登錄成功信息，此時(shí)服務(wù)器端將會(huì)顯示機(jī)器的 使用情況。 圖 客戶端登錄圖 登錄 在輸入用戶名、密碼后，向服務(wù)器端發(fā)送連接請(qǐng)求的功能模塊。在其登錄成功后，客戶端窗口最小化，并以托盤圖標(biāo)顯示在窗口的右下角，當(dāng)用戶點(diǎn)擊托盤時(shí)，需要重新顯示客戶端界面?？蛻舳说卿浌ぷ髁鞒虉D如圖 所示 : 36 服 務(wù) 器 端判 斷 用 戶 余 額客 戶 端登 錄 成 功登 錄 請(qǐng) 求用 戶 確 認(rèn)余 額 充 足非 注 冊(cè) 用 戶 /密 碼 不 正 確余 額 不 足 圖 客戶端登錄流程圖 登錄模塊代碼如： Private Sub BtLogin_Click(ByVal sender As , ByVal e As ) Handles Dim ConnectMessage As String = ConnectMessage += LOGIN, + ConnectMessage += , + ConnectMessage += , + Trim() ConnectMessage += , + Trim() (ConnectMessage) = False = False () End Sub 下機(jī) 在用戶使用完計(jì)算機(jī)，必須點(diǎn)擊“下機(jī)”按鈕，以結(jié)算本次上機(jī)所用的金額，代碼如下： Private Sub BtLogoff_Click(ByVal sender As , ByVal e As ) Handles Dim ConnectMessage As String = ConnectMessage += LOGOFF, + 37 ConnectMessage += , + ConnectMessage += , + Trim() (ConnectMessage) = True = True End Sub 設(shè)置 為了滿足不同客戶的需求，專門設(shè)定的一個(gè)功能。客戶端啟動(dòng)以后，如需要設(shè)置服務(wù)器的 IP地址，點(diǎn)擊“設(shè)置”設(shè)置 IP 地址。代碼如下： Private Sub BtSet_Click(ByVal sender As , ByVal e As ) Handles () End Sub 其設(shè)置窗口示意圖如圖 所示 圖 設(shè)置窗口示意圖 退出 為臨時(shí)用戶設(shè)定的退出窗口，或其他用戶不意查詢余額時(shí)可直接點(diǎn)擊使用。體現(xiàn)了系統(tǒng)的快捷性能。 38 第六章：總結(jié) 本文體現(xiàn)了一個(gè)系統(tǒng)的編程規(guī)范，文章內(nèi)容涵蓋了系統(tǒng)的需求、數(shù)據(jù)庫(kù)的需求分析、系統(tǒng)設(shè)計(jì)、界面設(shè)計(jì)與及系統(tǒng)的最終實(shí)現(xiàn)。 網(wǎng)吧計(jì)費(fèi)系統(tǒng)的開發(fā)技術(shù)特點(diǎn) 整個(gè)網(wǎng)吧計(jì)費(fèi)系統(tǒng)的開發(fā)有以下幾個(gè)特點(diǎn) 1. 屬于典型的三層系統(tǒng)代碼結(jié)構(gòu)； 2. 基于 C/S（客戶端 /服務(wù)器）的通信結(jié)構(gòu)； 3. 服務(wù)器端與客戶端進(jìn)行簡(jiǎn)單的通信協(xié)議； 4. 網(wǎng)路通信技術(shù)與數(shù)據(jù)庫(kù)存技術(shù)綜合開發(fā) 。 系統(tǒng)的不足與前景 本系統(tǒng)雖是 C/S 型網(wǎng)絡(luò)結(jié)構(gòu)，但因?yàn)閿?shù)據(jù)庫(kù) Access 只能承受少量客戶端，系統(tǒng)的訪問量相對(duì)比較小，只能局限于網(wǎng)吧、圖書館等局域網(wǎng)中，這應(yīng)有相應(yīng)的解決方案，使其不斷得到改進(jìn)。在開發(fā)過程中，切身體會(huì)了利用 結(jié)合Socket 對(duì)象模型開發(fā)數(shù)據(jù)庫(kù)系統(tǒng)的高效和快捷，因此對(duì)將本系成功能更新更高效、通用性更強(qiáng)有了新的期待。 39 參考文獻(xiàn) [1] 周緒，管麗娜 , 白海波 編著 .SQL Server 2021 中文版 [M]. 北京：清華大學(xué)出版社， [2] 杭國(guó)英 主編 . Visual Basic 程序設(shè)計(jì) [M]. 北京：北京機(jī)械工業(yè)出版社， [3] 豈興明 ,矯津毅 , 銀華強(qiáng)編著 .Visual 項(xiàng)目開發(fā)寶典 [M].北京：電子工業(yè)出版社， [4] 陳語(yǔ)林 編著 .Visual 程序設(shè)計(jì)教程 [M].北京 :中國(guó)水利水電出版社 , [5] 郝佳波等 主編 . Visual 實(shí)用教程 [M].陜西： 西安電子科技大學(xué)出版社 ， [6] 潘英 ， 陳君等譯 .Visual 專業(yè)項(xiàng)目實(shí)例開發(fā) [M].北京： 中國(guó)水利水電出版社 ， [7] 王棟 主編 . Visual Basic 課程設(shè)計(jì) [M]. 北京 :清華大學(xué)出版社， [8] 薩師煊 王珊 編 著 . 數(shù)據(jù)庫(kù)系統(tǒng)概論 [M]. 北京：高等教育出版社， [9] 王千祥 等譯 .實(shí)用軟件體系結(jié)構(gòu)