【正文】 統(tǒng)開發(fā)環(huán)境設計 系統(tǒng)開發(fā)環(huán)境 系統(tǒng)開發(fā)的軟、硬件環(huán)境如下： ⑴ .硬件環(huán)境： 586 以上微機一臺， 256M 內存、以太網(wǎng)網(wǎng)卡、顯卡、音響裝置等。 數(shù)據(jù)庫開發(fā)環(huán)境 數(shù)據(jù)庫是數(shù)據(jù)表的集合，系統(tǒng)開發(fā)首先應該開發(fā)一個數(shù)據(jù)庫，它用于存放系統(tǒng)中的數(shù)據(jù)表。 VB 可視化數(shù)據(jù)庫管理器是一個功能強大的數(shù)據(jù)庫和數(shù)據(jù)表開發(fā)工具。 VB 默認的數(shù)據(jù)庫類型為 Microsoft Access 數(shù)據(jù)庫類型，它與 Microsoft Office 2020 的基本數(shù)據(jù)庫類型一致，而且在 Microsoft Access 數(shù)據(jù)庫類型中，Version MDB 為最新版的數(shù)據(jù)庫類型。 由于數(shù)據(jù)庫可能是作為本地機數(shù)據(jù)庫，即作為單用戶系統(tǒng)開發(fā)的數(shù)據(jù)庫使用，也可能是作為客戶服務器系統(tǒng)的遠程數(shù)據(jù)庫應用系統(tǒng)開發(fā)的數(shù)據(jù)庫使用。因為本系統(tǒng)主要設計的是單機版的應用 系統(tǒng)，所以只將數(shù)據(jù)庫作為本地數(shù)據(jù)庫加以處理，故關于數(shù)據(jù)庫其他屬性，暫時沒有考慮。如果需要在數(shù)據(jù)庫中進行操作，只需要在可視化數(shù)據(jù)管理器中打開數(shù)據(jù)庫文件即可。數(shù)據(jù)庫技術能使 Inter 應用超越具 有早期應用特點的簡單的發(fā)布。這些技術沒有脫離經(jīng)典數(shù)據(jù)庫技術的要求。 數(shù)據(jù)庫的設計和開發(fā)及包括藝術有包括工程。把設計轉變?yōu)閷嶋H的數(shù)據(jù)庫，并且這些數(shù)據(jù)庫帶有功能完備、高效能的應用，是一個工程過程。經(jīng)典的數(shù)據(jù)庫應用涉及諸如訂單、顧客、工作、員工、學生、電話之類的項，或其它數(shù)據(jù)量較大、需要密切關注的事務。數(shù)據(jù)庫也被越來越多地應用于生成和維護多媒體應用程序上。存儲器的容量、存儲速率直接影響到數(shù)據(jù)管理技術的發(fā)展。 使用計算機以后，數(shù)據(jù)處理的速度和規(guī)模，無論是相對于手工方式，還是機械方式，都有無可比擬的優(yōu)勢。數(shù)據(jù)管理是指數(shù)據(jù)的收集、整理、組織、存儲、維護、檢索、傳送等操作，這部分操作是數(shù)據(jù)處理業(yè)務的基本環(huán)節(jié)，而且是任何數(shù)據(jù)處理業(yè)務中必不可少的共有部分。 數(shù)據(jù)庫在一個信息管理系統(tǒng)中占有非常重要的位置，數(shù)據(jù)庫結構設計的好壞將直接對應用系統(tǒng)的效果產(chǎn)生影響。同時合理的數(shù)據(jù)結構也將有利于程序的實現(xiàn)。 （ 2）創(chuàng)建數(shù)據(jù)庫 文件 如果操作系統(tǒng)中安裝了 ACCESS2020 的話，可以在開始菜單的程序菜單中可以找到。這些就新建了一個數(shù)據(jù)庫文件。點擊創(chuàng)建就完成。 在下面的對話框中選 ” 使用設計器創(chuàng)建表 ” ，上面還有三個按鈕，一個是打開，一個是設計，一個是新建，點擊設計，就可以開始設計數(shù)據(jù)表了。先看看 VB 是如何與 ACCESS2020 數(shù)據(jù)庫相連接的。連接數(shù)據(jù)庫 Set conn = CreateObject() 39。 \ amp。設置數(shù)據(jù)的路徑 Provider=。 DBpath 39。設置數(shù)據(jù)庫對像 End Sub 系畢業(yè)設計（論文） 14 上面的一段代碼就是連接數(shù)據(jù)庫的。其 中有兩個變量要定義為公用的變量，因為這段代碼是放在一個模塊中的，為了在每一個窗體中能夠使用這個變量，所以必須要聲明為公用變量。如果聲明在下面，那就成了局部變量，那么作用范圍就會不同了，作用就更不同，而且在其它窗體中使用到了這個變量，程序會出錯。所以在開發(fā)“學校 用電收費管理系統(tǒng)”之前，首先得需要創(chuàng)建一個名為“用電收費”數(shù)據(jù)庫，并在該數(shù)據(jù)庫中，創(chuàng)建數(shù)張相關的數(shù)據(jù)表。其數(shù)據(jù)表名稱及其數(shù)據(jù)元素為： 在設計視圖中分別建立以下數(shù)據(jù)過猶不及的信息表，以存儲各類管理數(shù)據(jù)，方法同上面的設計數(shù)據(jù)表的方法相同分別建以下表： 電費管理數(shù)據(jù)表 ： {抄電日期、寢室號碼 、抄表人員、用電年份、用電月份、電表起碼、電表止碼、實用電量、核定電 量、剩余電量、應交電費、電費單價、應交金額、應收日期、繳費狀態(tài)、實收日期、逾期天數(shù)、補交單價、補交金額、總交金額、用戶簽名、收費人員 }； 系畢業(yè)設計（論文） 15 繳費通知表： {通知時間、通知內容、發(fā)通知單位 }； 系畢業(yè)設計（論文） 16 停電信息表： {停電日期、停電范圍、停電原因 、起停時間、來電時間、總停時間 }； 登陸權限表： {操作權限 、操作員 、登陸密碼 }； 系畢業(yè)設計（論文） 17 管理員信息表： {編號 、姓名、性別、年齡、職務、住址、電話、 Email}； 系畢業(yè)設計（論文） 18 學生信息表： {學生學號 、學生姓名、學生性別、所屬院系、所在年級、所在班級、寢室號碼、寢室電話、是否 寢室長 }。因為學校已對每個寢室都安裝了一個電度表，每個月均有定額的電量給予。 停電信息表及其數(shù)據(jù)結構 ⑴ .停電信息表如下圖 25所示： ⑵ . 表的數(shù)據(jù)結構如下圖 26所示： 序號 字段名稱 字段類型 大小 索引 忽略空值 字段說明 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 否 總停時間（分針） ⑶ .停電范圍指整個校園還是某個系或是某個寢室等；停電原因有外部原因（如電線接修等）和內部原因（如電費超支費逾期達 30 天等）。 登陸權限表及其數(shù)據(jù)結構 ⑴ .登陸權限表如下圖 27所示： ⑵ . 表的數(shù)據(jù)結構如下圖 28所示： 序號 字段名稱 類型 大小 索引 忽略空值 字段說明 1 登陸密碼 Text 50 否 登陸系統(tǒng)時所需密碼 2 操作權限 Text 10 主索引 否 登陸時所選擇的權限 3 操作員 Text 10 唯一、主索引 否 登陸系統(tǒng)時所需要的操作員的用戶名 ⑶ .每個操作權限中的操作員可以多個，但每個權限中的操作員只擁有他自己的登陸密碼，故得將操作權限和操作員一起設置為關鍵字。 管理員信息表及其數(shù)據(jù)結構 ⑴ . 管理員信息表如下圖 29所示： 系畢業(yè)設計（論文） 23 ⑵ . 表的數(shù)據(jù)結構如下圖 210所示： 序號 字段名稱 字段類型 大小 索引 忽略空值 字段說明 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ù)據(jù)結構中的編號規(guī)則從 0到 9999999999 之間任意的數(shù)字。 系畢業(yè)設計（論文） 25 數(shù)據(jù)結構中的學號是該學生現(xiàn)在還在學校讀書時期的編排號碼，目前系統(tǒng)中存在學號為 1010410301—— 1010410338，是我們班級同學的學號。 數(shù)據(jù)表之間的關系 ⑴ .各數(shù)據(jù)表中存在以下聯(lián)系： 登陸權限表中操作權限為系統(tǒng)管理，則是系統(tǒng)管理員，可以管理數(shù)據(jù)庫中所有數(shù)據(jù)表；登陸權限表中操作權限為抄表，則是抄表人員，能管理電費數(shù)據(jù)表的抄電日期、寢室號碼、抄表人員、用電年份、用電月份、電表起碼、電表止碼、實用電量、核定電量、剩余電量、應交電費、電費單價、應交金額、補交單價等屬性；登陸權限表中操作權限為收費，則是收費人員，能管理電費數(shù)據(jù)表中的繳費狀態(tài)、實收日期、逾期天數(shù)、補 交金額、總交金額、用戶簽名、收費人員等；登陸權限表中操作權限為學生用戶，則是普通的操作員，只能修改登陸權限表中的各自登陸密碼屬性。寢室號碼既是學生公寓寢室的編號，也是本系統(tǒng)中用戶電表的編碼。但其登陸系統(tǒng)時，需要進行權限驗證，這時候與登陸權限表中的操作權限屬性聯(lián)系在一起。一般來說，寢室長代表本寢室按時交納本月電費，所以用戶簽名寫寢室長姓名或者直接填 寢室號碼。 \用電收費 .mdb = select * from 登陸權限表 where 操作權限 = 39。 amp。 and 操作員 =39。 amp。 b = 操作權限 = amp。 amp。 39。 amp。 39。它具有添加、刪除、保存、修改、刷新、以及瀏覽數(shù)據(jù)等功能；剛進入該系統(tǒng)模塊時，這些功能按鈕都被鎖定；如果是系統(tǒng)管理員，點一下“激活”功能按鈕，便可使用；如果登陸的身份不是系統(tǒng)管理員，則會出現(xiàn)“不能越權”的提示。 它主要負責為用電收費系統(tǒng)的其它所有模塊提供基本的和必要的用戶資料，是整個用電收費系統(tǒng)的基礎。 ⑵ ．管理員檔案管理 本模塊主要用于實現(xiàn)對管理員基本情況進行錄入與維護工作。使用任一個功能按鈕后，在本模塊的窗口正下方將出現(xiàn)提示性的文字。他們是提供和維護本系統(tǒng)重要數(shù)據(jù)的基本工作人員。 ⑶ ．檔案功能模塊圖 其模塊圖如右 11 所示： 圖 檔案功能模塊圖 系畢業(yè)設計（論文） 31 學生檔案 窗體包括 COMMAND控件， TEXT 控件， COBO控件 , LABEL 控件， DATA控件等， 其中 data 控件作為 連接數(shù)據(jù)庫 ， TEXT 控件用于 填寫學生基本信息 ， cobo 控件用于 選擇性別和所在年級等 ， COMMAND 控件用于進行添加，保存等功能的實現(xiàn)，具體 實現(xiàn)代碼如下 Private Sub Command2_Click() If = 系統(tǒng)管理 Then = 當 前 是 第 amp。 頁信息。 (本系統(tǒng)中共有 amp。 頁記錄 ) = True = True = True = True = True = True = True = True 系畢業(yè)設計（論文） 32 = True = False Else n% = MsgBox(很遺憾！你不是系統(tǒng)管理員，不能進行此操作！ ) Exit Sub End If End Sub Private Sub Commandfirst_Click() 39。 amp。 amp。 amp。本分系統(tǒng)主要使用者也是系統(tǒng)管理員，其他三個權限是不能對本模塊進行操作 其該功能模塊圖如下 12 所示： 系畢業(yè)設計（論文） 33 圖 通知管理模塊圖 ⑴ ．繳費通知管理 本模塊主要實現(xiàn)對學校用電收費何時繳費的通知內容進行錄入和維護工作，通 知內容隨電費清單向在校學生每月公布一次。使用任一個功能按鈕后，在本模塊的窗口正下方將出現(xiàn)提示性的文字。并增加了“可選擇單位”和“可選擇插入時間”兩個功能按鈕，這樣對通知進行添加或者修改時，操作員（這里主要是系統(tǒng)管理員）可以使用上這兩個功能 按鈕，點一下按鈕便會彈出相關信息提供參考選擇。其停電原因有外部因素和內部因素，外部因素是學校意外斷電或是接電力公司通知而停電；內部因素主要是對某學生用戶對繳費逾期一個月（發(fā)繳費通知后 30 天內未交超支電費）而做出對其進行個別寢室停電決定。 本模塊具有添加、刪除、保存、修改、刷新、以及瀏覽數(shù)據(jù)等功能；剛進入該系統(tǒng)模塊時，這些功能按鈕都被鎖定；如果是系統(tǒng)管理員，點一下“激活 ”功能按鈕，便可使用；如果登陸的身份不是系統(tǒng)管理員，則會出現(xiàn)“不能越權”的提示。 系畢業(yè)設計（論文） 34 本模塊涉及到停電日期、停電范圍、停電原因以及具體停電時間等。 繳費通知 窗體包括 COMMAND 控件， TEXT 控件， COBO 控件 ,， DATA 控件等，其中 data 控件作為 連接數(shù)據(jù)庫 ， TEXT 控件用于 填寫繳費 基本信息 ， COMMAND 控件用于進行添加，保存等功能的實現(xiàn)，具體 實現(xiàn)代碼如下 Private Sub Command3_Click() For i = 0 To 2 txtFields(i).Enabled = True Next = True = True On Error GoTo EditErr = 你在修改資料，修改完畢后請及時保存！不修改，請刷新！ txtFields(0).SetFocus Exit Sub EditErr: 系畢業(yè)設計（論文） 35 MsgBox End Sub Private Sub Command4_Click() If = 系統(tǒng)管理 Then = 當前是第 amp。 頁信息。 (本系統(tǒng)中共有 amp。 頁記錄 ) = True = True = True = True = False = True = True = True = True = Tr