【正文】 。 關(guān)閉注冊表關(guān)鍵字 Exit Function 39。 四字節(jié)的注冊表關(guān)鍵字?jǐn)?shù)據(jù)類型 For i = Len(tmpVal) To 1 Step 1 39。 WinNT 沒有空終結(jié)字符串... tmpVal = Left(tmpVal, KeyValSize) 39。 標(biāo)記變量尺寸 39。 注冊表關(guān)鍵字值的臨時(shí)存儲器 Dim KeyValSize As Long 39。 \ 39。 . amp。H10Const KEY_CREATE_LINK = amp。9. (美)Microsoft Corporation著/微軟(中國)有限公司譯，《Visual Basic 中文版程序員指南》，北京希望電腦公司，1998年11月出版，ISBN 7980021223。祝各位生活美滿，工作順利，事業(yè)有成！參 考 文 獻(xiàn)1. 胡同森、趙劍鋒等，《Visual Basic 》，浙江科學(xué)技術(shù)出版社，2002年2月第一版，ISBN 7534117402。隨著信息技術(shù)的迅猛發(fā)展，利用計(jì)算機(jī)管理，提高工作效率，已成為現(xiàn)代企業(yè)決策者的共識，也是高校后勤決策者的共識。學(xué)校用電收費(fèi)系統(tǒng)管理員可以增加和刪除一般用戶，可對系統(tǒng)數(shù)據(jù)進(jìn)行錄入和修改，還可以對重要數(shù)據(jù)進(jìn)行備份等功能，管理系統(tǒng)的一切。對未超定額的宿舍，在“用電量”一欄中如實(shí)反映該宿舍的實(shí)際用電量，而在“應(yīng)交電費(fèi)”欄以“0”賦值即可。本系統(tǒng)設(shè)計(jì)具備的特點(diǎn)有：1． 界面美觀，操作方便各個(gè)功能模塊都以幽雅的背景畫面和旋律優(yōu)美的背景音樂展現(xiàn)，讓管理者能在一個(gè)良好的環(huán)境下輕松愉快的工作，提高工作效率。2. 本系統(tǒng)具備背景音樂，所以最好要有播放音樂的設(shè)置，才可聽到動(dòng)聽的音樂。寢室號碼既是學(xué)生公寓寢室的編號，也是本系統(tǒng)中用戶電表的編碼。5. 管理員信息表及其數(shù)據(jù)結(jié)構(gòu)⑴. 管理員信息表如下圖所示：⑵. 表的數(shù)據(jù)結(jié)構(gòu)如下所示：序號字段名稱字段類型大小索引忽略空值字段說明1編號Long4唯一、主索引否管理員的編號2姓名Text10否管理員姓名3性別Text4否管理員性別4年齡Integer2否管理員實(shí)際年齡5職務(wù)Text10否管理員擔(dān)任的職務(wù)6住址Text50否管理員住宿地點(diǎn)7電話Double8否管理員的聯(lián)系電話8EmailText50否管理員的電子信箱⑶.在管理員信息表中，得將編號設(shè)置為關(guān)鍵字。其數(shù)據(jù)表名稱及其數(shù)據(jù)元素為：電費(fèi)管理數(shù)據(jù)表：{抄電日期、寢室號碼、抄表人員、用電年份、用電月份、電表起碼、電表止碼、實(shí)用電量、核定電量、剩余電量、應(yīng)交電費(fèi)、電費(fèi)單價(jià)、應(yīng)交金額、應(yīng)收日期、繳費(fèi)狀態(tài)、實(shí)收日期、逾期天數(shù)、補(bǔ)交單價(jià)、補(bǔ)交金額、總交金額、用戶簽名、收費(fèi)人員}；繳費(fèi)通知表：{通知時(shí)間、通知內(nèi)容、發(fā)通知單位}；停電信息表：{停電日期、停電范圍、停電原因、起停時(shí)間、來電時(shí)間、總停時(shí)間}；登陸權(quán)限表：{操作權(quán)限、操作員、登陸密碼}；管理員信息表：{編號、姓名、性別、年齡、職務(wù)、住址、電話、Email}；學(xué)生信息表：{學(xué)生學(xué)號、學(xué)生姓名、學(xué)生性別、所屬院系、所在年級、所在班級、寢室號碼、寢室電話、是否寢室長}。由于數(shù)據(jù)庫可能是作為本地機(jī)數(shù)據(jù)庫，即作為單用戶系統(tǒng)開發(fā)的數(shù)據(jù)庫使用，也可能是作為客戶服務(wù)器系統(tǒng)的遠(yuǎn)程數(shù)據(jù)庫應(yīng)用系統(tǒng)開發(fā)的數(shù)據(jù)庫使用。12. 功能模塊結(jié)構(gòu)圖二 系統(tǒng)詳細(xì)設(shè)計(jì)㈠ 系統(tǒng)開發(fā)環(huán)境設(shè)計(jì)1. 系統(tǒng)開發(fā)環(huán)境系統(tǒng)開發(fā)的軟、硬件環(huán)境如下：⑴.硬件環(huán)境：586以上微機(jī)一臺，256M內(nèi)存、以太網(wǎng)網(wǎng)卡、顯卡、音響裝置等。進(jìn)行數(shù)據(jù)備份或數(shù)據(jù)恢復(fù)后，會關(guān)閉學(xué)校用電收費(fèi)管理系統(tǒng)，然后需要重新登陸。為了給收費(fèi)人員及其用戶在繳費(fèi)時(shí)便于校對數(shù)據(jù)，在本模塊中提供了繳費(fèi)的相關(guān)信息。⑵．收取電費(fèi)本模塊主要用于收取用電用戶當(dāng)月的電費(fèi)、以往的欠款、當(dāng)月及以往的滯納金，并將收費(fèi)情況進(jìn)行登記，同時(shí)為用戶打印收費(fèi)發(fā)票。⑵．實(shí)際收費(fèi)明細(xì)統(tǒng)計(jì)表本模塊提供統(tǒng)計(jì)了本校某年某月各寢室繳費(fèi)后的反饋情況報(bào)表功能。⑶．電表檔案查詢電表檔案信息主要包括用電時(shí)間年月、寢室號碼、抄電日期、抄表人員、本月讀數(shù)、上月讀數(shù)、實(shí)用電量、超支電量、核定電量、剩余電量、電費(fèi)單價(jià)、電費(fèi)金額等。方式一是條件選擇性查詢，即已經(jīng)提供了選擇條件，操作員只需選擇其中一個(gè)便可。其中收費(fèi)日期必須得大于抄電日期，否則會出現(xiàn)錯(cuò)誤提示信息，要求需要你重新輸入日期。如果操作員是抄表員和系統(tǒng)管理員則點(diǎn)擊“授權(quán)”按鈕功能，便可操作；其他操作員點(diǎn)擊“授權(quán)”按鈕功能，便出現(xiàn)“越權(quán)”提示的信息。其停電原因有外部因素和內(nèi)部因素，外部因素是學(xué)校意外斷電或是接電力公司通知而停電；內(nèi)部因素主要是對某學(xué)生用戶對繳費(fèi)逾期一個(gè)月（發(fā)繳費(fèi)通知后30天內(nèi)未交超支電費(fèi)）而做出對其進(jìn)行個(gè)別寢室停電決定。通知管理主要用于對用電相關(guān)信息的通知資料進(jìn)行錄入與維護(hù)工作。用戶的資料主要包括學(xué)生學(xué)號、姓名、性別、班級、年級、分院名稱、寢室號碼、寢室電話、是否寢室長等。6. 系統(tǒng)管理員要對整個(gè)系統(tǒng)的數(shù)據(jù)庫進(jìn)行數(shù)據(jù)備份和數(shù)據(jù)恢復(fù)工作，以防止重要數(shù)據(jù)的丟失而加大工作量。然后將相關(guān)資料交給系統(tǒng)管理員或者直接進(jìn)入抄表系統(tǒng)，設(shè)置好本月電表的基本信息、抄表情況、電費(fèi)單價(jià)、收費(fèi)時(shí)間等系統(tǒng)參數(shù)；再將每個(gè)寢室的相關(guān)電表讀數(shù)輸入系統(tǒng)進(jìn)行電腦自動(dòng)計(jì)量和計(jì)費(fèi)。學(xué)校用電收費(fèi)管理系統(tǒng)設(shè)計(jì)內(nèi)容：本系統(tǒng)是單機(jī)版的應(yīng)用系統(tǒng)。本系統(tǒng)的研究開發(fā)成功，可使學(xué)校用電收費(fèi)擺脫每次手工書寫統(tǒng)計(jì)的問題，實(shí)現(xiàn)管理計(jì)算機(jī)化；使用者通過鼠標(biāo)、鍵盤的簡單操作就能實(shí)現(xiàn)完整的功能；提高工作效率，節(jié)省人力資源。并提供在線幫助信息。如何使數(shù)據(jù)與信息在用電管理系統(tǒng)的相關(guān)模塊間流動(dòng)起來，為學(xué)生宿舍用電管理提供科學(xué)的管理方法，使管理更嚴(yán)謹(jǐn)，同時(shí)更具有操作性，節(jié)省操作人員的勞動(dòng)，成為我們學(xué)校用電收費(fèi)管理人員的當(dāng)務(wù)之急。2. 每個(gè)月的月末，抄表員收集好各寢室的上月及本月電表讀數(shù)，先進(jìn)行手工抄錄。對未按時(shí)繳費(fèi)的用戶發(fā)布逾期情況的通知，并對逾期情況嚴(yán)重的用戶采取停電措施。它主要負(fù)責(zé)為用電收費(fèi)系統(tǒng)的其它所有模塊提供基本的和必要的用戶資料，是整個(gè)用電收費(fèi)系統(tǒng)的基礎(chǔ)。⑶．檔案功能模塊圖其模塊圖如右所示：3. 通知管理通知的發(fā)布是學(xué)校用電收費(fèi)必不可少的程序之一，學(xué)校只有發(fā)布了通知，學(xué)生用戶才可了解有關(guān)用電信息并按時(shí)交費(fèi)。⑵．停電通知管理本模塊主要實(shí)現(xiàn)有關(guān)學(xué)校停電通知內(nèi)容進(jìn)行錄入和維護(hù)工作。該分系統(tǒng)主要授權(quán)給抄表員和系統(tǒng)管理員，學(xué)生用戶和收費(fèi)員不能對其進(jìn)行操作。設(shè)置參數(shù)時(shí)，可對抄電日期、抄表人員、電費(fèi)單價(jià)、核定電量、收費(fèi)日期、補(bǔ)交單價(jià)等進(jìn)行選擇性輸入。⑷．抄表系統(tǒng)數(shù)據(jù)流圖5. 查詢系統(tǒng)本模塊對所有操作員開放，它主要包括了學(xué)生用戶檔案查詢、管理員檔案查詢、電表檔案查詢、用戶電費(fèi)查詢等四個(gè)模塊：⑴．學(xué)生用戶檔案查詢本模塊提供了兩種基本查詢方式來查詢學(xué)生用戶檔案信息的功能。其操作方法和學(xué)生用戶檔案查詢類似。本模塊提供了統(tǒng)計(jì)本校某年某月各寢室電量電費(fèi)情況報(bào)表的功能，并可以進(jìn)行報(bào)表打印。⑴．收費(fèi)庫本模塊主要是在進(jìn)行電表的電費(fèi)計(jì)算之后，產(chǎn)生某月的某個(gè)用戶或所有用戶的收費(fèi)記錄，為收取電費(fèi)模塊提供收費(fèi)的數(shù)據(jù)。最后不要忘了選擇輸入收費(fèi)人員的姓名和給用戶簽名并打印等手續(xù)。⑵．?dāng)?shù)據(jù)維護(hù)本模塊主要用于對用電收費(fèi)管理系統(tǒng)使用的數(shù)據(jù)庫進(jìn)行數(shù)據(jù)備份和數(shù)據(jù)恢復(fù)工作，以防止重要數(shù)據(jù)的丟失而加大工作量。11. 重新登陸 主要功能是關(guān)閉主體系統(tǒng)，返回到登陸窗口進(jìn)行重新登陸。選擇該類型的數(shù)據(jù)庫，在創(chuàng)建數(shù)據(jù)庫時(shí)不必輸入擴(kuò)展名，可視化數(shù)據(jù)管理器將自動(dòng)為數(shù)據(jù)庫上生成擴(kuò)展名。根據(jù)系統(tǒng)的功能需求分析并結(jié)合本系統(tǒng)的實(shí)際要求，本系統(tǒng)只需要建立六張數(shù)據(jù)表，即：電費(fèi)管理數(shù)據(jù)表、繳費(fèi)通知表、停電信息表、登陸權(quán)限表、管理員信息表、學(xué)生信息表。操作權(quán)限可分為系統(tǒng)管理員、抄表員、收費(fèi)員、學(xué)生用戶等，系統(tǒng)管理員可以管理系統(tǒng)的一切，而其他的操作員多多少少都有些權(quán)限的限制。電費(fèi)管理數(shù)據(jù)表中的寢室號碼屬性主要來源于學(xué)生信息表中的寢室號碼。根據(jù)系統(tǒng)功能設(shè)計(jì)及數(shù)據(jù)流圖、功能模塊圖的設(shè)計(jì)分析，對本系統(tǒng)的主要界面做了如下設(shè)計(jì)：㈣ 系統(tǒng)運(yùn)行環(huán)境1. 本系統(tǒng)的運(yùn)行絕對路徑為：“C:\學(xué)校用電收費(fèi)管理系統(tǒng)”，即安裝系統(tǒng)后的可執(zhí)行文件路徑為：C:\學(xué)校用電收費(fèi)管理系統(tǒng)\。本系統(tǒng)前臺是利用Visual Basic語言、后臺使用ACCESS數(shù)據(jù)庫進(jìn)行開發(fā)，適用于windows98／2000，或更高的軟件支持平臺，便于以后的系統(tǒng)擴(kuò)展與更新。使用學(xué)校用電收費(fèi)管理系統(tǒng)之前，用電量統(tǒng)計(jì)十分麻煩，工作量很大；希望使用學(xué)校用電收費(fèi)管理系統(tǒng)進(jìn)行統(tǒng)計(jì)后使工作達(dá)到易如反掌。6． 系統(tǒng)可維護(hù)性強(qiáng)、管理集中本系統(tǒng)劃分了四個(gè)不同權(quán)限的等級。但是，一個(gè)好的工具可以幫助我們更好、更快的完成工作。在此，一并對所有曾給予我?guī)椭睦蠋?、同學(xué)、朋友表示深深的謝意。8. 晶辰工作室,《 Visual Basic 中文版實(shí)用參考手冊》，電子工業(yè)出版社，1998年9 月出版，ISBN 7505349228。H8Const KEY_NOTIFY = amp。 amp。 \) ) Then SysInfoPath = SysInfoPath amp。 注冊表關(guān)鍵字?jǐn)?shù)據(jù)類型 Dim tmpVal As String 39。 分配變量空間 KeyValSize = 1024 39。 Null 被找到,從字符串中分離出來 Else 39。 復(fù)制字符串的值 Case REG_DWORD 39。 返回成功 rc = RegCloseKey(hKey)