【正文】 判斷登陸用戶是否為 admin If username = admin Then 7 第 35頁(yè) = True 39。另外，同學(xué)同樣給與我不少幫助，這里一并表示感謝 。 功 能 登 錄 增、刪用戶 修改密碼 查詢信息 導(dǎo)入、導(dǎo)出文件 預(yù) 期 效 果 能正確檢驗(yàn)用戶身份及密碼的一致性；若不匹配，能返回錯(cuò)誤提示信息。退出系統(tǒng) End Sub Private Sub guanli_Click() GetStatus 對(duì)戶籍進(jìn)行管理 End Sub Private Sub hbaobiao_Click() GetStatus 戶口報(bào)表 End Sub Private Sub hxinxi_Click() = False = False = False = False = False = False = False 第 25頁(yè) GetStatus 查詢修改戶信息 End Sub Private Sub mfy_Click() 39。連接數(shù)據(jù)庫(kù) username = Trim() password = 39。其中 有兩個(gè)變量要定義為公用的變量，因?yàn)檫@段代碼是放在一個(gè)模塊中的，為了在每一個(gè)窗體中能夠使用這個(gè)變量，所以必須要聲明為公用變量。點(diǎn)擊創(chuàng)建就完成。數(shù)據(jù)庫(kù)也被越來(lái)越多地應(yīng)用于生成和維護(hù)多媒體應(yīng)用程序上。 (4) 統(tǒng)一的數(shù)據(jù)編輯設(shè)計(jì)方法 以戶口表為例進(jìn)行說(shuō)明，為了編輯其記錄，設(shè)計(jì)了mainfrm窗體，在其中的 DataGrid中顯示所有已輸入的戶籍檔案記錄。 需求分析一般是按圖 31 所示的過(guò)程進(jìn)行 : 系統(tǒng)需求用戶需求者分析員規(guī)格說(shuō)明語(yǔ)言規(guī)格說(shuō)明處理關(guān)于規(guī)格說(shuō)明的報(bào)告所寫的軟件需求說(shuō)明規(guī)格說(shuō)明 圖 31 需求分析圖 面對(duì)一個(gè)復(fù)雜的系統(tǒng)時(shí)，一個(gè)比較好的方法是分層次地描繪這個(gè)系統(tǒng)。 Access也提供了數(shù)據(jù)存儲(chǔ)庫(kù)，可以使用桌面數(shù)據(jù)庫(kù)文件把數(shù)據(jù)庫(kù)文件置于網(wǎng)絡(luò)文件服 務(wù)器，與其他網(wǎng)絡(luò)用戶共享數(shù)據(jù)庫(kù)。后者在網(wǎng)絡(luò)中有多臺(tái)數(shù)據(jù)庫(kù)服務(wù)器。 本課題是由公安部戶籍管理部提出的，為其內(nèi)務(wù)部門使用，以提高他們的辦公效率。 由此，建立高性能的戶籍管理系統(tǒng)， 作為計(jì)算機(jī)應(yīng)用的一部分 ,使用計(jì)算機(jī)對(duì) 戶籍檔案 進(jìn)行管理 ,具有著手工管理所無(wú)法比擬的優(yōu)點(diǎn) .例如 :檢索迅速、查找方便、可靠性高、存儲(chǔ)量大、保密性好、壽命長(zhǎng)、成本低等。這些優(yōu)點(diǎn)能夠極大地提高 戶籍 檔案管理的效率 ,也是 公安部門 的科學(xué)化、正規(guī)化管理 的體現(xiàn) 。本系統(tǒng)軟件的運(yùn)行環(huán)境是以計(jì)算機(jī)網(wǎng)絡(luò)為支持的硬件環(huán)境及以服務(wù)器端以 windows 2020 Server 以上、數(shù)據(jù)庫(kù)服務(wù)器要求 Access 2020 、客戶端要求 windows 9 20 XP。 客戶 /服務(wù)器體系可以應(yīng)用在多種平臺(tái)上，可以使用多種工具，從而提供靈活和高質(zhì)量的用戶應(yīng)用 —— 這就是客戶 /服務(wù)器體系。 Access 是一種關(guān)系數(shù)據(jù)庫(kù)工具，關(guān)系數(shù)據(jù)庫(kù)是已開發(fā)的最通用的數(shù)據(jù)庫(kù)之一。首先用一張高層次的系統(tǒng)流程圖 描繪系統(tǒng)的總體概貌，表明系統(tǒng)的關(guān)鍵功能。用戶可以先通過(guò)“設(shè)置條件”框找到相應(yīng)的戶籍檔案記錄，然后單擊“添加”或“刪除”按鈕對(duì)戶籍檔案記錄進(jìn)行添加或刪除，而后單擊“保存”按鈕保存戶籍檔案記錄。 計(jì)算機(jī)的數(shù)據(jù)處理應(yīng)用，首先要把大量的信息以數(shù)據(jù)形式存放在存儲(chǔ)器中。 第 12頁(yè) （ 3） 怎樣創(chuàng)建一個(gè)數(shù)據(jù)表 上面已經(jīng)講了如何創(chuàng)建一個(gè)數(shù)據(jù)庫(kù)文件， 按照上面的步驟建立一個(gè)數(shù)據(jù)庫(kù)文件后，需要在數(shù)據(jù)庫(kù)文件中建立一個(gè)數(shù)據(jù)表。聲明公用變量的方法如下： Public conn Public rs 上面就是聲明為公用變量，上面的聲明一定要放在模塊的最上面。檢查用戶名是否正確 local_db = select 用戶名 from 用戶表 + _ where 用戶表 .用戶名 = + 39。修改用戶 = False = False = False = False = False = False = False GetStatus 修改密碼 End Sub Private Sub pbaobiao_Click() GetStatus 人口報(bào)表 End Sub 、 DataReport 報(bào)表設(shè)計(jì) : 這里我們?cè)O(shè)計(jì)了兩個(gè)報(bào)表分別打印戶口和人口基本信息，先建立數(shù)據(jù)環(huán)境DataEnvionment1，其步驟如下： （ 1） 擇“工程”菜單的“更多 ActiveX 設(shè)計(jì)器”選項(xiàng)，在出現(xiàn)的下拉菜單中選擇“ DataEnvionment1”選項(xiàng)，出現(xiàn)如圖所示的界面 : （ 2） “ Connection1”上單擊鼠標(biāo)右鍵，在出現(xiàn)的快捷菜單中選擇“屬性”選項(xiàng)， 出現(xiàn)“ Data Link Properties”對(duì)話框 : 第 26頁(yè) （ 3） 該對(duì)話框中選擇“ Provider”選項(xiàng)卡，從列表中選擇“ Microsoft OLE DB Provider for SQL Server”選項(xiàng) ，如圖所示： 第 27頁(yè) （ 4） 在“ Connection1 上單擊鼠標(biāo)右鍵，出現(xiàn)的快捷菜單中選擇”添加命令“選項(xiàng)，出現(xiàn)“ Connection1屬性”對(duì)話框，按下圖所示的內(nèi)容進(jìn)行設(shè)置 : 這樣就建好了 DataEnvionment1，其結(jié)果如圖所示： 第 28頁(yè) DataReport1 報(bào)表 : 在建立數(shù)據(jù)環(huán)境后，選擇“工程”菜單中的“添加 Data Report”選項(xiàng)，啟動(dòng) VB報(bào)表設(shè)計(jì)器，設(shè)計(jì) DataReport1報(bào)表如圖所示： 7 第 29頁(yè) 將 DataReport1 報(bào)表的 DataSource 屬性設(shè)置為“ DataEnvionment1”， DataMember 屬性設(shè)置為“ Command1”。 能正確驗(yàn)證用戶的身份及密碼一致才可決定是否增刪用戶。 他無(wú)論在理論上還是在實(shí)踐中，都 給予 我很大的幫7 第 32頁(yè) 助，使我得到不少的提高 和認(rèn)識(shí) .這對(duì)于我以后的工作和學(xué)習(xí)都 是 一種 極 大的幫助， 我在此真誠(chéng)地 感謝他耐心的輔導(dǎo) 和幫助 ! 最后要感謝在這四年的學(xué)習(xí)和生活中我們所遇到的每一位可 敬的老師們，感謝你們的無(wú)私奉獻(xiàn)！感謝你們的悉心教導(dǎo)！感謝你們的點(diǎn)點(diǎn)滴滴！ 第 六 章 主要參考文獻(xiàn) Visual Basic 程序設(shè)計(jì) 作者： 譚浩強(qiáng) 薛淑斌 袁 玫 編著 出版社： 清華大學(xué) 出版社 Visual Basic 數(shù)據(jù)庫(kù)系統(tǒng)設(shè)計(jì)與開發(fā) 作者： 李春葆 張植民 編著 出版社 :清華大學(xué) 出版社 Visual Basic 課程設(shè)計(jì)與系統(tǒng)開發(fā)案例 作者： 伍俊良 主編 出版社 :清華大學(xué)出版社 Visual Basic 程序設(shè)計(jì) 作者： 杭國(guó)英 主編 出版社 :機(jī)械工業(yè)出版社 Access 2020 項(xiàng)目案例導(dǎo)航 作者： 鄭小玲 王學(xué)軍 編著 出版社： 科學(xué) 出版社 出版日期 :2020年 7月 第 七 章 附 錄 7 第 33頁(yè) 用戶登錄主界面及代碼： Option Explicit Private Sub Commcancel_Click() 數(shù)據(jù)庫(kù) 登錄信息 戶籍管理 查詢修改 報(bào)表統(tǒng)計(jì) 登錄處理 合法用戶 信息反饋 主界面信息 7 第 34頁(yè) End End Sub Private Sub Commok_Click() 39。激活主窗口系統(tǒng)菜單 Else = False End If 39。 local_db, n If Not ( And ) Then userid = Unload frmdl 39。 在他的幫助下 使得系統(tǒng)能及時(shí)開發(fā)完成， 非常 感謝 他 耐心的輔導(dǎo)。同時(shí)，調(diào)試也是費(fèi)時(shí)、費(fèi)力的創(chuàng)造性工作。退出 Beep = False GetStatus 39。上用到了三個(gè)變量 conn,Dbpath,rs。 最后一步就是要選擇一個(gè)要保存數(shù)據(jù)庫(kù)文件的名字和位置。最近，由于數(shù)據(jù)庫(kù)的普及，數(shù)據(jù)庫(kù)技術(shù)已經(jīng)被應(yīng)用到了新的領(lǐng)域，諸如用于 Inter的數(shù)據(jù)庫(kù)或用于公司內(nèi)聯(lián)網(wǎng)的數(shù)據(jù)庫(kù)。 圖 34 系統(tǒng)功能模塊圖 、 設(shè)計(jì)技巧 : 本系統(tǒng)設(shè)計(jì)中的一些技巧如下： (1) 公共模塊的設(shè)計(jì) (2) Access數(shù)據(jù)