【正文】 If Then MsgBox 該學(xué)生尚未登記 ! Exit Sub End If 39。 元 Exit For Else .MoveNext End If Next I Exit Sub End With End If jferr: MsgBox End Sub Private Sub cdjf2_Click() 39。調(diào)用過程顯示窗體 39。 Else Exit Sub End If 39。顯示表格內(nèi)容 Dim I As Integer Dim j As Integer .Row = 0 Do While Not .Row = .Row + 1 For I = 0 To 4 .Col = I If (I) 0 Then .Text = (I) End If Next Loop End With End Sub Public Sub tiaozhen(m As Integer) 39。 臺(tái)電腦計(jì)費(fèi)中 End Sub Public Sub ClearRow(n As Integer) 39。在此我對(duì)他表示最誠(chéng)摯的感謝，也同樣謝謝那些在本系統(tǒng)開發(fā)過程中給了我?guī)椭耐瑢W(xué)們。通過查閱相關(guān)書籍資料并在老師的指導(dǎo)下才把錯(cuò)誤一一糾正。本系統(tǒng)較好的實(shí)現(xiàn)了本次設(shè)計(jì)任務(wù)的最高目標(biāo)。 Money amp。打 印結(jié)果如圖 4－16 所示： 圖 4－ 16 打印的條形碼 ○ 信息查詢模塊 信息查詢模塊提供了對(duì)當(dāng)天以及當(dāng)月上機(jī)情況和計(jì)費(fèi)情況的總計(jì)查詢，對(duì)當(dāng)天消費(fèi)情況的查詢代碼如下： For I = 1 To .RecordCount If Format$(.Fields(2), ddddd) = Date Then Money = Val(.Fields(4)) + Money times = times + 1 End If .MoveNext Next I linestr = 本日上機(jī)人次 : amp。為了簡(jiǎn)化編碼，本系統(tǒng)采用 0 作為前置碼，從而左側(cè)數(shù)據(jù)符統(tǒng)一采用奇排列，在程序中建立了一個(gè)一維數(shù)組用于存儲(chǔ)每個(gè)數(shù)字的編碼方式對(duì)應(yīng)的條與空 的模塊數(shù)。帳戶成功充值后會(huì)即時(shí)提示帳戶現(xiàn)有的金額?？蛻艚Y(jié)帳時(shí)，使用 DateDiff 函數(shù)（這個(gè)函數(shù)的作用是對(duì)兩個(gè)指定的日期按日期形式求相差的間隔）計(jì)算出客戶上機(jī)消費(fèi)的具體時(shí)間 mm，并用以下代碼計(jì)算消費(fèi)的金額： Public Function JF(mm) As Single JF = (mm \ 30) * Dj / 2 If mm Mod 30 10 Then JF = JF + Dj / 2 End If If JF = 0 Then JF = Dj / 2 End Function 系統(tǒng)根據(jù)計(jì)算結(jié)果在學(xué)生表和上機(jī)情況表中對(duì)相應(yīng)記錄進(jìn)行修改，并在上機(jī)流水帳表中添加上機(jī)記錄。（如圖 4－ 11 所示）： 圖 4－ 11 系統(tǒng)鎖定窗體 ○ 帳戶管理模塊 帳戶管理模塊包含創(chuàng)建帳戶、帳戶消費(fèi)、帳戶充值以及帳戶查詢功能。因?yàn)檎诖蜷_的文件不能夠用 FileCopy 函數(shù)復(fù)制，這段程序代碼中應(yīng)用到了數(shù)據(jù)庫(kù)的關(guān)閉方法，在關(guān)閉數(shù)據(jù)庫(kù)后進(jìn)行數(shù)據(jù)庫(kù)的備份和還原。若管理員用戶需要修改其他用戶密碼，則可通過刪除相應(yīng)用戶，再用新密碼將此用戶添加實(shí)現(xiàn)。 ◇ 帳戶管理界面（如圖 4－ 7 所示）： 4－ 7 帳戶管理界面 此界面是對(duì)帳戶信息查詢和修改的主界面，界面中間顯示的是所有帳戶的詳細(xì)信息，下面的四個(gè)功能按鈕分別對(duì)應(yīng)四個(gè)與帳戶相關(guān)的操作。在狀態(tài)欄中，能夠顯示出當(dāng)前的系統(tǒng)時(shí)間以及計(jì)費(fèi)中的電腦數(shù)目。 表 4－ 5 自定義表結(jié)構(gòu) 字段名稱 類型 主鍵 非空 臺(tái)數(shù) 數(shù)字 No No 單價(jià) 文本 No No 單價(jià) new 文本 No No 單價(jià)改變 布爾 No No 4． 2 系統(tǒng)實(shí)現(xiàn) 主要界面設(shè)計(jì) ◇ 用戶登陸界面（如圖 4－ 4 所示）： 圖 4－ 4 用戶登陸界面 當(dāng)用戶名稱和密碼與管理員表中對(duì)應(yīng)的數(shù)據(jù)項(xiàng)相符時(shí)，才能登入系統(tǒng)，否則將清除輸入內(nèi)容，并提醒用戶重新輸入。 表 4－ 3 上機(jī)情況表結(jié)構(gòu) 字段名稱 類型 主鍵 非空 機(jī)號(hào) 數(shù)字 Yes No 學(xué)號(hào) 數(shù)字 No No 開始時(shí)間 文本 No No 帳戶金額 數(shù)字 No No 是否計(jì)費(fèi) 文本 No No （ 4）．名稱：學(xué)生 如表 4－ 4 所示，學(xué)生表包括學(xué)號(hào)、姓名、帳戶余額、上機(jī)次 數(shù)、累計(jì)上機(jī)金額、最后上機(jī)時(shí)間 六個(gè)字段。此表是上機(jī)情況統(tǒng)計(jì)的依據(jù)。 數(shù)據(jù)庫(kù)設(shè)計(jì) 根據(jù)系統(tǒng)功能設(shè)計(jì)的要求 以及功能模塊的劃分，對(duì)于系統(tǒng)用戶信息數(shù)據(jù)庫(kù)，以下列出了其中各個(gè)表的數(shù)據(jù)項(xiàng)和數(shù)據(jù)結(jié)構(gòu)： （ 1）．名稱：管理員 如表 41 所示，管理員數(shù)據(jù)表包括 name、 pass 兩個(gè)字段。此條形碼即是客戶上機(jī)消費(fèi)的憑證。 ○ 用戶上機(jī)消費(fèi)，根據(jù)其具體消費(fèi)所用時(shí)間，計(jì)算實(shí)際消費(fèi)金額，并在客戶的帳戶余額中進(jìn)行扣除。 ○ 使用前可設(shè)置將要管理的計(jì)算機(jī)數(shù)目，程序運(yùn)行時(shí)，會(huì)根據(jù)實(shí)際需要調(diào)整數(shù)據(jù)庫(kù)中相應(yīng)表的項(xiàng)目數(shù)，提高系統(tǒng)運(yùn)行效率。（如表 3－ 3所示：） EAN 標(biāo)準(zhǔn)碼的尺寸：寬：全部 條碼 起始符 /分隔符 /終止符 放大倍數(shù)： 表 3－ 3 EAN13 碼編碼方式 前置字符 左側(cè)數(shù)據(jù)符編碼規(guī)則的選擇 0 A A A A A A 1 A A B A B B 2 A A B B A B 3 A A B B B A 4 A B A A B B 5 A B B A A B 6 A B B B A A 7 A B A B A B 8 A B A B B A 9 A B B A B A 系統(tǒng)設(shè)計(jì)與實(shí)現(xiàn) 總體設(shè)計(jì) 系統(tǒng)模塊設(shè)計(jì) 根據(jù)系統(tǒng)功能要求可以將系統(tǒng)分解成系統(tǒng)管理、帳戶管理、條碼編制和信息查詢四大模塊（如圖 4－ 1 所示）： 系 帳 條 信 統(tǒng) 戶 碼 息 管 管 編 查 理 理 制 詢 圖 4 － 1. 系統(tǒng)功能模塊圖 機(jī)房收費(fèi)管理系統(tǒng) 其中各模塊應(yīng)該實(shí)現(xiàn)的功能： ⑴ 系統(tǒng)管理模塊（如圖 4－ 2 所示）： 修改用戶密碼 上機(jī)費(fèi)率的調(diào)整 數(shù)據(jù)備份與還原 系 統(tǒng)自我 鎖 定 計(jì)算機(jī)數(shù)目調(diào)整 添加刪除用戶 系統(tǒng)管理模塊 圖 4 － 2 系統(tǒng)管理功能模塊圖 功能簡(jiǎn)介： ○ 修改用戶密碼能夠?qū)崿F(xiàn)對(duì)當(dāng)前登陸用戶的密碼修改。 EAN13 檢驗(yàn)碼的計(jì)算方法： (1).C1 為前十二位碼中奇數(shù)位的數(shù)字求和； (2).C2 為前十二位碼中偶數(shù)位的數(shù)字求和； (3).C2 = C2 * 3 (3).CC = (C1+C2)取個(gè)位數(shù)； (4).C(檢驗(yàn)碼 ) ＝ 10－ CC (若值為 10，則取 0)。 EAN－ 13 的編碼由起始符，左側(cè)數(shù)據(jù)符（ 6 位數(shù)字），中間符，右側(cè)數(shù)據(jù)符（ 5 位數(shù)字），檢驗(yàn)符（ 1 位數(shù)字），終止符五個(gè)部分組成。 ? EAN 8 碼：由 8 個(gè)數(shù)字組成，屬 EAN 的簡(jiǎn)易編碼型式。 3. 必須有一檢驗(yàn)碼，以防誤讀資料的情形發(fā)生，其位于 EAN 碼中的最右邊處。 25 碼：只要應(yīng)用于包裝、運(yùn)輸以及國(guó)際航空系統(tǒng)的機(jī)票順序編號(hào)等。 條形碼碼制 條形碼的碼制即指條碼條和空的排列規(guī)則，常用的一維碼的碼制包括： EAN碼、 39 碼、 128 碼、 93 碼、 25 碼及 Codabar（庫(kù)德巴碼）等。 條形碼技術(shù) 條形碼概念 條形碼技術(shù)是在計(jì)算機(jī)應(yīng)用和實(shí)踐中產(chǎn)生并發(fā)展起來(lái)的廣泛應(yīng)用于商業(yè)、郵政、圖書管理、倉(cāng)儲(chǔ)、工業(yè)生產(chǎn)過程控制、交通等領(lǐng)域的一種自動(dòng)識(shí)別技術(shù)，具有輸入速度快、準(zhǔn)確度高、成本低、可靠性強(qiáng)等優(yōu)點(diǎn)，在當(dāng)今的自動(dòng)識(shí)別技術(shù)中占有重要的地位。 事務(wù)是恢復(fù)和并發(fā)控制的基本單位。事務(wù)是一個(gè)不可再分的邏輯工作單元。在本系統(tǒng)中用以下代碼對(duì)數(shù)據(jù)庫(kù)進(jìn)行連接： = + \ = 。 為數(shù)據(jù)庫(kù)設(shè)置密碼 使用 Microsoft Access 軟件設(shè)置數(shù)據(jù)庫(kù)密碼很簡(jiǎn)單，只要在關(guān)閉數(shù)據(jù)的情況下，用 “獨(dú)占 ”方式打開數(shù)據(jù)庫(kù)，單擊 “設(shè)置數(shù)據(jù)庫(kù)密碼 ”，鍵入自己的密碼即可。數(shù)據(jù)庫(kù)系統(tǒng)則是在操作系統(tǒng)支持下為數(shù)據(jù)庫(kù)的建立、使用和維護(hù)配置的軟件系統(tǒng)。 “事件驅(qū)動(dòng) ”是指 Windows 應(yīng)用程序的運(yùn)行是通過事件來(lái)驅(qū)動(dòng)的，用戶或系統(tǒng)觸發(fā)了某一個(gè)事件，就執(zhí)行程序員在此事件中編寫的一 段代碼。系統(tǒng)通過對(duì)條形碼的識(shí)別得到帳號(hào)，再?gòu)臄?shù)據(jù)庫(kù)中讀取出相關(guān)的帳戶信息，并對(duì)該帳戶進(jìn)行 相關(guān)管理。這種方案的系統(tǒng)穩(wěn)定性好，運(yùn)用也比較簡(jiǎn)單，但是投資較大?？蛻羯蠙C(jī)時(shí)需先劃卡驗(yàn)證身份，再輸入相匹配的用戶名和密碼，通過檢查便可使用機(jī)器，否則不能使用。 機(jī)房收費(fèi)管理系統(tǒng)的現(xiàn)狀 目前計(jì)算機(jī)機(jī)房收費(fèi)系統(tǒng)的具體實(shí)施方案有多種，主要可分為單機(jī)和聯(lián)網(wǎng)兩種方式，其中單機(jī)方式又可以分為純軟件方式、門禁方式和純硬件方式。對(duì)于前者要求建立起具有資料一致性和完整性的數(shù)據(jù)庫(kù)，對(duì)于后者則要求具有界面美觀大方，應(yīng)用程序功能完備，操作簡(jiǎn)單 方便等特點(diǎn)。 bar code 目 錄 1 引言 ……………………………………………………………………………… （ 1） 2 機(jī)房收費(fèi)管理系統(tǒng)的現(xiàn)狀 ……………………………………………………… （ 1） 3 背景知識(shí) ……………………………………………………………………… （ 2） 3． 1 Visual Basic ……………………………………………………………… （ 2） 3． 2 Microsoft Access …………………………………………………… （ 2） 3． 2． 1 數(shù)據(jù)庫(kù)概念 ………………………………………………… （ 2） 3． 2． 2 為數(shù)據(jù)庫(kù)設(shè)置密碼 ………………………………………… （ 3） 3． 2． 3 事務(wù)概念 …………………………………………………… （ 3） 3． 3 條形碼技術(shù) …………………………………………………………… （ 4） 3． 3． 1 條形碼概念 …………………………………………… …… （ 4） 3． 3． 2 條形碼碼制 ………………………………………………… （ 5） 3． 3． 3 EAN13 碼的編制 …………………………………………… （ 6） 4 系統(tǒng)設(shè)計(jì)與實(shí)現(xiàn) …………………………………………………………… （ 7） 4． 1 總體設(shè)計(jì) ………………………………………………………………… （ 7） 4． 1． 1 系統(tǒng)模塊設(shè)計(jì) ……………………………………………… （ 7） 4． 1． 2 數(shù)據(jù)庫(kù)設(shè)計(jì) ………………………………………………… （ 10） 4． 2 系統(tǒng)實(shí)現(xiàn) ……………………………………………………………… （ 12） 4． 2． 1 主要界面設(shè)計(jì) ……………………………………………… （ 12） 4． 2． 2 功能模塊設(shè)計(jì)與實(shí)現(xiàn) ……………………………………… （ 14） 5 總結(jié) ……………………………………………………………………… （ 20） 致 謝 ………………………………………………………………………… （ 20） 參考文獻(xiàn) …………………………………………………………………… （ 21） 附 件 ……………………………………………………………