【導(dǎo)讀】數(shù)據(jù)庫的建立和維護(hù)以及前端應(yīng)用程序的開發(fā)兩個(gè)方面。要求建立起數(shù)據(jù)一致性和完整性強(qiáng)、數(shù)據(jù)安全性好的庫。者則要求應(yīng)用程序功能完備,易使用等特點(diǎn)。用戶滿意的可行系統(tǒng)。信息和快捷的查詢手段。但一直以來人們使用傳統(tǒng)人工的方式管理身份證，這種。和數(shù)據(jù),這對(duì)于查找、更新和維護(hù)都帶來了不少的困難。隨著科學(xué)技術(shù)的不斷提。人類社會(huì)的各個(gè)領(lǐng)域并發(fā)揮著越來越重要的作用。這些優(yōu)點(diǎn)能夠極大地提高身份證管理的效率,也是公安。部門的科學(xué)化、正規(guī)化管理的體現(xiàn)。的幫助下，已經(jīng)基本上成功地實(shí)現(xiàn)了設(shè)計(jì)要求。此系統(tǒng)更加貼近信息電子化處理，從而降低了人工勞動(dòng)并增加了信息的準(zhǔn)。所以急需開發(fā)一小型C/S系統(tǒng)，目的是為了提高工作效率及管理水平。面設(shè)計(jì)標(biāo)準(zhǔn)與規(guī)范?？梢栽诒境绦騼?nèi)將焦點(diǎn)移出子窗體。有必要為為對(duì)象約定一個(gè)規(guī)范的編碼命名約定。編碼應(yīng)清晰、可讀性好，運(yùn)用縮進(jìn)、空行，結(jié)合大小寫區(qū)別等方法保持程序結(jié)構(gòu)良好。

　　

【正文】 第 31頁 VB是一個(gè)相對(duì)較好的選擇。 10．關(guān)系型數(shù)據(jù)庫的實(shí)現(xiàn) Access2021 就是關(guān)系數(shù)據(jù)庫開發(fā)工具，數(shù)據(jù)庫能匯集各種信息以供查詢、存儲(chǔ)和檢索。 Access 的優(yōu)點(diǎn)在于它能使用數(shù)據(jù)表示圖或自定義窗體收集信息。數(shù)據(jù)表示圖提供了一種類似于 Excel 的電子表格，可以使數(shù)據(jù)庫一目了然。另外， Access 允許創(chuàng)建自定義報(bào)表用于打印或輸出數(shù)據(jù)庫中的信息。 Access也提供了數(shù)據(jù)存儲(chǔ)庫，可以使用桌面數(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)點(diǎn)，可以在一個(gè)數(shù)據(jù)包中同時(shí)擁有桌面數(shù)據(jù)庫的便利和關(guān)系數(shù)據(jù)庫的強(qiáng)大功能。 11．二者的結(jié)合（ DBA） 微軟的 JET數(shù)據(jù)庫引擎提供了與數(shù)據(jù)庫打交道的途徑，我們是通過它以及Visual Basic 來訪問數(shù)據(jù)庫并對(duì)其進(jìn)行各種操作。 Visual Basic、 Access以及其他微軟的軟件產(chǎn)品都是通過共用 JET數(shù)據(jù)庫引擎，從而給用戶提供了豐富的數(shù)據(jù)類型。 DATA 控件在數(shù)據(jù)庫中的信息與將信息顯示給用戶看的 Visual Basic程序之間架起了一座橋梁。我們可以設(shè)置 DATA控件的各個(gè)屬性，告訴它要調(diào)用那個(gè)數(shù)據(jù)庫的哪個(gè)部分。缺省情況下， DATA控件根據(jù)數(shù)據(jù)庫中的一個(gè)或多個(gè)數(shù)據(jù)表建立一個(gè) dynasettype（動(dòng)態(tài)集合）類型的記錄集合。一個(gè)記錄集合是動(dòng)態(tài)的也就意味著，當(dāng)原來的數(shù)據(jù)表中的容改變了以后，該記錄集合中的記錄也會(huì)隨之改變。 DATA控件還提供了用來瀏覽不同記錄的各種跳轉(zhuǎn)按鈕。將 DATA控件放置在窗體中之后，我們還必須在該控件與要處理的數(shù)據(jù)庫之間建立聯(lián)系。 Visual Basic 控件的功能 Windows下的 Visual Basic應(yīng)用程序基本的構(gòu)建塊是用戶所創(chuàng)建的對(duì)象，每一個(gè)對(duì)象都具有一些特性和行為（屬性、事件和 方法）。開發(fā)人員可以最有效利用所創(chuàng)建的每一個(gè)對(duì)象。使用應(yīng)用程序具有可通用性可說擴(kuò)展性和強(qiáng)有力的功能。 Visual Basic應(yīng)用由一系列對(duì)象組成，包括有函數(shù)、菜單、函數(shù)、結(jié)構(gòu)和數(shù)本科畢業(yè) (設(shè)計(jì) )論文： 第 32頁 據(jù)窗口、用戶對(duì)象、用戶事件等等，對(duì)象中又包含若干控件如命令按鈕、單行編輯器等這些對(duì)象和控件都可在許多應(yīng)用中重復(fù)使用。 1．實(shí)現(xiàn)菜單選項(xiàng) 菜單是程序最重要的特性之一，大多數(shù)程序都依賴一個(gè)定義良好的菜單使程序易于使 用和維護(hù)， Visual Basic也提供了強(qiáng)大的創(chuàng)建菜單功能是程序更加標(biāo)準(zhǔn)。 您可以使用 Visual Basic的 Application Wizard也可以使用 Visual Basic 的菜單編輯器建立菜單或者修改已經(jīng)存在的菜單。 2． 實(shí)現(xiàn)工具欄 CoolBar控件與 Office97種看到的 CoolBar是類似的。 CoolBar就是一個(gè)可以在窗體上浮動(dòng)的工具，同時(shí)也是其他 ActiveX的容器。通過在 CoolBar中遷入其他空間你局可以向用戶提供更好的靈活性和義用性。 Toolbar 是工具條控件，是實(shí)現(xiàn)工具 條的主體。其中的按鈕可以顯示圖像和標(biāo)題，并按功能分組或加入分隔符，還可以圍棋設(shè)置鼠標(biāo)停留在其上顯示的提示字符。 Toolbar也是一個(gè)控件容器且具有 Style屬性，并可以為其增加下拉按鈕和平滑按鈕等。 選擇 “工程 ”下拉菜單中的 “部件 ”選項(xiàng)，顯示 “部件 ”對(duì)話框。在 “控件 ”選項(xiàng)卡列表中選擇 “Microsoft Windows Common Controls ”后工具相中增加改控件。其屬性及對(duì)象如下： (1) Align屬性定義工具條在窗體中的位置。 (2) ToolTipText屬性是字符串類型，定義控件 的提示字符。 (3) Style屬性定義按鈕外觀。 (4) ImageList屬性定義與數(shù)據(jù)條對(duì)應(yīng)的 ImageList控件名，該控件定義工具條按鈕顯示的圖像。 (5) HotImangeList屬性設(shè)置一個(gè) ImageList控件名，該控件定義按鈕獲得熱點(diǎn)時(shí)顯示的圖像。 (6) DisabledImageList屬性定義工具條按鈕無效時(shí)顯示的圖像。 (7) 創(chuàng)建工具條包括 ImageList和 Toolbar控件 ImageList為其他控件提供圖像庫，將 ImageList控件加入到工具箱的操作于前述 Toolbar控件相同。 第四章 系 統(tǒng) 實(shí) 現(xiàn) 第 33頁 3． 幫助 專業(yè)水平的軟件通常都帶有聯(lián)機(jī)幫助功能。無論寫出來的程序是要給大量的用戶使用，還是僅僅局限于公司內(nèi)部有限的使用者，我們都應(yīng)該為用戶提供詳細(xì)的、易于理解的聯(lián)機(jī)幫助文檔。微軟的 Help 是一套獨(dú)立于 Visual Basic 的用來協(xié)助我們創(chuàng)建、運(yùn)行于 32位 Windows 操作系統(tǒng)下的幫助文件的工具。使用它我們可以為我們編寫的應(yīng)用程序生成一組幫助文件。 為了是程序顯得更具有專業(yè)風(fēng)格，首先可以在其中加入通常的應(yīng)用程序信息。這 些信息包括公司名稱、版本號(hào)、修訂號(hào)以及其他類似 信息。 Visual Basic允許你使用 APP 對(duì)象來保存這些信息， APP 對(duì)象是一個(gè)預(yù)定義對(duì)象，不需要在程序中創(chuàng)建它。 APP 對(duì)象的大多數(shù)屬性被應(yīng)用程序用來提供常規(guī)的信息，通過使用這些 APP 提供的屬性，可以在應(yīng)用程序和用戶之間交流重要信息，在項(xiàng)目屬性框中可以設(shè)置它的屬性 、 系統(tǒng)模塊的具體實(shí)現(xiàn) 、 Frmdl 窗體 : Frmdl 窗體用于接受用戶的用戶名 /密碼輸入，判斷是否合法。如果是合法用戶，釋放該窗體并調(diào)出 Frmver 窗體；否則信息提示無此用戶。 Frmdl 窗體的設(shè)計(jì)界面如圖所示，窗體中的主要對(duì)象及 其屬性如表所示： 本科畢業(yè) (設(shè)計(jì) )論文： 第 34頁 對(duì) 象 屬 性 屬性取值 Text1 Caption “ 用戶名“ Text2 passwordchar “ *“ Command1 Caption “確定” Command2 Caption “取消” 在該窗體上設(shè)計(jì)如下事件過程： Option Explicit Private Sub Commcancel_Click() End End Sub Private Sub Commok_Click() 39。聲 明 變 量 Dim username As String Dim password As String Dim local_db As String Dim n As New Dim rst As New 第四章 系 統(tǒng) 實(shí) 現(xiàn) 第 35頁 If = Then MsgBox 請(qǐng)輸入用戶名 , , 警告 Else If = Then MsgBox 請(qǐng)輸入密碼 , , 警告 End If End If If And Then Set n = New Set rst = New Provider=。Data Source= + amp。 \data\ + 。Persist Security Info=False。 39。連接數(shù)據(jù)庫 username = Trim() password = 39。檢查用戶名是否正確 local_db = select 用戶名 from 用戶表 + _ where 用戶表 .用戶名 = + 39。 + _ username + 39。 local_db, n If Not ( And ) Then 39。檢查密碼是否正確 local_db = select 密碼 from 用戶表 + _ where 用戶表 .用戶名 = + 39。 + _ username + 39。and + _ 用戶表 .密碼 = + 39。 + password + 39。 local_db, n 本科畢業(yè) (設(shè)計(jì) )論文： 第 36頁 If Not ( And ) Then userid = Unload frmdl 39。判斷登陸用戶是否為 admin If username = admin Then = True 39。激活主窗口系統(tǒng)菜單 Else = False End If 39。顯示版本窗口 Else MsgBox 您輸入的密碼不正確，請(qǐng)重新輸入！ , , 警告 = End If Else MsgBox 系統(tǒng)中無此用戶 , , 警告 = End If End If End Sub Private Sub Timer1_Timer() End Sub Private Sub Form_Load() End Sub 、 mainfrm 窗體 : mainfrm 窗體 是一個(gè)多文檔窗體，窗體中包含的主要對(duì)象及其屬性 ,在該窗 第四章 系 統(tǒng) 實(shí) 現(xiàn) 第 37頁 體有一個(gè)菜單，該菜單的結(jié)構(gòu)如下： = False = False = False = False GetStatus 添加、遷入人口 End Sub Private Sub Command3_Click() = False = False = False = False = False = False = False GetStatus 查詢住址 、 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ì)話框 : 本科畢業(yè) (設(shè)計(jì) )論文： 第 38頁 （ 3） 該對(duì)話框中選擇“ Provider”選項(xiàng)卡，從列表中選擇“ Microsoft OLE DB Provider for SQL Server”選項(xiàng) ，如圖所示： 第四章 系 統(tǒng) 實(shí) 現(xiàn) 第 39頁 （ 4） 在 “ Connection1 上單擊鼠標(biāo)右鍵，出現(xiàn)的快捷菜單中選擇”添加命令“選項(xiàng)，出現(xiàn)“ Connection1 屬性”對(duì)話框，按下圖所示的內(nèi)容進(jìn)行設(shè)置 : 這樣就建好了 DataEnvionment1，其結(jié)果如圖所示： 本科畢業(yè) (設(shè)計(jì) )論文： 第 40頁