【正文】 程序設計人員 ,適合普通應用系統(tǒng)的開發(fā)。 可視化編程的一個突出特點就是其開發(fā)環(huán)境就像一個百寶箱，很多功能都集成在其之中，這就是 IDE（ Integrated Development Environment），即集成開發(fā)環(huán)境。 從簡單的文本文件到各種復雜的關系型數據庫，數據庫應用程序需要面對各種各樣的數據源。 ADO 是基于 OLEDB之上的技術，因此 ADO通過其內部的屬性和方法提供統(tǒng)一的數據訪問接口方法。它與以前 Visual Basic 的DAO、 RDO 相比有了很大的提高。 RDO是 ODBC API的一個淺層界面接口，是專為訪問遠程 ODBC關系數據源而設計的。 OLE DB 是一種底層編程接口，用來訪問許多不同類型的數據源，其中包括消息、文件系統(tǒng)以及其他一些非傳統(tǒng)的數據源。對象模型使用 Connection對象使連接概念得以具體 。也可以使用 AddNew和 Update方法將值的數組作為參數傳遞，同時更新記錄的若干字段。使用 Field對象的 Value屬性可設置或返回當前記錄的數據 。 Open方法 (ADO Recordset)： 打開記錄集。 不但如此，在 ACCESS 2021 推出以后，我們發(fā)現數據庫的建立更加的快速，但是功能卻更加強大，用戶不用再去記憶那一大堆的文件名稱，或是為數據庫的文件管理大費周章，通過 ACCESS 的人性化管理接口把數據庫的管理整理，便于維護；此外，在報表的制作上也是相當容易的，完全的視覺開發(fā)向導 設計，讓人使用起來很舒服。 ? 窗體設計對象 可以設計用戶接口，用來輸入并處理數據。 第二節(jié) SQL 語言 SQL(Structured Query Language，結構查詢語言 )是一個功能強大的數據庫語言。使用 SQL的常見關系數據庫管理系統(tǒng)有： Oracle、 Sybase、 Microsoft SQL Server、 Access 等等。 SQL語言有著非常突出的優(yōu)點， SQL語言 是非過程化 的 語言 、 統(tǒng)一的語言 、 是所有關系數據庫的公共語言 。 統(tǒng)一的語言 ： SQL可用于所有用戶的 DB活動模型，包括系統(tǒng)管理員、數據庫管理員、 應用程序員、決策支持系統(tǒng)人員及許多其它類型的終端用戶。 SQL功能強大，是一種完備的數據處理語言，不僅用于數據庫查詢，而且用于數據庫中的數據修改和更新，概括起來，它可以分成以下幾組： DML（ Data Manipulation Language，數據操作語言）：用于檢索或者修改數據 ； DDL（ Data Definition Language，數據定義語言）： 用于定義數據的結構，比如 創(chuàng)建、修改或者刪除數據庫對象； DCL（ Data Control Language，數據控制語言）：用于定義數據庫用戶的權限。 下面是一個簡單 SQL語句的例子： 我們使用 SQL語句來從 user_info中檢索 ‘ 用戶 ID’ 為 ‘000001’ 的 用戶 姓名： SELECT 姓名 FROM user_info WHERE用戶 ID = ‘000001’ 數據定義語言 DDL：它是用來創(chuàng)建和修改數據庫結構的一種語句，包括 Create、 Alter和 Drop 語句。數據庫管理系統(tǒng)必須在更改期內保護所存儲的數據的一致性，確保有效的數據進入數據庫，數據庫必須保持一致性， DBMS 還必須協調多用戶的并行更新，以確保用戶和它們的更改不至于影響其它用戶的作業(yè)。多行 Insert 語句為拷貝數據提供了一種緊湊而高效的方法 。 標準語法： UPDATE table_name SET columnname1 = value1 [, columname2 = value2]... WHERE search_condition Delete 語句標準語法： DELETE FROM tablename WHERE condition 在信息管理系統(tǒng)中，我們往往會遇到歸類、匯總、映射、索引、子查詢等復雜操作，相應的支持與實現如下： GROUP BY 方法 ： GROUP BY子句語法為： SELECT column1, SUM(column2) FROM listoftables GROUP BY columnlist。 正在輸入（網 laoshutou）為您傾心整理（下載后雙擊刪除） 如有需求請發(fā)站內信（下載后雙擊刪除） 第四章 系統(tǒng)設計 隨著科學技術的不斷提高 ,計算機科學日漸成熟 ,其強大的功能已為人們深刻 認識 ,它已進入人類社會的各個領域并發(fā)揮著越來越重要的作用。 第一節(jié) 系統(tǒng)功能設計 房地產銷售系統(tǒng) 是為了對 房地產銷售企業(yè) 實行計算機化的管理，以提高工作效率，方便用戶。 用戶權限 主要任務是提高系統(tǒng)安全性和 使用性，為 系統(tǒng)提供良好的維護，如用戶 管理 可以為用戶提供權限服務。 背景設置管理模塊包括：界面的顏色和圖片的自定義設置。 員工信息 模塊包括：顯示添加修改刪除查詢。 樓房類型模塊 包括：顯示添加修改刪除查詢。 樓房信息模塊包括：對新樓房添加，和現有的樓房信息修改查詢。 檢索信息 管理主要包括： 員工信息 包括： 所有字段的查詢，也包括模糊查詢（ like）和 Excel輸出。 第二節(jié) 系統(tǒng)結構設計 登錄 模塊結構流程圖：如圖 41。數據庫設計時需要綜合企業(yè)各個部門的存檔數據和數據需求，分析各個數據之間的關系，按照 DBMS 提供的功能和描述工具，設計出規(guī)模適當、正確反映數據關系、數據冗余少、存取效率高、能滿足多種查詢要求的數據模型。關系型數據庫要盡量 按關系規(guī)范化要求進行數據庫設計，但為使效率高，規(guī)范化程度應根據應用環(huán)境和條件來決定。 數據字典設計：用數據字典描述數據庫的設計，便于維護和修改。部分表結構如下： 房屋信息表結構如圖：圖 46 圖 46房屋信息表 正在輸入（網 laoshutou）為您傾心整理（下載后雙擊刪除） 如有需求請發(fā)站內信（下載后雙擊刪除） 房型信息表 結構如下：圖 47 圖 47 房型信息表 公司基本信息表：圖 48 圖 48公司基本信息表 客戶信息表：圖 49 圖 49 客戶信息表 樓房信息表：圖 410 正在輸入（網 laoshutou）為您傾心整理（下載后雙擊刪除） 如有需求請發(fā)站內信（下載后雙擊刪除） 圖 410 樓房信息表 樓盤信息表：圖 411 圖 411 樓盤信息表 銷售信息表：圖 412 圖 412 銷售信息表 正在輸入（網 laoshutou）為您傾心整理（下載后雙擊刪除） 如有需求請發(fā)站內信（下載后雙擊刪除） 員工信息表 :圖 413 圖 413員工信息表 用戶信息表：圖 414 圖 414 用戶信息表 其他的表請參考數據庫，表名如下：圖 415 圖 415表名 正在輸入（網 laoshutou）為您傾心整理（下載后雙擊刪除） 如有需求請發(fā)站內信（下載后雙擊刪除） 第五章 系統(tǒng)開發(fā)實現 應用程序是用 VB 開發(fā)的，界面設計的簡單明了。 圖 51 登錄界面 根據登錄模塊的功能，管理員和普通用戶界面統(tǒng)一在一起。 數據庫的連接采用的是 ADO 對象。 \。在系統(tǒng)功能設計中，系統(tǒng)維護功能主要有添加用戶，刪除用戶，和管理員密碼修改，如圖 53 所示。管理員密碼數據庫的用戶信息表項里。如果系統(tǒng)已經添加的該用戶，系統(tǒng)自動提示，重新添加。 圖 54 用戶密碼修改 正在輸入（網 laoshutou）為您傾心整理（下載后雙擊刪除） 如有需求請發(fā)站內信（下載后雙擊刪除） 修改密碼：在舊密碼輸入你的登錄密碼，在新密碼中輸入新密碼，在新密碼核實中再輸入一次新密碼。這樣下一次再進入本系統(tǒng)時本用戶的密碼就改為新密碼。也是本次開發(fā)的重點。 各按鈕的功能：（所有管理界面） ：移動到第一條記錄。 添加：是添加一新的記錄。 修改：移動到要修改的記錄，點修改，修改完后，點保存后就修改完畢。 圖 55 員工信息輸入界面 正在輸入（網 laoshutou）為您傾心整理（下載后雙擊刪除） 如有需求請發(fā)站內信（下載后雙擊刪除） 圖 56 信息瀏覽 第五節(jié) 查詢 查詢打印模塊包括 客戶信息 、 員工信息 、 銷售信息表，客戶報表的打印 ，查詢以客戶信息表為例，如圖 57所示。在查詢完后，可以在如圖 57 中輸出 Excel報表。 代碼實現請參考附錄程序源代碼。 內存： 32MB以 上。 第二節(jié) 系統(tǒng)的維護 系統(tǒng)維護的目的是保證管理信息系統(tǒng)正常而可靠地運行，并能使系統(tǒng)不斷得到改 善和提高，以充分發(fā)揮作用。 （ 2）適應性維護 使系統(tǒng)適用環(huán)境的變化而進行的維護。 本系統(tǒng)的維護模 塊 本系統(tǒng)的維護功能主要是為保證系統(tǒng)能夠正常的運行。這些都有待進一步改善。 1 ．本次的課題設計首先分析了管理系統(tǒng)目前在國內外的發(fā)展狀況及需求分析。 首先便是調研的不充分。 然后，會用了兩種軟件，如何把它們連接在一起還真是一件困難的事：選擇連接的方法就很重要，通過各方面的比較，我選擇了 ADO，通過 ADO控件與數據庫中各表進行連接，同時也用到少數編程實現 VB和 ACCESS數據庫的連接。 最后就是從一而終的問題了，在開發(fā)過程中我遇到了許許多多的問題，很多地方都不明白，經常有打退堂鼓的想法，我經常的請教同學和老師，最后的成果雖然不很完美，但我盡力了，并有所收獲。他無論在理論上還是在實踐中，都給與我很大的幫助，使我得到不少的提高，即使在百忙中，抽出了很多時間對我的論文進行的批改和修正。 給予我很大的幫助，不僅幫我解答了不少的難點，還給我提出了許多建議，我會以他們?yōu)榘駱?，更好地努力。同時感謝同組成員 ,我們在一起互相討論 ,學習 ,解決了不少的難題。39。密碼修改 On Error GoTo Err If Trim() And Trim() And Trim() Then If Trim() Trim() Then MsgBox 新密碼不對 !, , 提示 Exit Sub Else Dim rs1 As New If Then select * from 用戶信息表 where 用戶名稱 =39。, CN, adOpenStatic, adLockOptimistic If Not Then If Not IsNull((1)) Then If Trim() Trim((1)) Then MsgBox 用戶舊密碼不對 !, , 提示 Exit Sub 正在輸入（網 laoshutou）為您傾心整理（下載后雙擊刪除） 如有需求請發(fā)站內信（下載后雙擊刪除） Else (1).Value = Trim() MsgBox 操作已成功 !, , 提示 = = = Unload Me End If End If End If End If End If Exit Sub Err: MsgBox End Sub Private Sub Form_Load() = = = End Sub Private Sub cmdOK_Click() Unload Me End Sub Private Sub Form_Load() (1).Text = 系統(tǒng)關于 End Sub Private Sub Command1_Click() 39。 DateChange(Date) amp。退出程序 End End Sub Private Sub cmdOK_Click() 39。判斷用戶名是否為空 MsgBox 請輸入帳號！ , vbOKOnly + vbExclamation, 警告 Exit Sub End If If Trim() = Then 39。 amp。39。3