【正文】 設置返回值到空字符串 GetKeyValue = False 39。 By Char。 決定轉(zhuǎn)換的關(guān)鍵字的值類型... 39。 rc = RegQueryValueEx(hKey, SubKeyRef, 0, _ KeyValType, tmpVal, KeyValSize) 39。 打開 {HKEY_LOCAL_MACHINE...} 下的 RegKey 39。 循環(huán)計數(shù)器 Dim rc As Long 39。 = End SubPublic Sub StartSysInfo() On Error GoTo SysInfoErr Dim rc As Long Dim SysInfoPath As String 39。H80000002Const ERROR_SUCCESS = 0Const REG_SZ = 1 39。H20000Const KEY_QUERY_VALUE = amp。4. 張瀚文、齊錦剛，《Visual Basic數(shù)據(jù)庫系統(tǒng)開發(fā)實例與解析》，高等教育出版社，20031130出版，ISBN 7040133318。衷心感謝我的畢業(yè)論文指導教師陳老師。必要時可以提供給學生以遠程查詢相關(guān)數(shù)據(jù)信息。系統(tǒng)都已經(jīng)設計成美觀的字體和統(tǒng)一的格式，使打印的報表規(guī)范、美觀。2． 大大提高工作效率改變以往的工作模式，提高工作效率。5. 本系統(tǒng)涉及到個人主頁，需要上網(wǎng)才能瀏覽，所以安裝好系統(tǒng)后，最好能保證你的電腦已經(jīng)連接到Internet網(wǎng)絡上。用戶簽名屬性的相關(guān)也主要來源于學生信息表。6. 學生信息表及其數(shù)據(jù)結(jié)構(gòu)⑴. 學生信息表如下圖所示：⑵. 表的數(shù)據(jù)結(jié)構(gòu)如下所示：序號字段名稱字段類型字段大小索引忽略空值字段說明1學生學號Double8唯一、主索引否現(xiàn)在在本校讀書的學生學號2學生姓名Text20否在校學生的姓名3學生性別Text6否在校學生的性別4所屬院系Text50否學生所在的分院和系部名稱5所在年級Text10否學生現(xiàn)在的年級6所在班級Text10否學生所在的班級7寢室號碼Double8否學生所住的寢室8寢室電話Double8否寢室的電話號碼9是否寢室長Text10否是不是寢室長⑶.在學生信息表中，得將學生的學號設置為關(guān)鍵字。2. 繳費通知表及其數(shù)據(jù)結(jié)構(gòu)⑴. 繳費通知表如下圖所示：⑵. 表的數(shù)據(jù)結(jié)構(gòu)如下所示：序號字段名稱字段類型字段大小索引忽略空值字段說明1通知時間Date/Time8主索引否發(fā)繳費通知的時間2通知內(nèi)容Text255主索引可以繳費通知內(nèi)容3發(fā)通知單位Text50主索引否發(fā)這個繳費通知的單位名稱⑶.發(fā)通知，必須具備發(fā)通知的時間和內(nèi)容以及是誰發(fā)的通知等信息；且不同的單位可以在同一天的時間內(nèi)可以發(fā)不同通知內(nèi)容，所以這三者是繳費通知的必要條件。一個應用系統(tǒng)往往需要多次或一定的時間才能完成，因此數(shù)據(jù)庫的應用將會多次打開或關(guān)閉操作。本系統(tǒng)的數(shù)據(jù)庫主要是在Visual Basic集成開發(fā)環(huán)境中制作開發(fā)。在線幫助主要提供了使用學校用電收費管理系統(tǒng)的操作方法和步驟；“關(guān)于系統(tǒng)”主要提供了系統(tǒng)的相關(guān)信息；使用“計算器”可調(diào)出電腦操作系統(tǒng)中的計算器，以便計算時用；使用“背景樂音”可選擇不同的音樂，如果你覺得煩，那可“關(guān)閉音樂”。⑴．權(quán)限管理本模塊中有兩部分組成，一部分是操作員的修改密碼專區(qū)，另一部分是系統(tǒng)管理員權(quán)限設置專區(qū)。這樣就可以從數(shù)據(jù)庫中調(diào)出該寢室相關(guān)用電繳費信息。其基本屬性包括用電時間、寢室號碼、本月讀數(shù)、上月讀數(shù)、實際用電、核定電量、剩余電量、超支電量、電費單價、超支金額、指定繳費的日期。⑷．用戶電費查詢用戶電費信息主要包括用電時間年月、寢室號碼、超支電量、電費單價、電費金額、應收日期、實收日期、繳費狀態(tài)、逾期天數(shù)、補交單價、補交金額、實交金額、收費人員、用戶簽名等。方式二是輸入式查詢，即查詢條件的范圍給定，但查詢條件具體的數(shù)據(jù)需要操作員自行輸入。這里只包括寢室號碼、本月讀數(shù)、上月讀數(shù)三項信息。⑴．系統(tǒng)參數(shù)設置系統(tǒng)參數(shù)設置主要是在抄表員或系統(tǒng)管理員在添加當月電表數(shù)據(jù)時進行設置。使用任一個功能按鈕后，在本模塊的窗口正下方將出現(xiàn)提示性的文字。它具有添加、刪除、保存、修改、刷新、以及瀏覽數(shù)據(jù)等功能；剛進入該系統(tǒng)模塊時，這些功能按鈕都被鎖定；如果是系統(tǒng)管理員，點一下“激活”功能按鈕，便可使用；如果登陸的身份不是系統(tǒng)管理員，則會出現(xiàn)“不能越權(quán)”的提示。使用任一個功能按鈕后，在本模塊的窗口正下方將出現(xiàn)提示性的文字。本系統(tǒng)的檔案資料主要是系統(tǒng)管理員從管理模塊中進行錄入；該分系統(tǒng)主要使用者是系統(tǒng)管理員，其他三個權(quán)限是不能對本模塊進行操作。檢驗無誤后，再發(fā)布繳費通知和本月的電費清單，并提供電腦查詢電量電費等信息。本系統(tǒng)前臺利用Visual Basic語言、后臺使用ACCESS數(shù)據(jù)庫進行開發(fā)，適用于windows98／2000，或更高的軟件支持平臺，便于以后的系統(tǒng)擴展與更新，有著較好的開發(fā)前景。我校目前的學生公寓，是按房間安裝了電度表，對學生宿舍用電實行定額管理。學校電費管理系統(tǒng)摘 要 :學校用電收費管理系統(tǒng)是單機版的應用系統(tǒng)，主要用于記錄本學校學生公寓寢室的用電情況并在此基礎上進行超支電費收取。學校按照規(guī)定給每個宿舍核撥用電定額。使用本系統(tǒng)后可提高學生們的節(jié)電意識，減少大手大腳隨意浪費電能的現(xiàn)象，對于學校用電管理的規(guī)范化、制度化建設等工作都起到積極的作用。4. 發(fā)布繳費通知后，便可開始對用戶進行收取電費工作。檔案管理主要用于對用電用戶相關(guān)的一系列檔案資料進行錄入與維護工作，為學校用電收費部門進行用電管理和用電收費提供基本的用戶資料；其主要包括學生用戶檔案管理和管理員（系統(tǒng)管理員、抄表員和收費員）檔案管理兩個子模塊：⑴．學生用戶檔案管理本模塊主要用于實現(xiàn)對學生用電用戶基本情況進行錄入與維護工作。系統(tǒng)中管理員包括系統(tǒng)管理員、抄表員和收費員。使用任一個功能按鈕后，在本模塊的窗口正下方將出現(xiàn)提示性的文字。本模塊涉及到停電日期、停電范圍、停電原因以及具體停電時間等。它主要包括抄電日期、抄表人員、電費單價、核定電量、收費日期、補交單價等基本系統(tǒng)參數(shù)。其操作過程十分簡單方便，輸入每個信息后，只需按回車鍵便可進行自動電量電費計算。它包括了按學生學號、按姓名查詢、按寢室號碼查詢等三個條件范圍。本模塊也提供了按照用電年、月、寢室號碼的單一查詢以及用電年、月和寢室號碼三者組合而成的綜合查詢用戶電費信息的功能。并對寢室欠費總次數(shù)、欠費超支總電量、欠費超支總金額進行合計，可打印輸出。電腦自動計算實際繳費金額功能，可自動計算逾期天數(shù)、補交金額、總交金額。操作員的修改密碼專區(qū)，是所有操作員對進入學校用電收費管理系統(tǒng)時的登陸密碼進行設置，只能修改自己的登陸密碼。本模塊對所有操作員都開放。VB可視化數(shù)據(jù)庫管理器是一個功能強大的數(shù)據(jù)庫和數(shù)據(jù)表開發(fā)工具。如果需要在數(shù)據(jù)庫中進行操作，只需要在可視化數(shù)據(jù)管理器中打開數(shù)據(jù)庫文件即可。3. 停電信息表及其數(shù)據(jù)結(jié)構(gòu)⑴.停電信息表如下圖所示：⑵. 表的數(shù)據(jù)結(jié)構(gòu)如下所示：序號字段名稱字段類型大小索引忽略空值字段說明1停電日期Date/Time8主索引否實行停電的日期2停電范圍Text50主索引可以需要停電的范圍3停電原因Text255主索引可以實行停電的原因4起停時間（時）Integer2否開始停電（時針）5起停時間（分）Integer2否開始停電（分針）6來電時間（時）Integer2否來電時間（時針）7來電時間（分）Integer2否來電時間（分針）8總停時間（時）Integer2否總停時間（時針）9總停時間（分）Integer2否總停時間（分針）⑶.停電范圍指整個校園還是某個系或是某個寢室等；停電原因有外部原因（如電線接修等）和內(nèi)部原因（如電費超支費逾期達30天等）。數(shù)據(jù)結(jié)構(gòu)中的學號是該學生現(xiàn)在還在學校讀書時期的編排號碼，目前系統(tǒng)中存在學號為1010410301——1010410338，是我們班級同學的學號。一般來說，寢室長代表本寢室按時交納本月電費，所以用戶簽名寫寢室長姓名或者直接填寢室號碼。結(jié) 論本系統(tǒng)具備了用戶管理、電費抄表登記、電費收繳、報表統(tǒng)計打印、用戶用電查詢、系統(tǒng)維護等功能要求。以前，我校學生宿舍用電的統(tǒng)計、報表等，都是以手工操作為主，每次都需要花費很長時間完成，而且錯誤率高。5． 收費程序更加規(guī)范按學校的要求，對沒有如期交納超過電費的宿舍，要在電腦里反映出來，并發(fā)通知要求按時補交超用電費，若逾期上交的則得交滯納金或做停電處理。說時簡單、做時困難。從大三下半年進入畢業(yè)實習階段，我就開始在陳老師的指導下開始了我的畢業(yè)設計。5. 劉鋼，《Visual Basic 程序設計與應用案例》，高等教育出版社，2003年7月28日出版，ISBN 704012305。H1Const KEY_SET_VALUE = amp。 獨立的空的終結(jié)字符串Const REG_DWORD = 4 39。 試圖從注冊表中獲得系統(tǒng)信息程序的路徑及名稱... If GetKeyValue(HKEY_LOCAL_MACHINE, gREGKEYSYSINFO, gREGVALSYSINFO, SysInfoPath) Then 39。 返回代碼 Dim hKey As Long 39。 rc = RegOpenKeyEx(KeyRoot, KeyName, 0, KEY_ALL_ACCESS, hKey) 39。 獲得/創(chuàng)建關(guān)鍵字值 If (rc ERROR_SUCCESS) Then GoTo GetKeyError 39。