【正文】 13 (4) 職員基本信息表（見(jiàn)表 44） 表 44職員基本信息表 名 稱 類 型 寬度 主 鍵 非 空 內(nèi)部編號(hào) Int 4 No Yes 職員編號(hào) Varchar 30 Yes Yes 姓 名 Varchar 20 No Yes 姓名簡(jiǎn)碼 Varchar 10 No No 性 別 Varchar 2 No No 出生日期 Int 4 No No 年 齡 Int 4 No No 籍 貫 Varchar 50 No No 民 族 Varchar 20 No No 文化程度 Varchar 50 No No 畢業(yè)學(xué)校 Varchar 20 No No 健康狀況 Varchar 100 No No 婚姻狀況 Varchar 50 No No 身份證號(hào) Varchar 10 No No 家庭電話 Varchar 18 No No 辦公電話 Varchar 50 No No 手 機(jī) Varchar 50 No No 電子郵箱 Varchaar 50 No No 職工帳號(hào) Varchar 20 No No 備 注 Varchar 100 No No 數(shù)據(jù)表的外部關(guān)鍵字 為系統(tǒng)創(chuàng)建 4 個(gè)外部關(guān)鍵字 FK_月工資統(tǒng)計(jì)表 _職員基本信息表 、 FK_工資發(fā)放歷史表 _職員基本信息表 、 FK_職員獎(jiǎng)勵(lì)表 _職員基本信息表 、 FK_職員懲罰表 _職員基本信息表 ，用于將月工資統(tǒng)計(jì) 表、工資發(fā)放歷史表、職員獎(jiǎng)勵(lì)表、職員懲罰表與職員基本信息表通過(guò)“ 職員編號(hào) ” 字段進(jìn)行多對(duì)一的關(guān)聯(lián) 。 15 5 系統(tǒng)詳細(xì)設(shè)計(jì) 主控制模塊 （ 1）功能簡(jiǎn)介： 主控制平臺(tái)使用簡(jiǎn)單直觀的布局，它主要實(shí)現(xiàn)對(duì)模塊的調(diào)用和顯示，提供了菜單和按鈕兩種操作方式，利用系統(tǒng)默認(rèn)生成的窗體作為主窗 體，文件名 ，為其添加一個(gè)主菜單（ MainMenu）控件。 表 53主窗體屬性設(shè)置 菜單欄 菜單項(xiàng) 屬性 取值 MenuItemDep Text 機(jī)構(gòu)編制管理（ amp。Y) 機(jī)構(gòu)編制管理理 幫助 人員信息管理 薪資福利管理 系統(tǒng)管理 人力資源管理系統(tǒng) 16 MenuItemPeopleManage Text 職員信息維護(hù) (amp。A) MenuItemTaxInfo Text 個(gè)人所得稅率 (amp。E） MenuItemSystem Text 系統(tǒng)管理 (amp。H） MenuItemHelp1 Text 關(guān)于（ amp。獲得 frmMain窗體的子窗體的數(shù)量 Dim i As Integer = 39。 因此創(chuàng)建類 Database,編寫代碼使每個(gè)窗體可以 通過(guò)調(diào)用此類來(lái)打 開數(shù)據(jù)庫(kù)，并對(duì) 通過(guò)其對(duì) 數(shù)據(jù)庫(kù)中數(shù)據(jù) 實(shí)現(xiàn) 進(jìn)行 查詢、刪除等功能。Integrated Security=SSPI。建立數(shù)據(jù)庫(kù)連接對(duì)象 SqlConn = New SqlConnection() 39。 主要代碼如下： Private Sub txbUserId_LostFocus(ByVal sender As Object, _ ByVal e As ) Handles 39。) 39。獲得用戶的密碼級(jí)用戶名 = (0)(密碼 ) = (0)(姓名 ) End If 39。 圖 56 機(jī)構(gòu)編制管理功能模塊圖 機(jī)構(gòu)設(shè)置及編碼 機(jī)構(gòu)編制管理 機(jī)構(gòu)設(shè)置及編碼 機(jī)構(gòu)詳細(xì)信息 21 機(jī)構(gòu)設(shè)置及編碼子模塊用于生成企業(yè)組織機(jī)構(gòu)的層次關(guān)系和編碼，在這個(gè)模塊中建立起組織的管理結(jié)構(gòu) ，上下級(jí)關(guān)系在這里一覽無(wú)余，而個(gè)人信息會(huì)與這個(gè)組織架構(gòu)連接起來(lái) 。InitTree是用遞歸方法初始化 TreeView控件的節(jié)點(diǎn) Private Sub InitTree(ByRef nodes As TreeNodeCollection, _ ByVal sParentIndex As String) Try Dim tmpNode As TreeNode Dim absIndex As String Dim dvTemp As DataView = 39。循環(huán)添加 TreeNode For Each dr As DataRow In dataRows 39。遞歸調(diào)用 InitTree(nodes( 1).Nodes, absIndex) Next Catch ex As Exception (初始化 TreeView失敗 ) End Try End Sub 管理原可通過(guò)按鍵方式調(diào)用相應(yīng)的觸發(fā)函數(shù)來(lái)實(shí)現(xiàn)對(duì)機(jī)構(gòu)的增加、刪除、修改等功能。主要代碼如下： Private Sub frmDepInfo_Load(ByVal sender As Object, _ ByVal e As ) Handles Dim dt As DataTable 23 dt = (組織 機(jī)構(gòu)編碼表 ) 39。 圖 59職員 信息管理功能模塊圖 職員信息維護(hù) 職員信息維護(hù)子模塊用于輸入和修改職員的姓名、性別、年齡、籍貫、文化程度、畢業(yè)院校、婚姻狀況、家庭電話、辦公電話、單位編號(hào)等資料。 ② 在 SqlDataAdapter1 對(duì)象上右擊，在彈出的快捷菜單中選擇“生成數(shù)據(jù)”命令，在“生成數(shù)據(jù)集”對(duì)話框中單擊“確定”按鈕，如圖 511 所示。 編寫代碼使得按鍵響應(yīng)相應(yīng)事件，使得修改的數(shù)據(jù)保存或者刪除數(shù)據(jù)，具體代碼如下： Private Sub ToolBar1_ButtonClick(ByVal sender As , _ ByVal e As ) _ Handles If Is tbbSave Then 26 Dim row As Integer row = = New DataGridCell(row + 1, 0) Try If Then 39。用 SqlDataAdapter1更新數(shù)據(jù)庫(kù) (DataSet11) (數(shù) 據(jù)刪除成功 !) Else (無(wú)修改的數(shù)據(jù) !) End If Catch ex As Exception (刪除數(shù)據(jù)出錯(cuò) ) 39。 職員信息查詢模塊的窗體效果如圖 514 所示 。 系統(tǒng)的改進(jìn)與提高 由于畢業(yè)設(shè)計(jì)時(shí)間有限本文開發(fā)的人力資源管理系統(tǒng)并不完整、豐滿，本文所完成的是人力資源管理中所需的基本的核心模塊功能 . 人力資源管理系統(tǒng)可以作為一個(gè)獨(dú)立的系統(tǒng)運(yùn)行，也可以和其他的應(yīng)用系統(tǒng)結(jié)合起來(lái)，實(shí)現(xiàn)數(shù)據(jù)的共享，從而降低人工勞動(dòng)的強(qiáng)度。友好的用戶界面 ,使得人力資源管理人員得以擺脫繁重的日常工作 ,集中精力從企業(yè)的戰(zhàn)略角度來(lái) 考慮人力資源規(guī)劃和政策。 是我工作前一次很好的演練和實(shí)踐的機(jī)會(huì) ,是培養(yǎng)獨(dú)立思考問(wèn)題和自學(xué)能力的鍛煉 ,使我意識(shí)到必須努力學(xué)習(xí)才能才工作中體現(xiàn)自己的價(jià)值 ,適應(yīng)社會(huì)的需要 。 32 參考文獻(xiàn) 1 李萬(wàn)紅，梁靚 .《 Visual 程序設(shè)計(jì)入門》 .北京：清華大學(xué)出版社， 2021 2 王晟 .《 Visual 數(shù)據(jù)庫(kù)開發(fā)經(jīng)典案例解析》 .北京：清華大學(xué)出版社 ,2021,66113 3 盧智勇 ,譚小丹 ,李光明 .《 Visual 數(shù)據(jù)庫(kù)程序設(shè)計(jì)與實(shí)例》 .冶金工業(yè)出版社， 2021 4 黃明 ,梁旭 ,曹利超 .《 Visual 信息系統(tǒng)設(shè)計(jì)與開發(fā)實(shí)例》 .機(jī)械工業(yè)出版社， 2021， 1077 5 飛思科技產(chǎn)品研發(fā)中心 .《 Visual 編程指南》 .電子工業(yè)出版社， 291300 6 鄭阿奇 ,劉啟芬 ,顧韻華 .《 SQL Server 實(shí)用教程 》 .電子工業(yè)出版社， 2021