【正文】 數(shù)據(jù)庫應(yīng)用總是會涉及到這3個方面的問題：前端程序、數(shù)據(jù)庫結(jié)構(gòu)、前端程序和數(shù)據(jù)庫之間的連接， 在這里Visual Basic 。是DAO/RDO的后繼產(chǎn)物，ADO擴展了DAO和RDO所使用的對象模型，這意味著它包含較少的對象、更多的屬性、方法（和參數(shù)），以及事件。在使用 Visual Basic進行數(shù)據(jù)庫程序的開發(fā)時，必須建立與數(shù)據(jù)庫的連接。數(shù)據(jù)訪問接口是一個對象模型，它包含了用于訪問數(shù)據(jù)庫的各種變量和函數(shù)。最新的是 ADO，它是比RDO和 DAO 更加簡單，然而更加靈活的對象模型。3．系統(tǒng)概要設(shè)計 系統(tǒng)結(jié)構(gòu)描述開發(fā)此系統(tǒng)的目的就是幫助小企業(yè)管理人員提高工作效率，實現(xiàn)工資管理的系統(tǒng)化、規(guī)范化和自動化。主要員工基本檔案信息的管理。主要用來統(tǒng)一管理各個職位的與工資有關(guān)的基本信息。主要完成每期對員工進行考核。完成對員工的工資管理功能。主要完成查看歷史工資發(fā)放信息。增加、修改和刪除員工基本檔案信息。主要用來統(tǒng)一各個職位的與工資有關(guān)的基本信息。3) 特殊項管理。管理人員可以根據(jù)條件增加、修改和查看員工考核記錄。管理人員選擇員工、日期，系統(tǒng)生成該員工在該期的工資。根據(jù)條件羅列、統(tǒng)計已經(jīng)發(fā)放的工資。ER圖即實體關(guān)系圖(Entity relationship diagram)。ER圖涉及兩個方面，一是實體，二是關(guān)系。實體通過關(guān)系而相連?！瓣P(guān)系”的基數(shù)類型（Cardinality）可以改變，而不必刪除這個關(guān)系然后再重新生成一個新關(guān)系?！叭我怅P(guān)系”（optional relationship）是指兩個實體的關(guān)系可以不存在。與現(xiàn)存物理數(shù)據(jù)庫有關(guān)的實體關(guān)系圖可以自動生成。在此基礎(chǔ)上，數(shù)據(jù)建模軟件便可以自動生成圖。：職工姓名性別出生年月工作年月職位職工IDn屬性1職位職位基本工資津貼11發(fā)放考核1n工資特殊項時間金額名稱職工ID職工ID工資取畢合計工資 系統(tǒng)實體關(guān)系圖 邏輯設(shè)計關(guān)系模式1：員工檔案（員工ID，職位，姓名，性別，出生年月，工作年月)主鍵：員工ID外鍵：職位關(guān)系模式2：工資(員工ID，工資取畢，合計工資)主鍵：員工ID關(guān)系模式3：特殊項(特殊項ID，職工ID，特殊項名稱，特殊項金額，特殊項時間)主鍵：特殊項ID外鍵：員工ID關(guān)系模式4：職位(職位，基本工資，津貼)主鍵：職位根據(jù)上面分析的各種功能要求，以下列出數(shù)據(jù)庫中所建立的各個表的具體設(shè)置：職工表名稱職工字段名稱類型(寬度)關(guān)鍵字可為空編碼規(guī)則取值范圍職工ID文本（10）PKnot null姓名文本(10)性別文本(2)男，女職位文本(10)FKNot null出生年月日期(8)工作年月日期(8)工資表名稱工資字段名稱類型(寬度)關(guān)鍵字可為空編碼規(guī)則取值范圍缺省值職工ID文本(10)PKnot null工資取畢是否合計工資貨幣職位表名稱職位字段名稱類型(寬度)關(guān)鍵字可為空編碼規(guī)則取值范圍缺省值職位文本(10)PKnot null津貼貨幣補助貨幣特殊項表名稱特殊項字段名稱類型(寬度)關(guān)鍵字可為空編碼規(guī)則取值范圍缺省值特殊項ID文本（10）PKnot null職工ID文本(10)FK特殊項名稱文本(100)特殊項金額貨幣特殊項時間日期(8) 4. 詳細設(shè)計與模塊的實現(xiàn) 創(chuàng)建數(shù)據(jù)庫打開Access，創(chuàng)建數(shù)據(jù)庫，命名為職工工資管理系統(tǒng)。：圖 創(chuàng)建表：職工點擊保存確定后，可以在職工工資管理系統(tǒng)數(shù)據(jù)庫的目錄下看到職工表，如圖. 保存后職工表接著按照設(shè)計好的ER創(chuàng)建其他的表，具體過程與此相同，在此處略。是用來存放公用變量和公用函數(shù)的模塊。在該系統(tǒng)中，標準模塊包括打開數(shù)據(jù)庫連接，關(guān)閉數(shù)據(jù)庫連接，打開數(shù)據(jù)庫集合和關(guān)閉數(shù)據(jù)庫集合等操作：39。數(shù)據(jù)庫文件的名稱Public gFile As String39。數(shù)據(jù)庫集合對象Public gRst As New 39。：圖 系統(tǒng)主界面主界面沒有包含控件，但是包含一個菜單，菜單中包括：人員管理窗體，職位管理窗體，特殊項管理窗體，工資發(fā)放窗體，統(tǒng)計報表窗體和退出程序。設(shè)置啟動參數(shù)Private Sub MDIForm_Load() gFile = amp。 人員管理模塊的設(shè)計與實現(xiàn)人員管理窗體的功能主要實現(xiàn)人員的增改刪功能。用戶單擊“添加員工”按鈕，則顯示添加員工窗體。然后刷新ADO數(shù)據(jù)控件，保證數(shù)據(jù)庫和DataGrid控件中的數(shù)據(jù)一致性。操作完畢，用戶單擊“取消”按鈕，可以退出本窗體。當前選定行號Public CurEm As Integer 創(chuàng)建添加員工窗體 本窗體實現(xiàn)添加一條記錄到職工表，并刷新人員管理窗體中的ADO數(shù)據(jù)控件，保持數(shù)據(jù)的一直性。： 添加員工窗體 創(chuàng)建修改員工窗體 在窗體顯示的時候，保證窗體上面的數(shù)據(jù)與在人員管理窗體上選定的行的數(shù)據(jù)一致，同時保證職工ID不可改動。窗體初始化時，會把“人員管理”窗體中選中的數(shù)據(jù)顯示到TxtValue控件數(shù)組中，用戶修改單擊“修改”按鈕，則生成并執(zhí)行ＳＱＬ語句，實現(xiàn)修改功能。： 　　　　　　　　　　 職位管理模塊的設(shè)計與實現(xiàn)點擊主窗口“職位”菜單后，顯示職位信息管理窗口。： 職位管理窗體用戶重新選擇DataGrid1控件中的行列，則記錄用戶所在的行。用戶單擊“刪除職位”按鈕，則彈出對話框確認，無誤之后執(zhí)行SQL語句，刪除職位，然后刷新ADO數(shù)據(jù)控件，保證數(shù)據(jù)一致性。操作完畢，用戶單擊“取消”按鈕，可以退出本窗體。Data Source= amp。 。Persist Security Info=False = SQLSet = Adodc1 創(chuàng)建添加職位窗體本窗體實現(xiàn)添加一條記錄到職位表，并刷新人員管理窗體中的ADO數(shù)據(jù)控件，保持數(shù)據(jù)的一致性。用戶對txtValue控件數(shù)組的屬性進行修改，當用戶單擊“添加”時，生成SQL語句并執(zhí)行，同時刷新職位管理窗體的數(shù)據(jù)。窗體初始化時，會把“職位管理”窗體中選中的數(shù)據(jù)顯示到TxtValue控件數(shù)組中。用戶單擊“取消”按鈕，退出該窗體。該窗口實現(xiàn)對特殊項的添加，刪除和修改功能。用戶單擊“添加特殊項”按鈕，則顯示添加特殊項窗體。用戶單擊“修改特殊項”按鈕，則顯示修改特殊項窗體，并將相關(guān)的用戶選定信息傳遞給修改特殊項窗體。 創(chuàng)建添加特殊項窗體本窗體實現(xiàn)添加一條記錄到特殊項表，并刷新人員管理窗體中的ADO數(shù)據(jù)控件，保持數(shù)據(jù)的一致性。用戶選擇對應(yīng)的員工姓名，程序能夠自動查找到對應(yīng)的職工ID：響應(yīng)cmbName的單擊事件，單擊姓名的時候會自動查找相對應(yīng)的職工ID。保證姓名與ID一致Private Sub cmbName_Click() = ()End Sub ： 添加特殊項窗體 創(chuàng)建修改特殊項窗體 窗體初始化時，會把“特殊項管理”窗體中選種的數(shù)據(jù)顯示到TxtValue控件數(shù)組中。用戶單擊“取消”按鈕，退出該窗體。本窗體實現(xiàn)的具體功能如下：動態(tài)生成當月的工資表，查詢指定員工的工資信息，發(fā)放工資，打印工資憑條。單擊“發(fā)放工資”按鈕，發(fā)放工資，即將工資月表中的“發(fā)放完畢”字段設(shè)置為1。分別是月表的名稱和員工的工資總額：Option Explicit39。動態(tài)生成39。而月表的名稱都會變?yōu)?00306Public mTableName As String39。計算得到Public mSum As Double 統(tǒng)計報表模塊的設(shè)計與實現(xiàn) 用戶點擊主界面“報表”菜單，系統(tǒng)顯示報表。本窗體的工作流程就是在用戶單擊需要的按鈕，顯示相應(yīng)的窗體。通過這次畢業(yè)設(shè)計的實際“練兵”，使我對管理信息系統(tǒng)和數(shù)據(jù)庫有了更深刻更直觀的認識。經(jīng)過這段時間的設(shè)計和開發(fā)，工資管理系統(tǒng)基本開發(fā)完畢。對于數(shù)據(jù)的一致性的問題也通過程序進行了有效的解決。這些都有待在以后的版本中進一步改善。其次，我還要感謝我的同事，當我遇到難題時他們幫助我一起解決，使我能在最短的時間里解決這些難題。s COM+ Programming with Visual Basic】 作者：Scot Hillier，出版社：Sams，出版時間：1畢業(yè)設(shè)計過程中查閱的網(wǎng)站： 附錄 源程序清單一、標準模塊39。Access數(shù)據(jù)庫文件的名稱Public gFile As String39。數(shù)據(jù)庫集合對象Public gRst As New 39。打開數(shù)據(jù)庫文件Public Sub OpenDBFile()39。自由文件號On Error GoTo ErrGoto39。Data Source= amp。 。Persist Security Info=False39。ErrGoto:39。關(guān)閉數(shù)據(jù)庫連接 39。打開錯誤處理陷阱 Dim intErrFileNo As Integer 39。 39。ErrGoto: 39。打開數(shù)據(jù)集Public Sub OpenRS(SQL As String) 39。自由文件號 On Error GoTo ErrGoto 39。 Exit Sub 39。把