工資管理信息系統的設計—計算機(論文)(編輯修改稿)

　

【文章內容簡介】 gFile = amp。 \職工工資管理系統 .mdb Set gX = CreateObject() End Sub 調用主界面中的各個窗體，如調用“人員管理”窗體： Private Sub HRManage_Click() 畢業設計（論文） 第 頁 19 End Sub 其他窗體同上方法。 人員管理模塊的 設計與實現 人員管理窗體的功能主要實現人員的增改刪功能。如圖 所示： 圖 4 . 6 人 員 管 理 窗 體 用戶重新選擇 DataGrid1 控件中的行列，則記錄用戶所在的行。用戶單擊“添加員工”按鈕，則顯示添加員工窗體。用戶單擊“刪除員工”按鈕，則彈出對話框確認，無誤之后執行 SQL語句，刪除員工。然后刷新 ADO數據控件，保證數據庫和 DataGrid 控件中的數據一致性。用戶單擊“修改員工”按鈕，則顯示 修改員工窗體，并將相關的用戶選定信息傳遞給修改員工窗體。操作完畢，用戶單擊“取消”按鈕，可以退出本窗體。 編寫窗體代碼：首先定義窗體的成員變量，為了讓其他窗體使用這個變量，設置其屬性為 Public: 39。當前選定行號 Public CurEm As Integer 創建添加員工窗體 本窗體實現添加一條記錄到職工表，并刷新人員管理窗體中的 ADO數據控件，保持數據的一直性。首先新建一個窗體，添加員工窗體包含兩個控件數組， lblField 是一個 Label 控件數組，用于顯示字段名稱， txtValue 用于輸入這些字段的值；另外還有一個“添加”按鈕和“取消”按鈕，分別實現添加員工和退出窗體的功能。如圖 所示： 畢業設計（論文） 第 頁 20 圖 添加員工窗體 創建修改員工窗體 在窗體顯示的時候，保證窗體上面的數據與在人員管理窗體上選定的行的數據一致，同時保證職工 ID 不可改動。當用戶單擊“修改”按鈕時，生成并執行對應的修改語句。窗體初始化時，會把“人員管理”窗體中選中的數據顯示到 TxtValue 控件數組中，用戶修改 txtValue控件數組中的文字內容。單擊“修改”按鈕，則生成并執行ＳＱＬ語句，實 現修改功能。單擊“取消”按鈕，退出該窗體。如圖４ .7 所示： 畢業設計（論文） 第 頁 21 圖 修改員工窗體 職位管理模塊的設計與實現 點擊主窗口“職位”菜單后，顯示職位信息管理窗口。該模塊實現職位信息的添加、刪除、修改功能。如圖 所示： 圖 職位管理窗體 用戶重新選擇 DataGrid1 控件中的行列，則記錄用戶所在的行。用戶單擊“添加職位”按鈕，則顯示添加職位窗體。用戶單擊“刪除職位”按鈕，則彈出對話框確認，無誤之后執行 SQL 語句，刪除職位，然后刷新 ADO 數據控件，保 證數據一致性。用戶單擊“修改職位”按鈕，則顯示修改職位窗體，并將相關用戶選定信息傳遞給修改職位窗體。操作完畢，用戶單擊“取消”按 畢業設計（論文） 第 頁 22 鈕，可以退出本窗體。 其中為了保證數據庫和 DataGrid 控件中的數據一致性，實現 DataGrid 控件的數據顯示要進行以下操作： SQL = SELECT * FROM 職位 = Provider=。Data Source= amp。 gFile amp。 。Mode=ReadWrite。Persist Security Info=False = SQL Set = Adodc1 創建添加職位窗體 本窗體實現添加一條記錄到職位表，并刷新人員管理窗體中的 ADO 數據控件，保持數據的一致性。在窗體初始化的時候，初始化為 1b1Field 控件數組。用戶對 txtValue 控件數組的屬性進行修改，當用戶單擊“添加”時，生成 SQL 語句并執行，同時刷 新職位管理窗體的數據。如圖 所示 : 圖 添加職位窗體 創建修改職位窗體 本窗體 在顯示的時候，保證窗體上面的數據與在職位管理窗體上選定的行的數據一致，同時保證職位不可改動。窗體初始化時，會把“職位管理”窗體中選中的數據顯示到 TxtValue 控件數組中。用戶單擊“修改”按鈕，則生成并執行 SQL 語句，實現修改的功能。用戶單擊“取畢業設計（論文） 第 頁 23 消”按鈕，退出該窗體。如圖 所示： 圖 修改職位窗體 特殊項管理模塊的設計與實現 點擊主界面“特殊項管理”菜單后，顯示特殊項窗口。 該窗口實現對特殊項的添加，刪除和修改功能。其界面如下圖所示： 圖 特殊項管理界面 初始進入界面時，界面左側顯示表所有查詢記錄，右側設有 4 個按鈕，分別實現增改刪的功能。用戶單擊“添加特殊項”按鈕，則顯示添加特殊項窗體。用戶單擊“刪除特殊項”按鈕，則彈出對話框確認，無誤后執行 SQL 語句，刪除特殊項，刷新 ADO 數據控件，保證數據的一致性。用戶單擊“修改特殊項”按鈕，則顯示修改特殊項窗體，并將相關的用戶選定信息傳遞給修畢業設計（論文） 第 頁 24 改特殊項窗體。操作完畢，用戶單擊“取消”按鈕，可以退出本窗體。 創建添加特 殊項窗體 本窗體實現添加一條記錄到特殊項表，并刷新人員管理窗體中的 ADO 數據控件，保持數據的一致性。在窗體初始化的時候，初始化 1b1Field 控件數組。用戶選擇對應的員工姓名，程序能夠自動查找到對應的職工 ID： 響應 cmbName 的單擊事件，單擊姓名的時候會自動查找相對應的職工 ID。 39。保證姓名與 ID 一致 Private Sub cmbName_Click() = () End Sub 如圖 所示： 圖 添加特殊項窗體 創建修改特殊項窗體 窗體初始化時，會把“特殊項管理”窗體中選種的數據顯示到 TxtValue 控件數組中。用戶單擊“修改”按鈕，則生成并執行 SQL 語句，實現修改的功能。用戶單擊“取消”按鈕，退出該窗體。如圖 所示： 畢業設計（論文） 第 頁 25 圖 修改特殊項窗體 工資發放管理模塊的 設計與實現 用戶點擊主界面“工資”菜單，顯示發放工資窗口。本窗體實現的具體功能如下：動態生成當月的工資表，查詢指定員工的工資信息，發放工資，打印工資憑條。如圖 所示： 圖 工 資發放界面 用戶進入界面，首先選擇要發工資的月份和職工的姓名，點擊“生成月表”按鈕，系統便畢業設計（論文） 第 頁 26 將生成的工資記錄顯示在界面左側的數據柵格中。單擊“發放工資”按鈕，發放工資，即將工資月表中的“發放完畢”字段設置為 1。 編寫窗體代碼，首先要聲明兩個窗體變量。分別是月表的名稱和員工的工資總額： Option Explicit 39。月表的名稱 39。動態生成 39。在 cmbMonth 中用戶可以填入 20216, 202106, 20210601 等格式 39。而月表的名稱都會變為 202106 Public mTableName As String 39。員工工資總額 39。計算得到 Public mSum As Double 統計報表模塊的 設計與實現 用戶點擊主界面“報表”菜單，系統顯示報表。如下圖所示： 畢業設計（論文） 第 頁 27 圖 統計報表運行時界面 本系統中只實現了前 3 個按鈕的功能。本窗體的工作流程就是在用戶單擊需要的按鈕，顯示相應的窗體。窗體的代碼如下： Private Sub cmdMonthAll_Click() End Sub Private Sub cmdMonthSpecial_Click() End Sub Private Sub cmdThisMonthSalary_Click() End Sub Private Sub cmdYears_Click() End Sub Private Sub Form_Load() End Sub 畢業設計（論文） 第 頁 28 5. 結束語 本系統從開始到完成用了幾個月的時間，其中包括熟悉環境，設計編程與程序 調試，最后撰寫畢業論文。通過這次畢業設計的實際“練兵”，使我對管理信息系統和數據庫有了更深刻更直觀的認識。平時課堂上的理論經過自己的親身實踐，我對管理系統的開發過程包括需求分析、概要設計、詳細設計、代碼編寫、測試等都有深刻的體驗和全面的認識。 經過這段時間的設計和開發，工資管理系統基本開發完畢。其功能基本符合用戶需求，能夠完成公司人員檔案的存儲和工資的查詢。對于數據的一致性的問題也通過程序進行了有效的解決。 但是由于畢業設計時間較短，所以該系統還有許多不盡如人意的地方，比如聯機文檔比較少，用戶界面不夠美觀， 出錯處理不夠等多方面問題。這些都有待在以后的版本中進一步改善。 致 謝 首先我要感謝我的指導老師王貴珍。其次，我還要感謝我的同事，當我遇到難題時他們幫助我一起解決，使我能在最短的時間里解決這些難題。在此，對于這些給予我幫助的人們表達我深深地謝意！并祝他們永遠快樂！ 畢業設計（論文） 第 頁 29 參考文獻 【 數據庫開發典型實例】作者：王興晶，出版社：電子工業出版社，出版日期： 【數據庫設計】作者： Ryan ,Ronald ，何玉潔 武欣 鄧一凡 等譯，出版社：機械工業出版社，出版時間： 【 Visual Basic 數據庫應用系統開發從基礎到實踐】作者：李長林 張麗華 王紅，出版社：電子工業出版社，出版時間： 【 VB 中文版教程 】 作者： 新智工作室編著 ，出版社： 電子工業出版社 ，出版時間： 【 數據庫應用基礎 Access 2021】 作者： 張平主編 ，出版社： 人民郵電出版社 ，出版時間： 【 數據庫原理與系統開發教程 】 作者： 伍俊良主編 ，出版社： 清華大學出 版社 ，出畢業設計（論文） 第 頁 30 版時間： 【 VB 語言程序設計 】 作者： 林卓然編著 ，出版社： 電子工業出版社 ，出版時間： 【 程序設計實訓教程 】 作者： 楊克玉主編 ，出版社： 機械工業出版社 ，出版時間： 【 程序設計教程 】 作者： 羅朝盛主編 ，出版社： 人民郵電出版社 ，出版時間： 【 Scot Hillier39。s COM+ Programming with Visual Basic】 作者： Scot Hillier，出版社：Sams，出版時間： 1 畢業設計過程中查閱的網站： 附錄 源程序清單 一、標準模塊 39。變量要求聲明 Option Explicit 39。Access 數據庫文件的名稱 Public gFile As String 39。數據庫連接對象 Public gCon As New 39。數據庫集合對象 Public gRst As New 39。Excel 程 序對象 Public gX As 39。打開數據庫文件 Public Sub OpenDBFile() 39。打開錯誤處理陷阱 畢業設計（論文） 第 頁 31 Dim intErrFileNo As Integer 39。自由文件號 On Error GoTo ErrGoto 39。 Provider=。Data Source= amp。 gFile amp。 。Mode=ReadWrite。Persist Security Info=False 39。 Exit Sub 39。 ErrGoto: 39。把錯誤信息保存在文件里 intErrFileNo = FreeFile() Open For Append As intErrFileNo Print intErrFileNo, Chr(34) + Format(Now, YYYYMMDD HH:MM:SS) + Chr(34), Chr(34) + 信息 + Chr(34), Chr(34) + + Chr(34), Chr(34) + OpenDBFile(Module1) + Chr(34), Chr(34) + + Chr(34) Close intErrFileNo End Sub 39。關閉數據庫連接