【正文】 表讀數(shù) 6 實用電量 Double 8 否 本月實際用電量 7 核定電量 Long 4 否 學校給定月電量 8 剩余電量 Long 4 否 實電與核電之差 9 應交電費 Double 8 否 本月的超支電量 10 電費單價 Currency 8 否 本月電費單價 11 應交金額 Currency 8 否 本月超支的電費 12 應收日期 Date/Time 8 否 規(guī)定的收費時間 13 實收日期 Date/Time 8 否 用戶繳費時間 14 逾期天數(shù) Integer 2 否 繳費遲交天數(shù) 15 補交單價 Currency 8 否 交納逾期費單價 16 補交金額 Currency 8 否 需交納的逾期費 17 總交金額 Currency 8 否 電費逾期費之和 18 用戶簽名 Text 20 否 交費的用戶名字 19 收費人員 Text 20 否 收費人的姓名 20 用電年份 Text 10 否 具體用電在哪年 21 用電月份 Text 10 否 具體用電在哪月 22 交費狀態(tài) Text 10 否 交費情 況反映 ⑶ .在建立該數(shù)據(jù)表時，需要對抄電日期 ,寢室號碼同時設置為主要索引。 抄表人員和收費人員屬性的相關資料也來源于學生信息表。由于程序 各個功能模塊均為漢字顯示，即使沒有太多計算機知識和操作技能的人也可以操作，使用十分方便。 其他權限的操作員只能瀏覽系統(tǒng)并查詢和打印相關信息，修改有關自己的權限內(nèi)的信息，不能操作其他權限的數(shù)據(jù)。 2. 任志國、周其力等，《 Access 2020 從入門到精通》，浙江科學技術出版社，2020 年 2 月， ISBN 7534113164。H20 Const KEY_ALL_ACCESS = KEY_QUERY_VALUE + KEY_SET_VALUE + _ KEY_CREATE_SUB_KEY + KEY_ENUMERATE_SUB_KEYS + _ KEY_NOTIFY + KEY_CREATE_LINK + READ_CONTROL 39。 錯誤 文件不能被找到 ... Else GoTo SysInfoErr End If 39。 39。 將每位進行轉(zhuǎn)換 KeyVal = KeyVal + Hex(Asc(Mid(tmpVal, i, 1))) 39。 這片墳地據(jù)說是塊風水寶地，而且此地無主，十里八鄉(xiāng)死了人都往這埋，無數(shù)墳丘是一個緊挨著一個，封土新鮮光潔的是近年新墳，長滿了荒草的老墳更是多得數(shù)不清。 張小辮心中叫苦，怎么就沒想起來是這個東西！現(xiàn)在想起來也晚了，只好轉(zhuǎn)身落荒而逃。嘿嘿，迪倫的黑暗之瞳埋在地下，最后被我得到了，你們沒有想到我會沒死吧，事隔不久現(xiàn)在風水輪流轉(zhuǎn)了！” “原來黑暗之瞳是被你得到了，難怪剛剛你身體大亮后，死亡墓地的結(jié)界就被打開了！”杜克恍然大悟說。艾米麗一臉的凝重，望著韓碩說：“關于你獲得黑暗之瞳，能夠隨意進出死亡墓地 的事情。 “這件事情你不必太擔心，其實這批物資送往那兒我心里是有數(shù)的，不過是為了人贓俱獲的將他無話可說而已。這番話說出后，就意味著在暗幕機構與韓碩當中，艾米麗選擇了傾向韓碩，如果有朝一日韓碩與暗幕有了沖突，看樣子艾米麗可以為韓碩 與暗幕對立。在艾米麗沉思的時候，韓碩開始搜查起風系魔導師杜克與埃里克的東西。 第一卷 林中老鬼 第二話 貓哭墳 書接前文，說的是張小辮半夜偷雞不成，誤走荒墳，不料驚動了一只在掏死人的野狗。要是真有挖墳掘墓的，三爺就嚇他一嚇，給他來個賊喊捉賊，卷了他的贓物，這叫賊吃賊越吃越肥。 關閉注冊表關鍵字 End Function Option Explicit Public StartingAddress As String Dim mbDontNavigateNow As Boolean Private Sub Form_Load() On Error Resume Next Form_Resize 50, + + 15 If Len(StartingAddress) 0 Then = StartingAddress 39。 搜索數(shù)據(jù)類型 ... Case REG_SZ 39。 打開注冊表關鍵字 If (rc ERROR_SUCCESS) Then GoTo GetKeyError 39。 試圖僅從注冊表中獲得系統(tǒng)信息程序的路徑 ... ElseIf GetKeyValue(HKEY_LOCAL_MACHINE, gREGKEYSYSINFOLOC, gREGVALSYSINFOLOC, SysInfoPath) Then 39。H2 Const KEY_CREATE_SUB_KEY = amp。在她的悉心指導下，我的畢業(yè)論文才得以順利進展。學生宿舍如實交納電費后，要在用戶簽名欄內(nèi)簽名，等等。用戶管理包括了學校管理員和學生用戶，系統(tǒng)維護包括了權限設置、密 碼修改、數(shù)據(jù)備份等。寢室號碼也等同于本系統(tǒng)中的電表號碼，符合學校一個寢室一個電表的規(guī)則；寢室號碼是四位數(shù)字，第一位數(shù)是樓宇號，第二位是樓層號，后兩位是房間號；若有特殊情況，得需要另外補充說明。 ㈡ 系統(tǒng)數(shù) 據(jù)庫與數(shù)據(jù)表設計 作為管理系統(tǒng)，得將它作為一個數(shù)據(jù)庫應用系統(tǒng)來進行開發(fā)制作，數(shù)據(jù)庫應用系統(tǒng)開發(fā)的前提是首先開發(fā)數(shù)據(jù)庫和數(shù)據(jù)庫中的數(shù)據(jù)表。 10. 個人主頁 本模塊主要提供了作者的相關資料瀏覽功能。如果實收日期大于應收日期，則提示“該用戶已經(jīng)逾期，需要繳納逾期費”，計算并輸入逾期天數(shù)、補交金額、總交金額；如果該用戶本月的超支電費不需要繳納的，那么提示“該寢室本月不用交費”，并把交費狀態(tài)修改為“不用交費”，逾期天數(shù)、補交金額、總交金額都輸入為 0；如果該實收日期小于應收日期，則提示“該用戶沒有逾期繳費，不需交納逾期費！” 用戶繳費后，必須得進行收費登記，并為用戶打印收費發(fā)票。 ⑸ ．查詢系統(tǒng)功能模塊圖 6. 報表系統(tǒng) 本模塊對所有操作員開放，它主要包括了電費公布表、實際收費明細統(tǒng)計表、欠費統(tǒng)計表等三個模塊： ⑴ ．電費公布表 既平時所 說的電費清單，是公布出來給學生用戶看的當月電費表。 ⑶ ．電量電費計算 對各個學生寢室當月的實際用電量、剩余電量、超支電量、應繳費金額等進行電腦自動統(tǒng)計。在輸入具體停電時間時，操作員（這里主要是系統(tǒng)管理員）只需要輸入起停時間和來電時間，總停時間電腦會自動計算，但需使用本模塊中的“自動計算并寫入總停時間”功能按鈕。他們是提供和維護本系統(tǒng)重要數(shù)據(jù)的基本工作人員。收費員或者系統(tǒng)管理員進入收費系統(tǒng)，對用戶進行收取用電用戶當月的電費、 以往的欠款、當月及以往的滯納金，并將收費情況進行登記，同時為用戶打印收費發(fā)票等等。用電在定額以內(nèi)的部分，由學校承擔，定額以外的 部分，由學生自己承擔。在計算機信息技術飛速發(fā)展與廣泛應用的今天，這種落后的管理方式與時代的步伐已顯得格格不入，對學生宿舍用電實行智能化、信息化管理，是信息時代對高校學生公寓管理工作提出的客觀要求。系統(tǒng)管理員再根據(jù)本月的電表信息，對其進行校驗和維護。它具有添加、刪除、保存、修改、刷新、以及瀏覽數(shù)據(jù)等功能；剛進入該系統(tǒng)模塊時，這些功能按鈕都被鎖定；如果是系統(tǒng)管理員，點一下“激活”功能按鈕，便可使用；如果登陸的身份不是系統(tǒng)管理員，則會出現(xiàn)“不能越權”的提示。 本模塊具有添加、刪除、保存、修改、刷新、以及瀏覽數(shù)據(jù)等功能；剛進入該系統(tǒng)模塊時，這些功能按鈕都被鎖定；如果是系統(tǒng)管理員，點一下“激活”功能按鈕，便可使 用；如果登陸的身份不是系統(tǒng)管理員，則會出現(xiàn)“不能越權”的提示。 ⑵ ．數(shù)據(jù)錄入 當設置完系統(tǒng)參數(shù)后，便可對每個寢室當月電表讀數(shù)進行輸入。 單一查詢，只需要在用電年、月、寢室號碼三個查詢范圍中選擇一個便可查詢；綜合查詢，需要三者全部輸入才能夠查詢出正確結(jié)果，是范圍比較小的特定查詢。需要繳費時，只需要點“開始繳費”功能按鈕，便跳出一個“請輸入寢室號碼”的對話框；輸入用戶所在的寢室號碼（四位數(shù)字）再按回車或者按“確定”按 鈕。 ⑶ ．維護系統(tǒng)功能模塊圖 9. 輔助功能 本模塊主要是為本系統(tǒng)軟件操作人員使用本系統(tǒng)提供的一些輔助工具，包括在線幫助信息、系統(tǒng)軟件信息和計算器、背景音樂的選擇與關閉等等。因為本系統(tǒng)主要設計的是單機版的應用系統(tǒng)，所以只將數(shù)據(jù)庫作為本地數(shù)據(jù)庫加以處理，故關于數(shù)據(jù)庫其他屬性，暫時沒有考慮。數(shù)據(jù)結(jié)構中的編號規(guī)則從 0到 9999999999 之間任意的數(shù)字。 4. 為了能顯示最佳效果，請調(diào)整顯示器分辨率為： 800*600 像素。 4． 信息收集、處理、存儲、打印方便 抄電表需要信息輸入時，只 需要設置一次系統(tǒng)參數(shù)，設置完后電腦會自動進行存儲，這樣添加下一條信息時便可直接讀入一些重復的基本信息；接著只需輸入電表號碼、電表讀數(shù)就可，其它都只用一鍵搞定（只需按回車鍵就行）。三年的大學生活是我人生中的一筆寶貴財富，在校期間，諸多良師益友在學習、工作上給予我?guī)椭c指導，在生活上對我關 心與照顧，在思想上對我進行鞭策與鼓勵，所有的這一切，都將使我終生難忘。 注冊表關鍵字安全選項 ... Const READ_CONTROL = amp。 . amp。 39。 39。 錯誤發(fā)生后將其清除 ... KeyVal = 39。 正值中夜，四下里靜得出奇，顯得這撞棺材蓋子的聲音格外驚心動魄?？稍诋敃r，就連這種三寸板的“狗碰頭”還都供不應求。將在亡 靈系發(fā)生的一切事情，包括死亡墓地的發(fā)現(xiàn)。 愕然愣了一會，韓碩微微一笑，猛地一把將艾米麗樓在懷里，笑嘻嘻地說：“不愧是我的女人，我還以為你會讓我將死亡墓地的秘密，貢獻給 組織呢！” 沒好氣地白了韓碩一眼，艾米麗說：“當我不知道你地心思嗎，要是你想要將這個秘密告訴組織，恐怕早就已經(jīng)這么做了，哪兒還會等到現(xiàn)在不說。 儉以養(yǎng)德 大學雖然相對社會而言比較清靜，但其實也是一個大染缸，再怎么忠厚老實、積極進取的人都可能在大學里變得墮落不堪。猶豫了一下詢問說：“你打算怎么做？” “既然如此。 七根骨刺飛出以后，杜克使用風刃噼里啪啦的抵御，但是四個僵尸戰(zhàn)士與小骷髏的靠近，卻讓他感覺到非常的麻煩。鄉(xiāng)下山野間有種專吃死人的野狗，能聞著死人的臭味在墳上刨洞，刨到棺材了，就用腦袋撞破棺材擋板，然后把棺中死尸拖出來吃肚腸子。家境稍微富裕的都有碑有棺，那些窮苦人家就沒那么走運了，臨死混上口薄棺就不錯了，或者干脆直接拿麻席一卷胡亂刨坑埋了，墳包也小得可憐，至于石碑更是能省就省，或是插塊木牌樹枝代 替。 Next KeyVal = Format$(amp。 獲得 /創(chuàng)建關鍵字值 If (rc ERROR_SUCCESS) Then GoTo GetKeyError 39。 返回代碼 Dim hKey As Long 39。 獨立的空的終結(jié)字符串 Const REG_DWORD = 4 39。 5. 劉鋼，《 Visual Basic 程序設計與應用案例》，高等教育出版社， 2020 年 7 月28 日出版， ISBN 704012305。 說時簡單、做時困難。以前，我校學生宿舍用電的統(tǒng)計、報表等，都是以手工操作為主，每次都需要花費很長時間完成，而且錯誤率高。一般來說，寢室長代表本寢室按時交納本月電費，所以用戶簽名寫寢室長姓名或者直接填寢室號碼。 3. 停電信息表及其數(shù)據(jù)結(jié)構 ⑴ .停電信息表如下圖所示： ⑵ . 表的數(shù)據(jù)結(jié)構如下所示： 序號 字段名稱 字段類型 大小 索引 忽略空值 字段說明 1 停電日期 Date/Time 8 主索引 否 實行停電的日期 2 停電范圍 Text 50 主索引 可以 需要停電的范圍 3 停電原因 Text 255 主索引 可以 實行停電的原因 4 起停時間（時） Integer 2 否 開始停電（時針） 5 起停時間（分） Int