【正文】 rm 窗體 : mainfrm 窗體 是一個多文檔窗體，窗體中包含的主要對象及其屬性 ,在該窗體有一個菜單，該菜單的結(jié)構(gòu)如下： Private Sub adduser_Click() 39。 local_db, n If Not ( And ) Then 39。聲 明 變 量 Dim username As String Dim password As String Dim local_db As String Dim n As New Dim rst As New If = Then 第 18頁 MsgBox 請輸入用戶名 , , 警告 Else If = Then MsgBox 請輸入密碼 , , 警告 End If End If If And Then Set n = New Set rst = New Provider=。 在系統(tǒng)中設(shè)計一個數(shù)據(jù)庫 ，其中包含如下數(shù)據(jù)表 : 人口表 : 第 15頁 戶口表 : 用戶表 : 第 16頁 第四章 系統(tǒng)的具體設(shè)計 、 Windows 下的 Visual Basic 編程環(huán)境簡介 Visual Basic 應(yīng)用程序基本的構(gòu)建塊是用戶所創(chuàng)建的對象，每一個對象都具有一些特性和行為（屬性、事件和方法）。Data Source= amp。 第 13頁 出現(xiàn)設(shè)計的界面后，就可以開始設(shè)計數(shù)據(jù)表了！ （ 4） VB連接 ACCESS2020數(shù)據(jù)庫 用 vb編寫一個管理軟件，如果不能連接數(shù)據(jù)庫，那也沒有什么用處。 設(shè)計數(shù)據(jù)庫系統(tǒng)時，應(yīng)該首先了解用戶 的各個方面的需求，包括現(xiàn)有的以及將來可能增加的。從 1956 年生產(chǎn)出第一臺計算機(jī)到現(xiàn)在，存儲器的發(fā)展，為數(shù)據(jù)庫技術(shù)提供了良好的物質(zhì)基礎(chǔ)。理解用戶的需求，然后，把它們轉(zhuǎn)變?yōu)橛行У臄?shù)據(jù)庫設(shè)計是一個藝術(shù)過程。例如，當(dāng)前表中沒有有效記錄時，執(zhí)行保存和刪除功能的按鈕不可選。 戶籍管理 模塊的功能：對 戶口 表、 人口 表等作為構(gòu)成 戶籍檔案管理 最基本項的表進(jìn)行增加、查詢、修改、刪除等操作。這種分層次的描繪方法便于閱讀者按從抽象到具體的過程逐步深入地了解一個復(fù)雜的系統(tǒng)。 ADO Data控件（簡稱 ADO）是 ActiveX控件，與 VB固有的 Data控件相似，使用 ADO Data控件，可以利用利用 Microsoft ActiveX Data Objects(ADO)快速建立數(shù)據(jù)綁定的控件和數(shù)據(jù)提供者之間的連接。 關(guān)系數(shù)據(jù)庫的連接 : 微軟的 JET數(shù)據(jù)庫引擎提供了與數(shù)據(jù)庫打交道的途徑，我們是通過它以及 Visual Basic 來訪問數(shù)據(jù)庫并對其進(jìn)行各種操作。 故而，實現(xiàn)本系統(tǒng)VB是一個相對較好的選擇 。開發(fā)工具應(yīng)該能夠使多個開發(fā)人員同時對一個項目進(jìn)行開發(fā)，它應(yīng)該平衡需求以確保一個開發(fā)人員對程序的修 改不會被另一個人員所重寫，同時又不會因為采用了一些不必要的控制使開發(fā)效率受到影響。它主要承擔(dān)兩方面的功能：一是連接功能，二是管理功能。 戶籍管理系統(tǒng)的開發(fā)可以從根本上解決現(xiàn)行管理的落后之處 ,使主要通過紙記載的 表等存貯方式對各類數(shù)據(jù)信息的存儲，手工查詢統(tǒng)計的管理手段向著科學(xué)的計算機(jī)管理轉(zhuǎn)變。國內(nèi)一些中小型企業(yè)為了提高自身的工作效率，以適應(yīng)市場的需要，都實現(xiàn)了辦公自動化（ OA）。使我設(shè)計的數(shù)據(jù)庫系統(tǒng)能夠?qū)崿F(xiàn)戶籍管理功能。而對于后者則要求應(yīng)用程序功能完備 ,易使用等特點(diǎn)。但一直以來人們使用傳統(tǒng)人工的方式管理 戶籍檔案 ，這種管理方式存在著許多缺點(diǎn) ,如 :效率低、保密性差 ,另外時間一長 ,將產(chǎn)生大量的文件和數(shù)據(jù) ,這對于查找、更新和維護(hù)都帶來了不少的困難 。所以急需開發(fā)一小型 C/S系統(tǒng)，目的是為了提高工作效率及管理水平。為了更好的維護(hù)社會治安 ,必須加強(qiáng)管理，積極采用先進(jìn)的科學(xué)技術(shù)和管理方法來提高工作效率 。從微觀角度上分析，該系統(tǒng)的建立，對規(guī)范、完善數(shù)據(jù)管理，加強(qiáng)數(shù)據(jù)管理措施起到積極作用。 客戶 /服務(wù)器體系可分為集中的服務(wù)器體系和分布的服務(wù)器體系。 Visual Basic提供了大量的控件， 這些控件可用于設(shè)計界面和實現(xiàn)各種功能，減少了編程人員的工作量，也簡化了界面設(shè)計過程，從而有效的提高了應(yīng)用程序的運(yùn)行效率和可靠性。數(shù)據(jù)表示圖提供了一種類似于 Excel 的電子表格，可以使數(shù)據(jù)庫一目了然。我們可以設(shè)置 DATA控件的各個屬性，告訴它要調(diào)用那個數(shù)據(jù)庫的哪個部分。需求分析的結(jié)果是系統(tǒng)開發(fā)的基礎(chǔ)，關(guān)系到工程的成敗和軟件產(chǎn)品的質(zhì)量。 、系統(tǒng)開發(fā)的必要性 : 時代的發(fā)展，社會的進(jìn)步，落后的管理手段 不再滿足人們的需要。系統(tǒng)能按 戶口 號、 身份證號碼 、地址等進(jìn)行精確或模糊查詢，并把查詢的結(jié)果顯示在表格中 . 報表統(tǒng)計 模塊的功能：本模塊 是為了用戶能方便地瀏覽已有信息的全部內(nèi)容 ，即 對 第 9 頁 修改 、查詢添加新內(nèi)容起到參考的作用 。數(shù)據(jù)庫技術(shù)能使 Inter 應(yīng)用超越具有早期應(yīng)用特點(diǎn)的簡單的發(fā)布。經(jīng)典的數(shù)據(jù)庫應(yīng)用涉及諸如訂單、顧客、工作、 員工、學(xué)生、電話之類的項，或其它數(shù)據(jù)量較大、需要密切關(guān)注的事務(wù)。數(shù)據(jù)管理是指數(shù)據(jù)的收集、整理、組織、存儲、維護(hù)、檢索、傳送等操作，這部分操作是數(shù)據(jù)處理業(yè)務(wù)的基本環(huán)節(jié)，而且是任何數(shù)據(jù)處理業(yè)務(wù)中必不可少的共有部分。這些就新建了一個數(shù)據(jù)庫文件。連接數(shù)據(jù)庫 Set conn = CreateObject() 39。設(shè)置數(shù)據(jù)庫對像 End Sub 上面的一段代碼就是連接數(shù)據(jù)庫的。 Visual Basic 應(yīng)用由一系列對象組成，包括有函數(shù)、菜單、結(jié)構(gòu)和數(shù)據(jù)窗口、用戶對象、用戶事件等等，對象中又包含若干控件如命令按鈕、單行編輯器等這些對象和控件都可在許多應(yīng)用中重復(fù) 使用。Persist Security Info=False。and + _ 用戶表 .密碼 = + 39。刪除用戶 第 24頁 = False = False = False = False = False = False = False GetStatus 刪除用戶 End Sub Private Sub exit_Click() 39。黑盒測試又稱為功能測試。開發(fā)人員應(yīng)該清晰地認(rèn)識到，調(diào)試應(yīng)用程序不是為 了證明程序不存在錯誤，而是為了盡可能多地找到所存在的問題，沒有找到任何錯誤的調(diào)試是7 第 31頁 不成功的調(diào)試。在交付之前，還有一項重要的任務(wù)，就是把應(yīng)用程序編譯成可執(zhí)行文件，這樣用戶就可以不需要 Visual Basic 環(huán)境了。 張 老師認(rèn)真負(fù)責(zé)的工作態(tài)度，嚴(yán)謹(jǐn)?shù)闹螌W(xué)精神和深厚的理論水平 和實際操作能力 都使我收益匪淺。 39。 + password + 39。退出 Beep = False GetStatus 顯示版本窗口 Else MsgBox 您輸入的密碼不正確，請重新輸入！ , , 警告 = End If Else MsgBox 系統(tǒng)中無此用戶 , , 警告 = End If End If End Sub Private Sub Form_Load() End Sub Private Sub Timer1_Timer() End Sub 系統(tǒng)主界面及代碼： 7 第 36頁 Private Sub adduser_Click() 39。 local_db, n If Not ( And ) Then 39。聲明變量 Dim username As String Dim password As String Dim local_db As String Dim n As New Dim rst As New If = Then MsgBox 請輸入用戶名 , , 警告 Else If = Then MsgBox 請輸入密碼 , , 警告 End If End If If And Then Set n = New Set rst = New Provider=。 避免了由于人為方式固有的不嚴(yán)密性所帶來的各種工作中的疏漏，實現(xiàn)了管理的科學(xué)化和嚴(yán)謹(jǐn)化。 能正確驗證用戶身份，及新密碼和確認(rèn)密碼的匹配。在系統(tǒng)開發(fā)過程中，白盒測試與黑盒測試的概念分別應(yīng)用于系統(tǒng)的調(diào)試與測試的實踐中。 DataReport2 報表 : 打印人口信息，如圖所示： 將 DataReport2報表的 DataSource屬性設(shè)置為“ DataEnvionment1”， DataMember屬性設(shè)置為“ Command2”。激活主窗口系統(tǒng)菜單 Else = False End If 39。 + _ username + 39。 Frmdl 窗體的設(shè)計界面如圖所示，窗體中的主要對象及其屬性如表所示： 第 17頁 對 象 屬 性 屬性取值 Text1 Caption “ 用戶名“ Text2 passwordchar “ *“ Command1 Caption “確定” Command2 Caption “取消” 在該窗體上設(shè)計如下事件過程： Option Explicit Private Sub Commcancel_Click()