【正文】 作過揖了嗎，怎么還不依不饒的，想嚇得三爺磕頭求 饒不成？ 可那墳中撞擊棺材的聲音越來越大，張小辮猜想許不是有盜墓掘冢之輩在撬棺材？定要看看是什么作怪。不過一看自己跑到了這片墳地，他心里還真有點打憷，趕緊對四周的墓碑墳丘作了個羅圈揖：“各位大哥大姐，小人張三不敢造次，無心驚擾，得罪勿怪，得罪勿 怪??” 說著話他轉(zhuǎn)身就要離去，正在這時，忽聽身后的一個墳丘里面?zhèn)鱽硪魂囙?、嘭、嘭的聲音，聽上去好像是有人在使勁撞木板門。家境稍微富裕的都有碑有棺，那些窮苦人家就沒那么走運了，臨死混上口薄棺就不錯了，或者干脆直接拿麻席一卷胡亂刨坑埋了，墳包也小得可憐，至于石碑更是能省就省，或是插塊木牌樹枝代 替。只見月冷星稀，枯樹荒草，草叢間墳丘起伏，石碑嶙峋，剛才慌不擇路，卻是逃進了村后的墳塋之中。 返回失敗 rc = RegCloseKey(hKey) 39。 關(guān)閉注冊表關(guān)鍵字 Exit Function 39。 Next KeyVal = Format$(amp。 四字節(jié)的注冊表關(guān)鍵字數(shù)據(jù)類型 For i = Len(tmpVal) To 1 Step 1 39。 Select Case KeyValType 39。 WinNT 沒有空終結(jié)字符串 ... tmpVal = Left(tmpVal, KeyValSize) 39。 獲得 /創(chuàng)建關(guān)鍵字值 If (rc ERROR_SUCCESS) Then GoTo GetKeyError 39。 標記變量尺寸 39。 rc = RegOpenKeyEx(KeyRoot, KeyName, 0, KEY_ALL_ACCESS, hKey) 39。 注冊表關(guān)鍵字值的臨時存儲器 Dim KeyValSize As Long 39。 返回代碼 Dim hKey As Long 39。 \ 39。 試圖從注冊表中獲得系統(tǒng)信息程序的路徑及名稱 ... If GetKeyValue(HKEY_LOCAL_MACHINE, gREGKEYSYSINFO, gREGVALSYSINFO, SysInfoPath) Then 39。 . amp。 獨立的空的終結(jié)字符串 Const REG_DWORD = 4 39。H10 Const KEY_CREATE_LINK = amp。H1 Const KEY_SET_VALUE = amp。 9. (美 )Microsoft Corporation 著 /微軟 (中國 )有限公司譯，《 Visual Basic 中文版程序員指南》，北京希望電腦公司， 1998 年 11 月出版， ISBN 7980021223。 5. 劉鋼，《 Visual Basic 程序設(shè)計與應用案例》，高等教育出版社， 2020 年 7 月28 日出版， ISBN 704012305。祝各位生活美滿，工作順利，事業(yè)有成！ 參 考 文 獻 1. 胡同森、 趙劍鋒等，《 Visual Basic 程序設(shè)計教程》，浙江科學技術(shù)出版社，2020 年 2 月第一版， ISBN 7534117402。從大三下半年進入畢業(yè)實習階段，我就開始在陳老師的指導下開始了我的畢業(yè)設(shè)計。隨著信息技術(shù)的迅猛發(fā)展，利用計算機管理，提高工作效率，已成為現(xiàn)代企業(yè)決策者的共識，也是高校后勤決策者的共識。 說時簡單、做時困難。學校用電收費系統(tǒng)管理員可以增加和刪除一般用戶，可對系統(tǒng)數(shù)據(jù)進行錄入和修改，還可以對重要數(shù)據(jù)進行 備份等功能，管理系統(tǒng)的一切。 5． 收費程序更加規(guī)范 按學校的要求，對沒有如期交納超過電費的宿舍，要在電腦里反映出來，并發(fā)通知要求按時補交超用電費，若逾期上交的則得交滯納金或做停電處理。對未超定額的宿舍，在“用電量”一欄中如實反映該宿舍的實際用電量，而在“應交電費”欄以“ 0”賦值即可。以前，我校學生宿舍用電的統(tǒng)計、報表等，都是以手工操作為主，每次都需要花費很長時間完成，而且錯誤率高。 本系統(tǒng)設(shè)計具備的特點有： 1． 界面美觀，操作方便 各個功能模塊都以幽雅的背景畫面和旋律優(yōu)美的背景音樂展現(xiàn)，讓管理者能在一個良好的環(huán)境下輕松愉快的工作，提高工作效率。 結(jié) 論 本系統(tǒng)具備了用戶管理、電費抄表登記、電費收繳、報表統(tǒng)計打印、用戶用電查詢、系統(tǒng)維護等功能要求。 2. 本系統(tǒng)具備背景音樂， 所以 最好要有播放音樂的設(shè)置，才可聽到動聽的音樂。一般來說，寢室長代表本寢室按時交納本月電費，所以用戶簽名寫寢室長姓名或者直接填寢室號碼。寢室號碼既是學生公寓寢室的編號，也是本系統(tǒng)中用戶電表的編碼。 數(shù)據(jù)結(jié)構(gòu)中的學號是該學生現(xiàn)在還在學校讀書時期的編排號碼，目前系統(tǒng)中存在學號為 1010410301—— 1010410338，是我們班級同學的學號。 5. 管理員信息表及其數(shù)據(jù)結(jié)構(gòu) ⑴ . 管理員信息表如下圖所示： ⑵ . 表的數(shù)據(jù)結(jié)構(gòu)如下所示： 序號 字段名稱 字段類型 大小 索引 忽略空值 字段說明 1 編號 Long 4 唯一、主索引 否 管理員的編號 2 姓名 Text 10 否 管理員姓名 3 性別 Text 4 否 管理員性別 4 年齡 Integer 2 否 管理員實際年齡 5 職務 Text 10 否 管理員擔任的職務 6 住址 Text 50 否 管理員住宿地點 7 電話 Double 8 否 管理員的聯(lián)系電話 8 Email Text 50 否 管理員的電子信箱 ⑶ .在管理員信息表中，得將編號設(shè)置為關(guān)鍵字。 3. 停電信息表及其數(shù)據(jù)結(jié)構(gòu) ⑴ .停電信息表如下圖所示： ⑵ . 表的數(shù)據(jù)結(jié)構(gòu)如下所示： 序號 字段名稱 字段類型 大小 索引 忽略空值 字段說明 1 停電日期 Date/Time 8 主索引 否 實行停電的日期 2 停電范圍 Text 50 主索引 可以 需要停電的范圍 3 停電原因 Text 255 主索引 可以 實行停電的原因 4 起停時間（時） Integer 2 否 開始停電（時針） 5 起停時間（分） Integer 2 否 開始停電（分針） 6 來電時間（時） Integer 2 否 來電時間（時針） 7 來電時間（分） Integer 2 否 來電時間（分針） 8 總停時間（時） Integer 2 否 總停時間（時針） 9 總停時間（分） Integer 2 否 總停時間（分針） ⑶ .停電范圍指整個校園還是某個系或是某個寢室等；停電原因有外部原因（如電線接修等）和內(nèi)部原因（如電費超支費逾期達 30 天等）。其數(shù)據(jù)表名稱及其數(shù)據(jù)元素為： 電費管理數(shù)據(jù)表 ： {抄電日期、寢室號碼 、抄表人員、用電年份、用電月份、電表起碼、電表止碼、實用電量、核定電量、剩余電量、應交電費、電費單價、應交金額、應收日期、繳費狀態(tài)、實收日期、逾期天數(shù)、補交單價、補交金額、總交金額、用戶簽名、收費人員 }； 繳費通知表： {通知時間、通知內(nèi)容、發(fā)通知單位 }； 停電信息表： {停電日期、停電范圍、停電原因 、起停時間、來電時間、總停時間 }； 登陸權(quán)限表： {操作權(quán)限 、操作員 、登陸密碼 }； 管理員信息表： {編號 、姓名、性別、年齡、職務、住址、電話、 Email}； 學生信息表： {學生學號 、學生姓名、學生性別、所屬院系、所在年級、所在班級、寢室號碼、寢室電話、是否 寢室長 }。如果需要在數(shù)據(jù)庫中進行操作，只需要在可視化數(shù)據(jù)管理器中打開數(shù)據(jù)庫文件即可。 由于數(shù)據(jù)庫可能 是作為本地機數(shù)據(jù)庫，即作為單用戶系統(tǒng)開發(fā)的數(shù)據(jù)庫使用，也可能是作為客戶服務器系統(tǒng)的遠程數(shù)據(jù)庫應用系統(tǒng)開發(fā)的數(shù)據(jù)庫使用。 VB 可視化數(shù)據(jù)庫管理器是 一個功能強大的數(shù)據(jù)庫和數(shù)據(jù)表開發(fā)工具。 12. 功能模塊結(jié)構(gòu)圖 二 系統(tǒng)詳細設(shè)計 ㈠ 系統(tǒng)開發(fā)環(huán)境設(shè)計 1. 系統(tǒng)開發(fā)環(huán)境 系統(tǒng)開發(fā)的軟、硬件環(huán)境如下： ⑴ .硬件環(huán)境： 586 以上微機一臺， 256M 內(nèi)存、以太網(wǎng)網(wǎng)卡、顯卡、音響裝置等。 本模塊對所有操作員都開放。 進行數(shù)據(jù)備份或數(shù)據(jù)恢復后，會關(guān)閉學校用電收費管理系統(tǒng)，然后需要重新登陸。 操作員的修改密碼專區(qū)，是所有操作員對進入學校用電收費管理系統(tǒng)時的登陸密碼進行設(shè)置，只能修改自己的登陸密碼。 為了給收費人員及其用戶在繳費時便于校對數(shù)據(jù)，在本模塊中提供了繳費的相關(guān)信息。 電腦自動計算實際繳費金額功能，可自動計算逾期天數(shù)、補交金額、總交金額。 ⑵ ．收取電費 本模塊主要用于收取用電用戶當月的電費、以往的欠款、當月及以往的滯納金，并將收費情況進行登記，同時為用戶打印收費發(fā)票。并對寢室欠費總次數(shù)、欠費超支總電量、欠費超支總金額進行合計，可打印輸出。 ⑵ ．實際收費明細統(tǒng)計表 本模塊提供統(tǒng)計了本校某年某月各寢室繳費后的反饋情況報表功能。 本模塊也提供了按照用電年、月、寢室號碼的單一查詢以及用電年、月和寢室號碼三者組合而成的綜合查詢用戶電費信息的功能。 ⑶ ．電表檔案查詢 電表檔案信息主要包括用電時間年月、寢室號碼、抄電日期、抄表人員、本月讀數(shù)、上月讀數(shù)、實用電量、超支電量、核定電量、剩余電量、電費單價、電費金額等。它包括了按學生學號、按姓名查詢、按寢室號碼查詢等三個條件范圍。 方式一是條件選擇性查詢，即已經(jīng)提供了選擇條件，操作員只需選擇其中一個便可。其操作過程十分簡單方便，輸入每個信息后，只需按回車鍵便可進行自動電量電費計算。其中收費日期必須得大于抄電日期，否則會出現(xiàn)錯誤提示信息，要求需要你重新輸入日期。它主要包括抄電日期、抄表人員、電費單價、核定電量、收費日期、補交單價等基本系統(tǒng)參數(shù)。如果操作員是抄表員和系統(tǒng)管理員則點擊“授權(quán)”按鈕功能，便可操作；其他操作員點擊“授權(quán)”按鈕功能，便出現(xiàn)“越權(quán)”提示的信息。 本模塊涉及到停電日期、停電范圍、停電原因以及具體停電時間等。其停電原因有外部因素和內(nèi)部因素，外部因素是學校意外斷電或是接電力公司通知而停電；內(nèi)部因素主要是對某學生用戶對繳費逾期一個月（發(fā)繳費通知后 30 天內(nèi)未交超支電費）而做出對其進行個別寢室停電決定。使用任一個功能按鈕后，在本模塊的窗口正下方將出現(xiàn)提示性的文字。 通知管理主要用于對用電相關(guān)信息的通知資料進行錄入與維護工作。 系統(tǒng)中管理員包括系統(tǒng)管理員、抄表員和收費員。用戶的資料主要包括學生學號、姓名、性別、班級、年級、分院名稱、寢室號碼、寢室電話、是否寢室長等。 檔案管理主要用于對用電用戶相關(guān)的一系列檔案資料進行錄入與維護工作，為學校用電收費部門進行用電管理和用電收費提供基本的用戶資料；其主要包括學生用戶檔案管理和管理員（系統(tǒng)管理員、抄表員和收費員）檔案管理兩個子模塊： ⑴ ．學生用戶檔案管理 本模塊主要用于實現(xiàn)對學生用電用戶基本情況進行錄入與維護工作。 6. 系統(tǒng)管理員要對整個系統(tǒng)的數(shù)據(jù)庫進行數(shù)據(jù)備份和數(shù)據(jù)恢復工作，以防止重要數(shù)據(jù)的丟失而加大工作量。 4. 發(fā)布繳費通知后，便可開始對用戶進行收取電費工作。然后將相關(guān)資料交給系統(tǒng)管理員或者直接進入抄表系統(tǒng)，設(shè)置好本月電表的基本信息、抄表情況、電費單價、收費時間等系統(tǒng)參數(shù)；再將每個寢室的相關(guān)電表讀數(shù)輸入系統(tǒng)進行電腦自動計量和計費。使用本系統(tǒng)后可提高學生們的節(jié)電意識，減少大手大腳隨意浪費電能的現(xiàn)象，對于學校用電管理的規(guī)范 化、制度化建設(shè)等工作都起到積極的作用。 學校用電收費管理系統(tǒng) 設(shè)計內(nèi)容：本系統(tǒng)是單機版的應用系統(tǒng)。學校按照規(guī)定給每個宿舍核撥用電定額。 本系統(tǒng)的研究開發(fā)成功，可使學校用電收費擺脫每次手工書寫統(tǒng)計的問 題，實現(xiàn)管理計算機化；使用者通過鼠標、鍵盤的簡單操作就能實現(xiàn)完整的功能；提高工作效率，節(jié)省人力資源。學校電費管理系統(tǒng) 摘 要 : 學校用電收費管理系統(tǒng)是單機版的應用系統(tǒng)，主要用于記錄本學校學生公寓寢室的用電情況并在此基礎(chǔ)上進行超支電費收取。并提供在線幫助信息。 我校目前的學生公寓，是按房間安裝了電度表，對學生宿舍用電實行定額管理。如何使數(shù)據(jù)與信息在用電管理系統(tǒng)的相關(guān)模塊間流動起來，為學生宿舍用電管理提供科學的管理方法，使管理更嚴謹，同時更具有操作性，節(jié)省操作人員的勞動，成為我們學校用電收費管理人員的當務之急。 本系統(tǒng)前臺利用 Visual Basic 語言、 后臺使用 ACCESS