【正文】 ed = True Next = True = TrueOn Error GoTo EditErr = 你在修改資料，修改完畢后請及時保存！不修改，請刷新！ txtFields(0).SetFocusExit SubEditErr: MsgBox End SubPrivate Sub Command4_Click() If = 系統(tǒng)管理 Then = 當(dāng)前是第 amp。 頁信息。 (本系統(tǒng)中共有 amp。 頁記錄) = True = True = True = True = False = True = True = True = True = TruecmdRefresh_Click Else n% = MsgBox(很遺憾！你不是系統(tǒng)管理員，不能進(jìn)行此操作！) Exit Sub End IfEnd Sub該分系統(tǒng)主要授權(quán)給抄表員和系統(tǒng)管理員，學(xué)生用戶和收費(fèi)員不能對其進(jìn)行操作。本系統(tǒng)操作很簡單，添加當(dāng)月電表信息時，只需要設(shè)置好當(dāng)月相關(guān)的基本系統(tǒng)參數(shù)，接著輸入寢室號碼和電表讀數(shù)，再使用自動計算電量電費(fèi)功能按鈕就行。⑴．系統(tǒng)參數(shù)設(shè)置系統(tǒng)參數(shù)設(shè)置主要是在抄表員或系統(tǒng)管理員在添加當(dāng)月電表數(shù)據(jù)時進(jìn)行設(shè)置。當(dāng)需要添加當(dāng)月電表數(shù)據(jù)時，必須要設(shè)置系統(tǒng)參數(shù)；設(shè)置完畢后，便可對每個寢室的當(dāng)月用電數(shù)據(jù)進(jìn)行輸入。設(shè)置參數(shù)時，可對抄電日期、抄表人員、電費(fèi)單價、核定電量、收費(fèi)日期、補(bǔ)交單價等進(jìn)行選擇性輸入。使用“參數(shù)設(shè)置完畢”按鈕后，電腦便暫時保存好剛剛所設(shè)置的信息，以便接著添加資料時可自動讀入數(shù)據(jù)。這里只包括寢室號碼、本月讀數(shù)、上月讀數(shù)三項信息。⑶．電量電費(fèi)計算對各個學(xué)生寢室當(dāng)月的實際用電量、剩余電量、超支電量、應(yīng)繳費(fèi)金額等進(jìn)行電腦自動統(tǒng)計。⑷．抄表系統(tǒng)數(shù)據(jù)流圖如下圖13所示： 抄表數(shù)據(jù)管理圖⑴．學(xué)生用戶檔案查詢本模塊提供了兩種基本查詢方式來查詢學(xué)生用戶檔案信息的功能。它包括按用戶性別查詢、按所在年級查詢、按寢室長查詢等三個條件。方式二是輸入式查詢，即查詢條件的范圍給定，但查詢條件具體的數(shù)據(jù)需要操作員自行輸入。操作方法比方式一稍微麻煩些，但也比較簡單，先選擇一個查詢范圍，再輸入具體數(shù)據(jù)，接著按回車鍵或“開始查詢”功能按鈕便可。其操作方法和學(xué)生用戶檔案查詢類似。本模塊提供了按照用電年、月、寢室號碼的單一查詢以及用電年、月和寢室號碼三者組合而成的綜合查詢電表檔案信息的功能。⑷．用戶電費(fèi)查詢用戶電費(fèi)信息主要包括用電時間年月、寢室號碼、超支電量、電費(fèi)單價、電費(fèi)金額、應(yīng)收日期、實收日期、繳費(fèi)狀態(tài)、逾期天數(shù)、補(bǔ)交單價、補(bǔ)交金額、實交金額、收費(fèi)人員、用戶簽名等。[5]查詢系統(tǒng)功能模塊圖如下圖1 查詢數(shù)據(jù)管理圖把所需查找的字段名填入到bo1中，把所需用到的運(yùn)行符填入到bo2中，在值或表達(dá)式所對應(yīng)的TEXT BOX控件中填入要查找的值或表達(dá)式，如：姓名，學(xué)號等點擊確定開始查找，當(dāng)數(shù)數(shù)據(jù)庫中沒有你要查找的記錄時顯示錯誤信息，查找成功則把記錄顯示在相對應(yīng)的窗體或控件中，如查找某班某個學(xué)生的信息，若查找成功，記錄將顯示在學(xué)生成績管理窗體中的DATAGRID控件中（代碼詳見附頁）。其基本屬性包括有寢室號碼、上月電表數(shù)碼、本月電表數(shù)碼、實際用電、核定電量、剩余電量、超支電量、電量單價、繳費(fèi)金額等。⑵．實際收費(fèi)明細(xì)統(tǒng)計表本模塊提供統(tǒng)計了本校某年某月各寢室繳費(fèi)后的反饋情況報表功能。⑶．匯總欠費(fèi)統(tǒng)計表本模塊提供統(tǒng)計了各寢室未按時繳費(fèi)情況進(jìn)行匯總后的報表功能。并對寢室欠費(fèi)總次數(shù)、欠費(fèi)超支總電量、欠費(fèi)超支總金額進(jìn)行合計，可打印輸出。⑵．收取電費(fèi)本模塊主要用于收取用電用戶當(dāng)月的電費(fèi)、以往的欠款、當(dāng)月及以往的滯納金，并將收費(fèi)情況進(jìn)行登記，同時為用戶打印收費(fèi)發(fā)票。需要繳費(fèi)時，只需要點“開始繳費(fèi)”功能按鈕，便跳出一個“請輸入寢室號碼”的對話框；輸入用戶所在的寢室號碼（四位數(shù)字）再按回車或者按“確定”按鈕。電腦自動計算實際繳費(fèi)金額功能，可自動計算逾期天數(shù)、補(bǔ)交金額、總交金額。本模塊中提供的登記操作也比較簡單，在實收日期、繳費(fèi)狀態(tài)兩個屬性里選擇輸入相關(guān)數(shù)據(jù)，便可點擊“計算實際繳費(fèi)金額”功能按鈕進(jìn)行電腦自動計算出逾期天數(shù)、補(bǔ)交金額、總交金額等。為了給收費(fèi)人員及其用戶在繳費(fèi)時便于校對數(shù)據(jù)，在本模塊中提供了繳費(fèi)的相關(guān)信息。⑶．交費(fèi)系統(tǒng)功能模塊圖如下圖16所示： 交費(fèi)數(shù)據(jù)管理圖收費(fèi)系統(tǒng)窗體包括COMMAND控件，TEXT控件，COBO控件, LABEL控件，DATA控件等，其中data控件作為連接數(shù)據(jù)庫，TEXT控件用于填寫用戶基本信息，minth控件用于選擇當(dāng)時日期，COMMAND控件用于資料修改，刷新等功能的實現(xiàn)，具體實現(xiàn)代碼如下：Private Sub MonthView1_DateClick(ByVal DateClicked As Date) = = FalseIf Year() Year() Then 39。比較月份大小MsgBox (實收月份不能小于抄電月份，請重新選擇實收日期！) = Exit SubCommand4_ClickEnd IfIf Year() = Year() And Month() = Month() And Day() = Day() Then 39。操作員的修改密碼專區(qū)，是所有操作員對進(jìn)入學(xué)校用電收費(fèi)管理系統(tǒng)時的登陸密碼進(jìn)行設(shè)置，只能修改自己的登陸密碼。本專區(qū)只有系統(tǒng)管理員才有操作權(quán)限，其他操作員不能操作。進(jìn)行數(shù)據(jù)備份或數(shù)據(jù)恢復(fù)后，會關(guān)閉學(xué)校用電收費(fèi)管理系統(tǒng)，然后需要重新登陸。⑶．維護(hù)系統(tǒng)功能模塊圖如下圖17所示： 維護(hù)數(shù)據(jù)管理圖權(quán)限管理窗體包括COMMAND控件，TEXT控件，COBO控件, LABEL控件，DATA控件等，其中data控件作為連接數(shù)據(jù)庫，TEXT控件用于填寫用戶基本信息，cobo控件用于選擇操作權(quán)限，COMMAND控件用于進(jìn)行用戶添加，密碼修改等功能的實現(xiàn)，具體實現(xiàn)代碼如下Private Sub Combo2_Click()Dim b As String = amp。 amp。 39。 39。 amp。 bEnd SubPrivate Sub Combo2_KeyPress(KeyAscii As Integer)KeyAscii = 0End SubPrivate Sub Combo3_Click() = End SubPrivate Sub Combo3_KeyPress(KeyAscii As Integer)KeyAscii = 0End SubPrivate Sub Command1_Click() = True = True = True = False = False = False = False = True = False = 增加記錄，不增加請刷新！End SubPrivate Sub Command2_Click() = 你正準(zhǔn)備修改密碼！ = True = False = False = True = False = FalseEnd SubPrivate Sub Command3_Click() = amp。在線幫助主要提供了使用學(xué)校用電收費(fèi)管理系統(tǒng)的操作方法和步驟；“關(guān)于系統(tǒng)”主要提供了系統(tǒng)的相關(guān)信息；使用“計算器”可調(diào)出電腦操作系統(tǒng)中的計算器，以便計算時用； 本模塊對所有操作員都開放。4 系統(tǒng)界面設(shè)計系統(tǒng)界面是系統(tǒng)與用戶之間的接口，也是控制和選擇信息輸入輸出的主要途徑。根據(jù)系統(tǒng)功能設(shè)計及數(shù)據(jù)流圖、功能模塊圖的設(shè)計分析，對本系統(tǒng)的主要界面做了如下圖214設(shè)計：5 系統(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)\。 3. 本系統(tǒng)是在Microsoft 2000系統(tǒng)下編譯運(yùn)行的，所以最好也在Microsoft 2000系統(tǒng)下安裝本系統(tǒng)；否則有些功能可能無法使用，會導(dǎo)致系統(tǒng)出錯。5. 本系統(tǒng)涉及到個人主頁，需要上網(wǎng)才能瀏覽，所以安裝好系統(tǒng)后，最好能保證你的電腦已經(jīng)連接到Internet網(wǎng)絡(luò)上。用戶管理包括了學(xué)校管理員和學(xué)生用戶，系統(tǒng)維護(hù)包括了權(quán)限設(shè)置、密碼修改、數(shù)據(jù)備份等。本系統(tǒng)前臺是利用Visual Basic語言、后臺使用ACCESS數(shù)據(jù)庫進(jìn)行開發(fā)，適用于windows98／2000，或更高的軟件支持平臺，便于以后的系統(tǒng)擴(kuò)展與更新。由于程序各個功能模塊均為漢字顯示，即使沒有太多計算機(jī)知識和操作技能的人也可以操作，使用十分方便。2． 大大提高工作效率改變以往的工作模式，提高工作效率。“學(xué)校用電收費(fèi)管理系統(tǒng)”中的電表信息錄入十分簡單方便，統(tǒng)計、計算等工作全部有電腦自動操作，管理員只需在短時間便可完成任務(wù)，優(yōu)勢十分明顯，而且錯誤率比較低。使用學(xué)校用電收費(fèi)管理系統(tǒng)之前，用電量統(tǒng)計十分麻煩，工作量很大；希望使用學(xué)校用電收費(fèi)管理系統(tǒng)進(jìn)行統(tǒng)計后使工作達(dá)到易如反掌。這樣，學(xué)生從公布的電費(fèi)收取表中可清楚地了解本宿舍的用電情況，而用電是否超定額又一目了然。系統(tǒng)都已經(jīng)設(shè)計成美觀的字體和統(tǒng)一的格式，使打印的報表規(guī)范、美觀。學(xué)生宿舍如實交納電費(fèi)后，要在用戶簽名欄內(nèi)簽名，等等。6． 系統(tǒng)可維護(hù)性強(qiáng)、管理集中本系統(tǒng)劃分了四個不同權(quán)限的等級。其他權(quán)限的操作員只能瀏覽系統(tǒng)并查詢和打印相關(guān)信息，修改有關(guān)自己的權(quán)限內(nèi)的信息，不能操作其他權(quán)限的數(shù)據(jù)。必要時可以提供給學(xué)生以遠(yuǎn)程查詢相關(guān)數(shù)據(jù)信息。由于個人知識的有限性，系統(tǒng)中尚存在著一些不足的之處，部分功能要求沒有很好的按照自己的需求分析而成功的實現(xiàn)；這些缺陷都還需要進(jìn)一步的優(yōu)化。但是，一個好的工具可以幫助我們更好、更快的完成工作。致 謝時光荏苒，四年大學(xué)生涯轉(zhuǎn)眼間即逝。衷心感謝我的畢業(yè)論文指導(dǎo)教師班老師。在他的悉心指導(dǎo)下，我的畢業(yè)論文才得以順利進(jìn)展。在此，一并對所有曾給予我?guī)椭睦蠋?、同學(xué)、朋友表示深深的謝意。