戶籍管理系統(tǒng)論文-VB編程畢業(yè)設(shè)計

1、1 戶 籍 管 理 系 統(tǒng) 目錄The System of Managing Census Register1Key Word Visual Basic 6.0、Access20XX、ActiveX、Form、Field1Private Sub del_Click() 刪除用戶24Private Sub exit_Click() 退出25Private Sub mfy_Click() 修改用戶26戶籍管理系統(tǒng)【摘 要】 戶籍管理系統(tǒng)是典型的信息管理系統(tǒng)(MIS),其開發(fā)主要包括后臺數(shù)據(jù)庫的建立和維護(hù)以及前端應(yīng)用程序的開發(fā)兩個方面。對于前者要求建立起數(shù)據(jù)一致性和完整性強(qiáng)、數(shù)據(jù)安全性好的庫。而對于

2、后者則要求應(yīng)用程序功能完備,易使用等特點。經(jīng)過分析,我們使用 MICROSOFT公司的 VISUAL BASIC開發(fā)工具,利用其提供的各種面向?qū)ο蟮拈_發(fā)工具,尤其是數(shù)據(jù)窗口這一能方便而簡潔操縱數(shù)據(jù)庫的智能化對象,首先在短時間內(nèi)建立系統(tǒng)應(yīng)用原型,然后,對初始原型系統(tǒng)進(jìn)行需求迭代,不斷修正和改進(jìn),直到形成用戶滿意的可行系統(tǒng)。 【關(guān)鍵詞】 Visual Basic 6.0 Access20XX 控件 窗體 域The System of Managing Census RegisterAbstract The system of managing census register file is a t

3、ypical application of managing information system (know as MIS),which mainly includes building up data-base of back-end and developing the application interface of front-end. The former required consistency and integrality and security of data. The later should make the application powerful and easi

4、ly used.By looking up lots of datum, we selected Visual Basic presented by Microsoft because of its objective tools in Win32. VB offered a series of ActiveX operating a data-base. It can give you a short-cut to build up a prototype of system application. The prototype could be modified and developed

5、 till users are satisfied with it.Key Word Visual Basic 6.0、Access20XX、ActiveX、Form、Field45 第四章 系 統(tǒng) 實 現(xiàn) 目 錄引 言 第頁第一章 概 述 第頁1.1 開發(fā)工具 第頁1.1.1 Visual Basic 6.0簡介 第頁1.1.2關(guān)系型數(shù)據(jù)庫的實現(xiàn) 第頁1.1.3二者的結(jié)合(DBA) 第頁第二章 系統(tǒng)的分析與設(shè)計 第頁2.1 可行性研究 第頁2.1.1 系統(tǒng)開發(fā)的可行性 第頁2.1.2 系統(tǒng)開發(fā)的必要性 第頁2.2 系統(tǒng)的具體設(shè)計 第頁2.2.1系統(tǒng)功能 第頁2.2.2設(shè)計技巧 第頁2.2.3

6、數(shù)據(jù)庫設(shè)計 第頁第三章 系統(tǒng)的具體實現(xiàn) 第頁3.1 Windows下的Visual Basic 編程環(huán)境簡介 第頁3.2系統(tǒng)模塊的具體實現(xiàn) 第頁3.2.1、Frmdl窗體 第頁3.2.2 mainfrm窗體 第頁3.2.3 datareport報表設(shè)計 第頁datareport1報表 第頁 datareport2報表 第頁第四章 第頁結(jié) 束 語 第頁致 謝 第頁參考文獻(xiàn) 第頁附 錄 第頁引 言戶籍管理系統(tǒng)是公安部門不可缺少的一部分,它的內(nèi)容對于公安部門的決策者和管理者來說都至關(guān)重要,所以戶籍管理系統(tǒng)應(yīng)該能夠為用戶提供充足的信息和快捷的查詢手段。但一直以來人們使用傳統(tǒng)

7、人工的方式管理戶籍檔案,這種管理方式存在著許多缺點,如:效率低、保密性差,另外時間一長,將產(chǎn)生大量的文件和數(shù)據(jù),這對于查找、更新和維護(hù)都帶來了不少的困難。隨著科學(xué)技術(shù)的不斷提高,計算機(jī)科學(xué)的日漸成熟,其強(qiáng)大的功能已被人們深刻地認(rèn)識和使用,它已進(jìn)入人類社會的各個領(lǐng)域并發(fā)揮著越來越重要的作用。由此,建立高性能的戶籍管理系統(tǒng),作為計算機(jī)應(yīng)用的一部分,使用計算機(jī)對戶籍檔案進(jìn)行管理,具有著手工管理所無法比擬的優(yōu)點.例如:檢索迅速、查找方便、可靠性高、存儲量大、保密性好、壽命長、成本低等。這些優(yōu)點能夠極大地提高戶籍檔案管理的效率,也是公安部門的科學(xué)化、正規(guī)化管理的體現(xiàn)。因此,開發(fā)這樣一套管理軟件成為很有必

8、要的事情, 我經(jīng)過一個月的時間,參考各種資料和進(jìn)行數(shù)據(jù)庫編程實踐,在指導(dǎo)老師的幫助下,已經(jīng)基本上成功地實現(xiàn)了設(shè)計要求。使我設(shè)計的數(shù)據(jù)庫系統(tǒng)能夠?qū)崿F(xiàn)戶籍管理功能。該系統(tǒng)基本上滿足了用戶在戶籍檔案管理方面的需求,用戶界面友好。此系統(tǒng)更加貼近信息電子化處理,從而降低了人工勞動并增加了信息的準(zhǔn)確性。所以急需開發(fā)一小型C/S系統(tǒng),目的是為了提高工作效率及管理水平。在下面的各章中我將以開發(fā)一套戶籍管理系統(tǒng)為例,談?wù)勂溟_發(fā)過程和所涉及到的問題及解決方法。由于作者水平有限,論文中難免存在錯誤和不足之處,懇請各位導(dǎo)師在百忙之中,予以批評指導(dǎo),在此向各位導(dǎo)師表示誠摯的謝意！第一章 概 述1.1、課題介紹計算機(jī)的發(fā)

9、明與發(fā)展給人類社會帶來的巨大影響是有目共睹的,這種影響還繼續(xù)深入,并將在未來的相當(dāng)長的時間里持續(xù)存在,毫無疑問,計算機(jī)技術(shù)勢必將深入到我們社會的方方面面。21世紀(jì)是知識經(jīng)濟(jì)時代,計算機(jī)網(wǎng)絡(luò)作為這一時代重要的生產(chǎn)工具,給各個國家?guī)砹司薮蟮陌l(fā)展機(jī)遇。為了在以用戶為中心的市場競爭中獲勝,各單位必須對不斷變化的市場做出快速反應(yīng),要把單位各關(guān)鍵應(yīng)用結(jié)合成一體,形成一個堅強(qiáng)的信息共享共同體。國內(nèi)一些中小型企業(yè)為了提高自身的工作效率,以適應(yīng)市場的需要,都實現(xiàn)了辦公自動化(OA)。戶籍管理是全國各公安部門管理工作的基礎(chǔ),做好這項工作才能進(jìn)一步管理好整個社會的治安。以前各部門一直采用手工管理方式,但隨著信息時

10、代的到來,隨著人口不斷的移動,遷入、遷出等給管理帶來了不便,不能及時的查詢、登記所需的信息,各種數(shù)據(jù)得不到充分的利用。為了更好的維護(hù)社會治安,必須加強(qiáng)管理,積極采用先進(jìn)的科學(xué)技術(shù)和管理方法來提高工作效率。實現(xiàn)戶籍管理的計算機(jī)化,可以簡化繁瑣的工作模式,提高戶籍管理的工作效率.利用計算機(jī)中最為友好、最為方便的windows界面進(jìn)入系統(tǒng),使用鼠標(biāo)、鍵盤輕松的完成數(shù)據(jù)的錄入、瀏覽、查詢和統(tǒng)計的操作。本課題是由公安部戶籍管理部提出的,為其內(nèi)務(wù)部門使用,以提高他們的辦公效率。本系統(tǒng)軟件的運行環(huán)境是以計算機(jī)網(wǎng)絡(luò)為支持的硬件環(huán)境及以服務(wù)器端以windows 20XX Server 以上、數(shù)據(jù)庫服務(wù)器要求 A

11、ccess 20XX 、客戶端要求windows 98、20XX、XP。為了提高各公安部門更好的辦公效率,實現(xiàn)自身的由傳統(tǒng)辦公手工化轉(zhuǎn)向辦公自動化(OA),實現(xiàn)全國各公安部門內(nèi)部數(shù)據(jù)的共享,以提高數(shù)據(jù)管理水平和工作成效。戶籍管理系統(tǒng)的開發(fā)可以從根本上解決現(xiàn)行管理的落后之處,使主要通過紙記載的表等存貯方式對各類數(shù)據(jù)信息的存儲,手工查詢統(tǒng)計的管理手段向著科學(xué)的計算機(jī)管理轉(zhuǎn)變。每一個管理員利用該系統(tǒng)及時對戶口和人口方面的信息登錄、查詢、統(tǒng)計、修改等,大量減少了重復(fù)而復(fù)雜的人工勞動。它的建立有助于數(shù)據(jù)錄入、查詢、管理等各項工作的全面提高,以備存檔。從微觀角度上分析,該系統(tǒng)的建立,對規(guī)范、完善數(shù)據(jù)管理,

12、加強(qiáng)數(shù)據(jù)管理措施起到積極作用。因此,該系統(tǒng)的開發(fā)具有十分重要的意義.1.2、客戶/服務(wù)器體系客戶/服務(wù)器體系的框架由三部分組成:客戶機(jī)、服務(wù)器和中間件?？蛻魴C(jī)的主要功能是執(zhí)行用戶一方的應(yīng)用程序,提供面向?qū)ο蟮挠脩艚缑妗７?wù)器的功能主要是執(zhí)行共享資源的管理應(yīng)用程序。中間件是支持客戶/服務(wù)器進(jìn)行對話,實施分布式應(yīng)用的各種軟件。它主要承擔(dān)兩方面的功能:一是連接功能,二是管理功能?？蛻?服務(wù)器實現(xiàn)和使用的基本技術(shù)是采用基于圖形用戶界面的應(yīng)用開發(fā)工具,它支持用戶直接參與應(yīng)用軟件的開發(fā),只需少量編程,就可方便地把現(xiàn)有實用程序適當(dāng)組成用戶應(yīng)用處理所需的應(yīng)用軟件以及向客戶機(jī)上應(yīng)用處理轉(zhuǎn)移到服務(wù)器側(cè)去執(zhí)行的方向

13、發(fā)展。在客戶/服務(wù)器體系中,客戶端的用戶請求被傳送到數(shù)據(jù)庫服務(wù)器,數(shù)據(jù)庫服務(wù)器進(jìn)行處理后,只將結(jié)果返回給客戶,從而顯著減少了網(wǎng)絡(luò)上的數(shù)據(jù)傳輸量,提高了系統(tǒng)的性能、吞吐量和負(fù)載能力。客戶/服務(wù)器體系可分為集中的服務(wù)器體系和分布的服務(wù)器體系。前者在網(wǎng)絡(luò)中僅有一臺數(shù)據(jù)庫服務(wù)器,而客戶機(jī)是多臺。后者在網(wǎng)絡(luò)中有多臺數(shù)據(jù)庫服務(wù)器?？蛻?服務(wù)器體系可以應(yīng)用在多種平臺上,可以使用多種工具,從而提供靈活和高質(zhì)量的用戶應(yīng)用這就是客戶/服務(wù)器體系。第二章、開發(fā)環(huán)境2.1 開發(fā)工具選擇作為開發(fā)人員,開發(fā)工具的選擇非常重要。開發(fā)工具應(yīng)該能夠使多個開發(fā)人員同時對一個項目進(jìn)行開發(fā),它應(yīng)該平衡需求以確保一個開發(fā)人員對程序的修

14、改不會被另一個人員所重寫,同時又不會因為采用了一些不必要的控制使開發(fā)效率受到影響。另外一點是,工具最好能以庫的形式來管理對象,這樣才能為版本控制、對象重用提供有力的保證。目前,具有代表性的開發(fā)工具主要有Microsoft公司的Visual Basic,Microsoft公司的Visual C+,Inprise公司的Delphi,Oracle公司的Developer,Sybase公司的PowerBuilder,本次開發(fā)初步確認(rèn)采用Visual Basic開發(fā)工具。Visual Basic提供了大量的控件,這些控件可用于設(shè)計界面和實現(xiàn)各種功能,減少了編程人員的工作量,也簡化了界面設(shè)計過程,從而有效

15、的提高了應(yīng)用程序的運行效率和可靠性。 Access20XX在數(shù)據(jù)庫管理方面的杰出表現(xiàn),使Access20XX得到了非常廣泛的應(yīng)用,也是許多軟件開發(fā)商的首選工具,所以我在開發(fā)工具選擇方面,選擇了Access20XX作為后臺數(shù)據(jù)庫。2.2 開發(fā)工具介紹2.2.1 Visual Basic 6.0簡介:微軟公司的Visual Basic 6.0是Windows應(yīng)用程序開發(fā)工具,使目前最為廣泛的、易學(xué)易用的面向?qū)ο蟮拈_發(fā)工具。Visual basic是microsoft公司的第一個編程工具和系統(tǒng)開發(fā)的第一個產(chǎn)品,它具有其他數(shù)據(jù)庫開發(fā)工具無法比擬的優(yōu)勢,它以優(yōu)良的性能、極強(qiáng)的系統(tǒng)開發(fā)功能、完美的視覺界面

16、和簡單易學(xué)特點,贏得廣大軟件開發(fā)人員及計算機(jī)愛好者的青睞。經(jīng)過分析,使我們使用易于與數(shù)據(jù)庫連接的Microsoft Visual Basic 6.0開發(fā)工具,利用其提供的各種面向?qū)ο蟮拈_發(fā)工具,尤其是數(shù)據(jù)庫窗口這一功能強(qiáng)大而簡潔操縱數(shù)據(jù)庫的智能化對象,首先在短時間內(nèi)建立系統(tǒng)應(yīng)用原形,然后,對初始原型系統(tǒng)進(jìn)行需求分析,不斷修正和改進(jìn),直到形成用戶滿意的可行性系統(tǒng)。故而,實現(xiàn)本系統(tǒng)VB是一個相對較好的選擇。2.2.2 Access20XX 簡介:Access20XX 就是關(guān)系數(shù)據(jù)庫開發(fā)工具,數(shù)據(jù)庫能匯集各種信息以供查詢、存儲和檢索。Access 的優(yōu)點在于它能使用數(shù)據(jù)表示圖或自定義窗體收集信息。數(shù)

17、據(jù)表示圖提供了一種類似于 Excel 的電子表格,可以使數(shù)據(jù)庫一目了然。另外,Access 允許創(chuàng)建自定義報表用于打印或輸出數(shù)據(jù)庫中的信息。Access也提供了數(shù)據(jù)存儲庫,可以使用桌面數(shù)據(jù)庫文件把數(shù)據(jù)庫文件置于網(wǎng)絡(luò)文件服務(wù)器,與其他網(wǎng)絡(luò)用戶共享數(shù)據(jù)庫。Access 是一種關(guān)系數(shù)據(jù)庫工具,關(guān)系數(shù)據(jù)庫是已開發(fā)的最通用的數(shù)據(jù)庫之一。如上所述,Access 作為關(guān)系數(shù)據(jù)庫開發(fā)具備了許多優(yōu)點,可以在一個數(shù)據(jù)包中同時擁有桌面數(shù)據(jù)庫的便利和關(guān)系數(shù)據(jù)庫的強(qiáng)大功能。2.2.3 關(guān)系數(shù)據(jù)庫的連接:微軟的JET數(shù)據(jù)庫引擎提供了與數(shù)據(jù)庫打交道的途徑,我們是通過它以及Visual Basic 來訪問數(shù)據(jù)庫并對其進(jìn)行各種

18、操作。Visual Basic、Access以及其他微軟的軟件產(chǎn)品都是通過共用JET數(shù)據(jù)庫引擎,從而給用戶提供了豐富的數(shù)據(jù)類型。 DATA 控件在數(shù)據(jù)庫中的信息與將信息顯示給用戶看的Visual Basic程序之間架起了一座橋梁。我們可以設(shè)置DATA控件的各個屬性,告訴它要調(diào)用那個數(shù)據(jù)庫的哪個部分。缺省情況下,DATA控件根據(jù)數(shù)據(jù)庫中的一個或多個數(shù)據(jù)表建立一個dynaset-type(動態(tài)集合)類型的記錄集合。一個記錄集合是動態(tài)的也就意味著,當(dāng)原來的數(shù)據(jù)表中的內(nèi)容改變了以后,該記錄集合中的記錄也會隨之改變。DATA控件還提供了用來瀏覽不同記錄的各種跳轉(zhuǎn)按鈕。將DATA控件放置在窗體中之后,我們

19、還必須在該控件與要處理的數(shù)據(jù)庫之間建立聯(lián)系。 ADO Data控件(簡稱ADO)是VB6.0中文版提供的一個ActiveX控件,與VB固有的Data控件相似,使用ADO Data控件,可以利用利用Microsoft ActiveX Data Objects(ADO)快速建立數(shù)據(jù)綁定的控件和數(shù)據(jù)提供者之間的連接。ADO Data控件可以實現(xiàn)的功能是:連接本地數(shù)據(jù)庫或遠(yuǎn)程數(shù)據(jù)庫；打開指定的數(shù)據(jù)庫表,將數(shù)據(jù)字段的數(shù)值傳遞給數(shù)據(jù)綁定的控件,可以在這些控件中顯示或更改這些數(shù)值;添加新記錄,或根據(jù)更改顯示在綁定的控件中的數(shù)據(jù)來更新數(shù)據(jù)庫.第三章、需求分析3.1、需求分析需求分析是軟件定義時期的最重要一個階

20、段,它的基本任務(wù)是準(zhǔn)確地回答“系統(tǒng)必須做什么”這個問題,是對目標(biāo)系統(tǒng)提出完整、準(zhǔn)確、清晰、具體的要求。需求分析的結(jié)果是系統(tǒng)開發(fā)的基礎(chǔ),關(guān)系到工程的成敗和軟件產(chǎn)品的質(zhì)量。因此,必須用行之有效的方法對軟件需求進(jìn)行嚴(yán)格的審查驗證。需求分析一般是按圖3-1所示的過程進(jìn)行:圖3-1 需求分析圖面對一個復(fù)雜的系統(tǒng)時,一個比較好的方法是分層次地描繪這個系統(tǒng)。首先用一張高層次的系統(tǒng)流程圖描繪系統(tǒng)的總體概貌,表明系統(tǒng)的關(guān)鍵功能。然后分別把每個關(guān)鍵功能擴(kuò)展到適當(dāng)?shù)脑敿?xì)程度,畫在單獨的一頁紙上。這種分層次的描繪方法便于閱讀者按從抽象到具體的過程逐步深入地了解一個復(fù)雜的系統(tǒng)。大體上了解了系統(tǒng)數(shù)據(jù)的流向和各部分相互之間

21、的關(guān)系,經(jīng)過需求分析的了解和掌握,根據(jù)要求和數(shù)據(jù)流向,數(shù)據(jù)的流向大致如下圖: 輸入用戶名及密碼出錯信息密碼錯系統(tǒng)功能主界面正確功能處理系統(tǒng)登錄界面登錄處理數(shù)據(jù)庫 圖3-2 系統(tǒng)流程圖系統(tǒng)登錄處功能界面數(shù)據(jù)編輯數(shù)據(jù)查詢數(shù)據(jù)導(dǎo)入數(shù)據(jù)導(dǎo)出系統(tǒng)管理人口/戶口表明細(xì)添加修改刪除查詢退出分類查詢導(dǎo) 入導(dǎo) 出導(dǎo)出報表增加用戶刪除用戶修改密碼數(shù)據(jù)庫Access 圖3-3 系統(tǒng)功能流程圖3.2、可行性研究3.2.1、系統(tǒng)開發(fā)的可行性:在開發(fā)任何一個新系統(tǒng)之前是無法知道該項目能否以現(xiàn)有的技術(shù)進(jìn)行開發(fā),也無法知道該項目是否有開發(fā)的價值,無法估計系統(tǒng)的成本效益比,所以要對系統(tǒng)開發(fā)的可行性進(jìn)行分析, 可行性研究實際上是

22、一次大大壓縮和簡化的系統(tǒng)分析和設(shè)計的過程,其主要目的是探索該項目是否值得去解決,是否有可行的解決方法。不過這個階段的任務(wù)是研究問題的范圍,估計系統(tǒng)的成本和效益,而不是具體的解決問題。3.2.2、系統(tǒng)開發(fā)的必要性:時代的發(fā)展,社會的進(jìn)步,落后的管理手段不再滿足人們的需要。因此,用現(xiàn)代化手段進(jìn)行管理已成為一種趨勢。隨著網(wǎng)絡(luò)技術(shù)和數(shù)據(jù)庫技術(shù)的發(fā)展,現(xiàn)在越來越多的部門建立了以計算機(jī)網(wǎng)絡(luò)為中心的數(shù)據(jù)庫管理系統(tǒng),以實現(xiàn)內(nèi)部各部門通過計算機(jī)網(wǎng)絡(luò)進(jìn)行信息交流與共享,為適應(yīng)市場經(jīng)濟(jì)的發(fā)展提供了必要的基礎(chǔ),同時也促進(jìn)了網(wǎng)絡(luò)技術(shù)、數(shù)據(jù)庫技術(shù)的飛速發(fā)展?，F(xiàn)在的數(shù)據(jù)庫開發(fā)工具操作越來越簡單、方便,界面越來越美觀、友好,

23、使程序員的工作量大大減少,另外軟件技術(shù)的發(fā)展,也為管理軟件的開發(fā)提供了技術(shù)保證,從技術(shù)和管理兩方面來看,開發(fā)這個系統(tǒng)是必要的.由于以前數(shù)據(jù)記錄只是記錄在紙上,各種數(shù)據(jù)的統(tǒng)計都是通過手工管理,這樣即費時、費力又容易出現(xiàn)錯誤,而利用計算機(jī)輔助管理可以發(fā)揮計算機(jī)自身處理速度快、準(zhǔn)確和信息共享的優(yōu)勢,來解決手工管理的弊端,并且動態(tài)生成表單,大大減低工作人員的工作量,提高工作效率,實現(xiàn)了數(shù)據(jù)的自動更新,方便的查詢功能,使戶籍管理更合理更方便。3.3、系統(tǒng)的基本功能經(jīng)過分析,最后得出新的戶籍管理系統(tǒng)應(yīng)具有以下功能模塊:戶籍管理:可以隨意地添加戶口、人口, 遷入或遷出需要改動的戶口和人口.查詢修改:實現(xiàn)對戶

24、口、人口相關(guān)信息的查詢及修改.報表統(tǒng)計:對戶口、人口報表進(jìn)行統(tǒng)計,瀏覽所有信息.系統(tǒng)管理:對登錄用戶進(jìn)行設(shè)置和管理,可以添加、修改用戶列表.從下圖中可以看出系統(tǒng)(最小化)至少包括如下一級子模塊:戶籍管理、系統(tǒng)管理、查詢修改、報表統(tǒng)計。1、戶籍管理模塊的功能:對戶口表、人口表等作為構(gòu)成戶籍檔案管理最基本項的表進(jìn)行增加、查詢、修改、刪除等操作。2、系統(tǒng)管理模塊的功能:這個模塊從本質(zhì)上來講,當(dāng)然應(yīng)該只有管理員才有權(quán)使用,這個模塊能夠?qū)崿F(xiàn)新用戶的增加、已有用戶的查找、已有用戶的刪除、已有用戶的密碼修改、注銷不再使用的用戶等功能。3、查詢修改模塊的功能:這個模塊是本系統(tǒng)中相對來講最大也是最麻煩的,它包含

25、三個方面的功能實現(xiàn):即查詢、修改戶口和人口信息內(nèi)容。系統(tǒng)能按戶口號、身份證號碼、Adress等進(jìn)行精確或模糊查詢,并把查詢的結(jié)果顯示在表格中. 4、報表統(tǒng)計模塊的功能:本模塊是為了用戶能方便地瀏覽已有信息的全部內(nèi)容,即對修改、查詢添加新內(nèi)容起到參考的作用。戶籍管理系統(tǒng)戶籍管理查詢修改報表統(tǒng)計系統(tǒng)管理添加或遷入戶口遷出戶口添加或遷入人口遷出人口刪除用戶修改密碼人口報表添加用戶用戶列表查詢戶號戶口報表查詢修改人口信息列表查詢查詢住址查詢修改戶口信息全部戶口列表全部人口列表已遷出戶口列表 圖3-4 系統(tǒng)功能模塊圖3.2.2、設(shè)計技巧:本系統(tǒng)設(shè)計中的一些技巧如下:(1) 公共模塊的設(shè)計(2) Acce

26、ss數(shù)據(jù)庫設(shè)計方法(3) VB菜單設(shè)計方法(對于“普通用戶”,有若干菜單項不可選)。(4) 統(tǒng)一的數(shù)據(jù)編輯設(shè)計方法 以戶口表為例進(jìn)行說明,為了編輯其記錄,設(shè)計了mainfrm窗體,在其中的DataGrid中顯示所有已輸入的戶籍檔案記錄。用戶可以先通過“設(shè)置條件”框找到相應(yīng)的戶籍檔案記錄,然后單擊“添加”或“刪除”按鈕對戶籍檔案記錄進(jìn)行添加或刪除,而后單擊“保存”按鈕保存戶籍檔案記錄。(5) 事件編程技術(shù) 窗體上有兩個事件過程Load和Activate:它們的執(zhí)行過程是,在啟動該窗體時先執(zhí)行Load(僅執(zhí)行一次)事件過程,然后執(zhí)行Activate事件過程,在該窗體中每次調(diào)用其他窗體或預(yù)覽報表,執(zhí)

27、行完畢返回時執(zhí)行Activate事件過程。例如,當(dāng)前表中沒有有效記錄時,執(zhí)行保存和刪除功能的按鈕不可選。正確的設(shè)計這兩個事件過程是VB事件編程的關(guān)鍵,本論文中大量采用上述方法進(jìn)行窗體設(shè)計。3.2.3、數(shù)據(jù)庫設(shè)計:(1)數(shù)據(jù)庫的概念數(shù)據(jù)庫處理在信息系統(tǒng)的研究中一直是非常重要的主題,然而,近年來,隨著World Wide Web(WWW)的猛增及Internet技術(shù)的迅速發(fā)展,使得數(shù)據(jù)庫技術(shù)之時成為最熱門技術(shù)之一。數(shù)據(jù)庫技術(shù)能使Internet應(yīng)用超越具有早期應(yīng)用特點的簡單的發(fā)布。同時,Internet技術(shù)提供了一種向用戶發(fā)布數(shù)據(jù)庫內(nèi)容的標(biāo)準(zhǔn)化的訪問方法。這些技術(shù)沒有脫離經(jīng)典數(shù)據(jù)庫技術(shù)的要求。它們

28、只是加重了數(shù)據(jù)庫技術(shù)的重要性。數(shù)據(jù)庫的設(shè)計和開發(fā)及包括藝術(shù)有包括工程。理解用戶的需求,然后,把它們轉(zhuǎn)變?yōu)橛行У臄?shù)據(jù)庫設(shè)計是一個藝術(shù)過程。把設(shè)計轉(zhuǎn)變?yōu)閷嶋H的數(shù)據(jù)庫,并且這些數(shù)據(jù)庫帶有功能完備、高效能的應(yīng)用,是一個工程過程。數(shù)據(jù)庫的目的是幫助人們跟蹤事務(wù)。經(jīng)典的數(shù)據(jù)庫應(yīng)用涉及諸如訂單、顧客、工作、員工、學(xué)生、TEL之類的項,或其它數(shù)據(jù)量較大、需要密切關(guān)注的事務(wù)。最近,由于數(shù)據(jù)庫的普及,數(shù)據(jù)庫技術(shù)已經(jīng)被應(yīng)用到了新的領(lǐng)域,諸如用于Internet的數(shù)據(jù)庫或用于公司內(nèi)聯(lián)網(wǎng)的數(shù)據(jù)庫。數(shù)據(jù)庫也被越來越多地應(yīng)用于生成和維護(hù)多媒體應(yīng)用程序上。計算機(jī)的數(shù)據(jù)處理應(yīng)用,首先要把大量的信息以數(shù)據(jù)形式存放在存儲器中。存儲

29、器的容量、存儲速率直接影響到數(shù)據(jù)管理技術(shù)的發(fā)展。從1956年生產(chǎn)出第一臺計算機(jī)到現(xiàn)在,存儲器的發(fā)展,為數(shù)據(jù)庫技術(shù)提供了良好的物質(zhì)基礎(chǔ)。使用計算機(jī)以后,數(shù)據(jù)處理的速度和規(guī)模,無論是相對于手工方式,還是機(jī)械方式,都有無可比擬的優(yōu)勢。通常在數(shù)據(jù)處理中,計算是比較簡單的而數(shù)據(jù)的管理卻比較復(fù)雜。數(shù)據(jù)管理是指數(shù)據(jù)的收集、整理、組織、存儲、維護(hù)、檢索、傳送等操作,這部分操作是數(shù)據(jù)處理業(yè)務(wù)的基本環(huán)節(jié),而且是任何數(shù)據(jù)處理業(yè)務(wù)中必不可少的共有部分。數(shù)據(jù)管理技術(shù)的優(yōu)劣,將直接影響數(shù)據(jù)處理的效率。數(shù)據(jù)庫在一個信息管理系統(tǒng)中占有非常重要的位置,數(shù)據(jù)庫結(jié)構(gòu)設(shè)計的好壞將直接對應(yīng)用系統(tǒng)的效果產(chǎn)生影響。合理的數(shù)據(jù)庫設(shè)計可以提高

30、數(shù)據(jù)庫存儲效率,保證數(shù)據(jù)的完整和一致。同時合理的數(shù)據(jù)結(jié)構(gòu)也將有利于程序的實現(xiàn)。設(shè)計數(shù)據(jù)庫系統(tǒng)時,應(yīng)該首先了解用戶的各個方面的需求,包括現(xiàn)有的以及將來可能增加的。(2)創(chuàng)建數(shù)據(jù)庫文件如果操作系統(tǒng)中安裝了ACCESS20XX的話,可以在開始菜單的程序菜單中可以找到。如下所示:打開ACCESS20XX之后,會開啟一個窗口,可選擇是打開以前的數(shù)據(jù)庫文件還是新建一個新的空數(shù)據(jù)庫文件,如果選擇空ACCESS數(shù)據(jù)庫,然后點擊確定按鈕。這些就新建了一個數(shù)據(jù)庫文件。最后一步就是要選擇一個要保存數(shù)據(jù)庫文件的名字和位置。點擊創(chuàng)建就完成。(3) 怎樣創(chuàng)建一個數(shù)據(jù)表 上面已經(jīng)講了如何創(chuàng)建一個數(shù)據(jù)庫文件,按照上面的步驟建

31、立一個數(shù)據(jù)庫文件后,需要在數(shù)據(jù)庫文件中建立一個數(shù)據(jù)表。在下面的對話框中選”使用設(shè)計器創(chuàng)建表”,上面還有三個按鈕,一個是打開,一個是設(shè)計,一個是新建,點擊設(shè)計,就可以開始設(shè)計數(shù)據(jù)表了。 出現(xiàn)設(shè)計的界面后,就可以開始設(shè)計數(shù)據(jù)表了！(4) VB連接ACCESS20XX數(shù)據(jù)庫用vb編寫一個管理軟件,如果不能連接數(shù)據(jù)庫,那也沒有什么用處。先看看VB是如何與ACCESS20XX數(shù)據(jù)庫相連接的。Sub ConnStr()連接數(shù)據(jù)庫Set conn = CreateObject(ADODB.Connection) 建立數(shù)據(jù)庫連接對像DBpath = App.Path & & data.mdb 設(shè)置數(shù)據(jù)的路徑c

32、onn.Open Provider=Microsoft.Jet.OLEDB.4.0;Data Source= & DBpath 打開數(shù)據(jù)庫連接Set rs = CreateObject(ADODB.Recordset) 設(shè)置數(shù)據(jù)庫對像End Sub上面的一段代碼就是連接數(shù)據(jù)庫的。上用到了三個變量conn,Dbpath,rs。其中有兩個變量要定義為公用的變量,因為這段代碼是放在一個模塊中的,為了在每一個窗體中能夠使用這個變量,所以必須要聲明為公用變量。聲明公用變量的方法如下:Public connPublic rs上面就是聲明為公用變量,上面的聲明一定要放在模塊的最上面。如果聲明在下面,那就成了

33、局部變量,那么作用范圍就會不同了,作用就更不同,而且在其它窗體中使用到了這個變量,程序會出錯。在系統(tǒng)中設(shè)計一個數(shù)據(jù)庫db.mdb,其中包含如下數(shù)據(jù)表:1、 人口表: 2、戶口表:3、用戶表:第四章 系統(tǒng)的具體設(shè)計4.1、Windows下的Visual Basic 編程環(huán)境簡介 Visual Basic應(yīng)用程序基本的構(gòu)建塊是用戶所創(chuàng)建的對象,每一個對象都具有一些特性和行為(屬性、事件和方法)。開發(fā)人員可以最有效利用所創(chuàng)建的每一個對象。使用應(yīng)用程序具有可通用性、可擴(kuò)展性和強(qiáng)有力的功能。Visual Basic應(yīng)用由一系列對象組成,包括有函數(shù)、菜單、結(jié)構(gòu)和數(shù)據(jù)窗口、用戶對象、用戶事件等等,對象中又包

34、含若干控件如命令按鈕、單行編輯器等這些對象和控件都可在許多應(yīng)用中重復(fù)使用。本節(jié)介紹管理系統(tǒng)各組成部分的實現(xiàn)方法,對于窗體,給出執(zhí)行功能、設(shè)計界面、主要對象的屬性和方法。4.2、系統(tǒng)模塊的具體實現(xiàn)4.2.1、Frmdl窗體:Frmdl窗體用于接受用戶的用戶名/密碼輸入,判斷是否合法。如果是合法用戶,釋放該窗體并調(diào)出Frmver窗體；否則信息提示無此用戶。Frmdl窗體的設(shè)計界面如圖所示,窗體中的主要對象及其屬性如表所示: 對 象屬 性屬性取值Text1Caption“用戶名“Text2passwordchar“*“Command1Caption“確定”Command2Caption“取消”在該窗

35、體上設(shè)計如下事件過程: Option ExplicitPrivate Sub Commcancel_Click()EndEnd SubPrivate Sub Commok_Click()聲明變量Dim username As StringDim password As StringDim local_db As StringDim cnn As New ADODB.ConnectionDim rst As New ADODB.RecordsetIf Text1.Text = ThenMsgBox 請輸入用戶名, , 警告Text1.SetFocusElseIf Text2.Text = The

36、nMsgBox 請輸入密碼, , 警告Text2.SetFocusEnd IfEnd IfIf Text1.Text And Text2.Text ThenSet cnn = New ADODB.ConnectionSet rst = New ADODB.Recordsetcnn.Open Provider=Microsoft.Jet.OLEDB.4.0;Data Source= + App.Path & datadb.mdb + ;Persist Security Info=False; 連接數(shù)據(jù)庫username = Trim(Text1.Text)password = Text2.Tex

37、t檢查用戶名是否正確local_db = select 用戶名 from 用戶表 + _ where 用戶表.用戶名= + + _username + rst.Open local_db, cnnIf Not (rst.BOF And rst.EOF) Thenrst.Close檢查密碼是否正確local_db = select 密碼 from 用戶表 + _ where 用戶表.用戶名= + + _ username + and + _ 用戶表.密碼= + + password + rst.Open local_db, cnnIf Not (rst.BOF And rst.EOF) Then

38、userid = Text1.TextUnload frmdl判斷登陸用戶是否為adminIf username = admin Thenmainfrm.xitong.Enabled = True 激活主窗口系統(tǒng)菜單Elsemainfrm.xitong.Enabled = FalseEnd Iffrmver.Show 顯示版本窗口ElseMsgBox 您輸入的密碼不正確,請重新輸入！, , 警告Text2.Text = Text2.SetFocusEnd IfElseMsgBox 系統(tǒng)中無此用戶, , 警告Text1.Text = Text1.SetFocusEnd IfEnd IfEnd S

39、ubPrivate Sub Timer1_Timer()End SubPrivate Sub Form_Load()End Sub4.2.2、mainfrm窗體:mainfrm窗體是一個多文檔窗體,窗體中包含的主要對象及其屬性,在該窗體有一個菜單,該菜單的結(jié)構(gòu)如下:Private Sub adduser_Click() 增加用戶frmzj.Showguanli.Enabled = Falsechaxun.Enabled = False#Enabled = Falsexitong.Enabled = FalseCommand1.Enabled = FalseCommand2.Enab

40、led = FalseCommand3.Enabled = FalseGetStatus 添加用戶End SubPrivate Sub allh_Click()frmhlist.Showguanli.Enabled = Falsechaxun.Enabled = False#Enabled = Falsexitong.Enabled = FalseCommand1.Enabled = FalseCommand2.Enabled = FalseCommand3.Enabled = FalseGetStatus 戶口列表End SubPrivate Sub allp_Click()fr

41、mplist.Showguanli.Enabled = Falsechaxun.Enabled = False#Enabled = Falsexitong.Enabled = FalseCommand1.Enabled = FalseCommand2.Enabled = FalseCommand3.Enabled = FalseGetStatus 人口列表End SubPrivate Sub chaxun_Click()GetStatus 查詢修改信息End SubPrivate Sub chuhao_Click()frmchuhao.Showguanli.Enabled = Fa

42、lsechaxun.Enabled = False#Enabled = Falsexitong.Enabled = FalseCommand1.Enabled = FalseCommand2.Enabled = FalseCommand3.Enabled = FalseGetStatus 查詢戶號End SubPrivate Sub chuhome_Click()frmqch.Showguanli.Enabled = Falsechaxun.Enabled = False#Enabled = Falsexitong.Enabled = FalseCommand1.Ena

43、bled = FalseCommand2.Enabled = FalseCommand3.Enabled = FalseGetStatus 遷出戶口End SubPrivate Sub chupeople_Click()frmqcr.Showguanli.Enabled = Falsechaxun.Enabled = False#Enabled = Falsexitong.Enabled = FalseCommand1.Enabled = FalseCommand2.Enabled = FalseCommand3.Enabled = FalseGetStatus 遷出人口End S

44、ubPrivate Sub Command1_Click()frmhome.Showguanli.Enabled = Falsechaxun.Enabled = False#Enabled = Falsexitong.Enabled = FalseCommand1.Enabled = FalseCommand2.Enabled = FalseCommand3.Enabled = Falsefrmhome.Frame3.Enabled = Falsefrmhome.Label12.Enabled = Falsefrmhome.Label13.Enabled = Falsefrmhom

45、e.Label14.Enabled = Falsefrmhome.Text4.Enabled = Falsefrmhome.Text4.Text = GetStatus 添加、遷入戶口End SubPrivate Sub Command2_Click()frmxz1.Showguanli.Enabled = Falsechaxun.Enabled = False#Enabled = Falsexitong.Enabled = FalseCommand1.Enabled = FalseCommand2.Enabled = FalseCommand3.Enabled = FalseGe

46、tStatus 添加、遷入人口End SubPrivate Sub Command3_Click()frmczhuzhi.Showguanli.Enabled = Falsechaxun.Enabled = False#Enabled = Falsexitong.Enabled = FalseCommand1.Enabled = FalseCommand2.Enabled = FalseCommand3.Enabled = FalseGetStatus 查詢住址End SubPrivate Sub Command4_Click()frmxg.ShowEnd SubPrivate S

47、ub Command5_Click()exit1.ShowBeepmainfrm.Enabled = FalseGetStatus 退出系統(tǒng)End SubPrivate Sub czhuzhi_Click()frmczhuzhi.Showguanli.Enabled = Falsechaxun.Enabled = False#Enabled = Falsexitong.Enabled = FalseCommand1.Enabled = FalseCommand2.Enabled = FalseCommand3.Enabled = FalseGetStatus 查詢住址End Sub

48、Private Sub del_Click() 刪除用戶frmsc.Showguanli.Enabled = Falsechaxun.Enabled = False#Enabled = Falsexitong.Enabled = FalseCommand1.Enabled = FalseCommand2.Enabled = FalseCommand3.Enabled = FalseGetStatus 刪除用戶End SubPrivate Sub exit_Click() 退出exit1.ShowBeepmainfrm.Enabled = FalseGetStatus 退出系統(tǒng)End

49、 SubPrivate Sub guanli_Click()GetStatus 對戶籍進(jìn)行管理End SubPrivate Sub hbaobiao_Click()DataReport1.ShowGetStatus 戶口報表End SubPrivate Sub hxinxi_Click()frmcxh.Showguanli.Enabled = Falsechaxun.Enabled = False#Enabled = Falsexitong.Enabled = FalseCommand1.Enabled = FalseCommand2.Enabled = FalseCommand3

50、.Enabled = FalseGetStatus 查詢修改戶信息End SubPrivate Sub mfy_Click() 修改用戶frmxg.Showguanli.Enabled = Falsechaxun.Enabled = False#Enabled = Falsexitong.Enabled = FalseCommand1.Enabled = FalseCommand2.Enabled = FalseCommand3.Enabled = FalseGetStatus 修改密碼End SubPrivate Sub pbaobiao_Click()DataReport2.ShowGetStatus 人口報表End Sub4.2.3、DataReport報表設(shè)計:這里我們設(shè)計了兩個報表分別打印戶