【正文】 34 圖 修改計算機信息圖 圖 刪除計算機信息圖 35 客戶端登錄 客戶端是獲取用戶的用戶名和密碼的窗口，界面設計有：用戶名、密碼輸入，四個控件：登錄、下機、設置、退出。如圖 、圖 所示 32 圖 修改用戶 信息圖 圖 刪除用戶信息圖 33 添加計算機信息 添加計算機信息時，操作員需要輸入計算名稱、（ MAC 地址）、機位編號、網(wǎng)吧編號、計算機配置、備注等信息，在添加輸入完畢后，點擊“確定”可向數(shù)據(jù)庫添加計算機信息。所有信息輸入結(jié)束，點“確定”保存。如圖 所示。圖 所示為修改密碼工作流程圖 26 用 戶輸 入 新 密 碼修 改 成 功是是密 碼 是 否 正 確否新 密 碼 與 檢 驗 密 碼是 否 一 致否 圖 修改密碼工作流程圖 設置上機費率 設置上機費率是超級用戶特有的功能，可以根據(jù)不同的客戶類型，設定不同的上機費率 ，在這里設計為臨時用戶、普通用戶、銀卡用戶、金卡用戶，不同類型的客戶，不同上機費率也不同。根據(jù)用戶選中的用戶名，構造用戶信息表中查詢相應用戶的信息，將這些信 息顯示在界面上。添加操作員設計圖如圖 所示。 主菜單可以對系統(tǒng)的操作員信息，用戶信息和計算機信息進行管理；工具欄為用戶提供了一些操作的快捷方式；廣播消息可以向用戶發(fā)送文本消息和關機等命令；客戶端的連接情況則經(jīng)顯示面板顯示。它主要是網(wǎng)絡數(shù)據(jù)傳輸?shù)妮d體，并提供同步、異步方式來訪問網(wǎng)絡數(shù)據(jù)流。 TcpListener 主要用以偵聽端口號，并接收遠程主機的 TCP連接申請 ； TcpClient 主要用以提出 TCP 連接申請 ； NetworkStream類是實現(xiàn) TCP數(shù)據(jù)傳輸?shù)幕A數(shù)據(jù)流 ； StreamReader類 的 作用是通過操作 NetworkStream，實現(xiàn)從網(wǎng)絡接收數(shù)據(jù) ； StreamWriter 類 的 作用是通過操作 NetworkStream，實現(xiàn)向網(wǎng)絡16 傳輸數(shù)據(jù)。 服 務 器 端客 戶 端請求連接信息接受請求再次連接信息確認再次連接信息登錄/注銷/連接確認同步信息 圖 服務器端與客戶端的 完整通信過程圖 中的通信類 TCP 協(xié)議是 TCP/IP 協(xié)議簇中的傳輸層中的一個協(xié)議，也是 TCP/IP 協(xié)議簇最為重要的協(xié)議之一。當客戶端傳入一個連接請求時，后臺程序?qū)⒔邮茉撜埱?，同時實例化一個 Socket 對象負責與該客戶端的 Socket 對象進行通信。如圖 所示： 圖 操作員信息表圖 2. 用戶信息表： 包括的數(shù)據(jù)字段有：用戶名、密碼、用戶真實姓名、用戶類型、賬號余額、出生日期、聯(lián)系電話、有效日期、證件類型、證件號碼、住址、郵編、備注。數(shù)據(jù)庫的設計目的在于提供高的數(shù)據(jù)庫存儲效率，保證數(shù)據(jù)庫的完整性和一致性。這里要區(qū)分不同的用戶類型，按不同的用戶類型設置上機費用。 (3). 系統(tǒng)的安全性 為了使系統(tǒng)能夠在使用的過程中，用戶利益得到保障。 (2). 系統(tǒng)應具有良好的穩(wěn)定性，實用性，安全性。 系統(tǒng)優(yōu)點 綜上 所述，人工管理網(wǎng)吧實在存在很大的問題，而且浪費太多的人力，物力。因而對于任何一款軟件來說，做好它的根本在于它的需求分析。 (3). 可以方便地生成各種數(shù)據(jù)對象，利用存儲的數(shù)據(jù)建立窗體和報表，可視性好。 (4). 程序代碼結(jié)構化更強，開發(fā)環(huán)境舒適體貼。 的版本號是 Visual Basic ， 它 的 運 行 是 建 立 在CLR(Common Language Runtime) 和MSIL(Microsoft Intermediate Language)虛擬器上的。檢測通過后產(chǎn)生一條用戶上機記錄，記錄下計算機代碼、卡號、登錄開始時間等信息。 (2). 增加網(wǎng)吧的開放時間，提高設備的利用率 。文中主要介紹了系統(tǒng)的基本功能和系統(tǒng)結(jié)構組成情況，內(nèi)容包括系統(tǒng)需求分析、系統(tǒng)設計原則、系統(tǒng)設計思想、系統(tǒng)功能模塊描述、數(shù)據(jù)庫設計、系統(tǒng)通信 過程、通信協(xié)議等，同時還對開發(fā)環(huán)境 Visual 、Access 2021 數(shù)據(jù)庫、 Visual 技術的使用進行簡單介紹，并列出了一些程序代碼以說明該系統(tǒng)應用程序設計的實現(xiàn)過程。隨著計算機各種外圍設備技術的發(fā)展，以上工作 通過 計算機就可以很方便地實現(xiàn)。這里區(qū)分不同的用戶類型，按照不同用戶類型設置上機費用等； (3). 計算機信息管理 主要包括團體添加計算機信息、修改計算機信息、刪除計算機信息 3 個模塊。客戶端程序要求正常?？吭谙到y(tǒng)托盤中，用戶下機時要求點擊此圖標進行下機，客戶端將下機信息發(fā)送到“服務器端”，然后重新彈出登錄界面，等待下一個用戶登錄。 (2). 強大的面向?qū)ο筇匦浴? 在 Access 2021 版本中， Access 使用了表格來實現(xiàn)數(shù)據(jù)的采集、維護、分析和傳播等功能，此外，它還提供了關系型數(shù)據(jù)庫所要求的相當豐富的數(shù)據(jù)運算和數(shù)據(jù)匯總能力。 (2). 需求分析的任務： 開發(fā)軟件系統(tǒng)最為困難的部分是準確說明開發(fā)什么，最為困難的概念性工作便是編寫出詳細的技術需求，這包括所有面向用戶，面向機器和其 他軟件系統(tǒng)的接口，同時這也是一旦出錯，將最終會給系統(tǒng)帶來極大損害的部分，并且以后再對 它 修改也極為困難的 。上機用戶有時也會因管理人員的失誤帶來不必要的麻煩。 (4).工作迅速快捷。Visual 中有兩種窗體包， Windows 窗體以及 Web 窗體；一個新版的 ADO 用于接受離線數(shù)據(jù)源；新的語言，移走了原來的關鍵字，提高 Type 數(shù)據(jù)的安全性以及提供低級別結(jié)構以滿足高級別開發(fā)者的需求。服務器端的功能需求具體表述有： 操作員管理功能模塊 該模塊主要提供操作員登錄、操作員管理、修改密碼和設置上機費用的功 能。底層代碼包括 ClsSuperUser 類、 ClsUser類、 ClsComputer 類、 ClsFeeRules 類、 ClsDBOperation 類、 ClsServer 類和 ClsClient類。 1. 操作員信息表 包括的數(shù)據(jù)字段有：操作員賬號、密碼、操作員真實姓名、用戶模塊、計算機模塊、備注。如表 所示 字段名 意義 字段類型 字段大小 關鍵字 UserName 用戶名 文本 10 LoginTime 登錄時間 日期 10 LogoffTime 下機時間 日期 日期 TotalHour 本次上機時間 數(shù)字 單精度 Fee 本次上機費用 數(shù)字 單精度 Computer 計算機的房間編號 +機位編號 文本 10 表 用戶費用信息表 5. 費率 信息表： 包括的數(shù)據(jù)字段有：用戶類型和費率。這樣就表現(xiàn)服務端與客戶端已成功連接。直到對方拿起電話時（發(fā)送 方和接收方的 TCP 連接已經(jīng)建立），就可以通話了（傳送數(shù)據(jù)）。 TcpClient 是類基于 Socket 類構建，它以更高的抽象程度提供 TCP 服務。 StreamReader 類常用方法、屬性及其說明 ，如表 所示： 方法 說明 Close 關閉 StreamReader并釋放與閱讀器關聯(lián)的所有系統(tǒng)資源 DiscardBufferedData 允許 StreamReader丟棄其當前數(shù)據(jù) Peek 返回下一個可用的字符，但不使用它 Read 讀取輸入流中的下一個字符或下一組字 符 ReadBlock 從當前流中讀取最大數(shù)量的字符并從索引開始將該數(shù)據(jù)寫入緩沖區(qū) ReadLine 從當前流中讀取一行字符并將數(shù)據(jù)作為字符串返回 ReadToEnd 從流的當前位置到末尾讀取流 表 StreamReader 類中常用的方法及其說明 表 18 StreamWriter 類 StreamWriter 類能夠?qū)崿F(xiàn)對基礎數(shù)據(jù)流的寫操作，從而實現(xiàn)提供基礎數(shù)據(jù)流來傳送數(shù)據(jù)。工作流程圖 所示 20 登 錄 界 面輸 入 用 戶 名 、 密 碼 和 附 加驗 證 碼登 錄 成 功是是驗 證 碼 是 否 正 確否用 戶 名 和 密 碼 是 否 正 確否 圖 登錄流程圖 根據(jù)以上流程，雙擊窗體上的“確定”按鈕，打開代碼編輯器，在按鈕的Click 事件中添加如下代碼： Private Sub OK_Click(ByVal sender As , ByVal e As ) Handles If = Then NewSuperUser = New ClsSuperUser(Trim(), ) If Then Dim Frmobj As New FrmMain() () 39。 圖 修改操作員信息圖 這里需要判斷用戶的真實姓名和密碼不能為空，對用戶輸入的信息合法性驗證通過以后，需要對信息進行處理。如圖 所示 圖 刪除操作員信息圖 修改密碼 修改用戶密碼是所用操作 員都具有的功能，操作員在輸入舊密碼，以及重復輸入新密碼，就可能修改操作員密碼。 27 圖 設置上機費率圖 具體代碼如： Private Sub BtOK_Click(ByVal sender As , ByVal e As ) Handles Dim TempFeeRules As New ClsFeeRules = 臨時用戶 = Val() () = 普通用戶 = Val() () = 銀卡用戶 = Val() () = 金卡用戶 = Val() () End Sub 鎖定屏幕 該功能是當操作員需要外出，系統(tǒng)不能關閉時，防止他人的非法操作系統(tǒng)。 具體操作：“用戶信息管理”→“查詢用戶費用”命令，將彈出“查詢費用窗口”，輸入用戶 maomao，點確定，將會在界面的列表中顯示該用戶所有的費用記錄，包括本次使用計算機，登錄時間，下機時間信息。修改 /刪除用戶信息功能都是按用戶類型、按用戶姓名或按用戶賬號方式修改 /刪除用戶信息。修改 /刪除計算機信息功能都是按網(wǎng)吧編號、按配置和按機算機名稱修改 /刪除計算機信息。客戶端登錄工作流程圖如圖 所示 : 36 服 務 器 端判 斷 用 戶 余 額客 戶 端登 錄 成 功登 錄 請 求用 戶 確 認余 額 充 足非 注 冊 用 戶 /密 碼 不 正 確余 額 不 足 圖 客戶端登錄流程圖 登錄模塊代碼如： 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 下機 在用戶使用完計算機，必須點擊“下機”按鈕，以結(jié)算本次上機所用的金額，代碼如下： 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 S