【正文】 本模塊使用的數(shù)據(jù)表：員工信息表 1 窗體設(shè)計(jì) 窗體設(shè)計(jì)的步驟如下： （ 1） 在工程中新建一個(gè)窗體，命名為 main_yggl_addmodify,設(shè)置 MDIchild 屬性為 TRUE， borderstyle 屬性為 1Fix額 Single，清空 caption 屬性值。由于本系統(tǒng)采用 sql數(shù)據(jù)庫，因此字段類型是 image。先將二進(jìn)制文件打開，讀取里面的數(shù)據(jù)，再使用 appendchunk 方法將 讀出的數(shù)據(jù) 存入二進(jìn)制字段。例如。Persist Security Info=False。在主窗體中選擇人事管理 添加員工信息命令，打開“添加員工窗體”，此時(shí)在標(biāo)號(hào)文本框中自動(dòng)生成一個(gè) 5 位的編號(hào)，單擊選擇照片按鈕可以選擇員工相片。選擇通用選項(xiàng)卡，在圖像列表下拉列表框中選擇 imagelist1xuanxiangxuanze 按鈕選項(xiàng)卡，單擊插入按鈕，插入七個(gè)按鈕，然后一次設(shè)置每個(gè)按鈕的索引、標(biāo)題、關(guān)鍵字和圖像（對(duì)應(yīng) imagelist 控件 中圖像的索引號(hào)），如圖所示： 下面給出所有工具欄 按鈕及使用說明： 索引 標(biāo)題 關(guān)鍵字 圖像 說明 潘慶強(qiáng)的畢業(yè)設(shè)計(jì) 《企業(yè)人事管理系統(tǒng)》 17 1 員工管理 Yg 1 用于調(diào)用添加員工信息窗體 2 添加部門 Bm 2 用于調(diào)用添加部門窗體 3 日?？记? Kq 3 用于調(diào)用添加修改出勤記錄 4 公出請(qǐng)假 Gcqj 4 用于調(diào)用員工出勤請(qǐng)假 5 工資管理 Gzgl 5 用于調(diào)用工資信息管理窗體 6 過期處理 Gqcl 6 用于調(diào)用過期數(shù)據(jù) 7 工資導(dǎo)出 gzdc 7 用于調(diào)用工資數(shù)據(jù)導(dǎo)出 六 、 登陸模塊設(shè)計(jì) 具體代碼如下： Private Sub Command1_Click() Dim rs As New select * from 用戶表 where 用戶名 =39。鼠標(biāo)右鍵單擊 imagelist1 控件，在彈出的快捷菜單中選擇 屬性命令，打開屬 性也頁對(duì)話框。通過以上過程，一個(gè)簡單漂亮的 MDI 主窗體就設(shè)計(jì)完成。排列所有子窗體圖標(biāo) vbArrangeIcons End Sub 顯示子窗體列表 顯示字船體名稱列表就是在摸個(gè)菜單中顯示當(dāng)前子窗體的名稱，另外使用中的子窗體名稱還可以被標(biāo)記，主要實(shí)現(xiàn)方式是通過菜單編輯器 潘慶強(qiáng)的畢業(yè)設(shè)計(jì) 《企業(yè)人事管理系統(tǒng)》 14 主窗體 設(shè)計(jì)完之后，還要設(shè)計(jì)子窗體，需要蛇者窗體的 MDIChild 屬性值為 true。Initial Catalog=db_manmanage。 Public myMonth As String Public intSelMonth As Integer 4 編寫用于連接 sql server 2021 數(shù)據(jù)庫的數(shù)據(jù)庫連接函數(shù) n Public Function n() As Set n = New Provider=。 1 申明兩個(gè)字符型公共變量，其中的 tb1 是用于傳遞數(shù)據(jù)表名， sql1時(shí)用于傳遞 sql 語句。 這里將本系統(tǒng)的數(shù)據(jù)庫命名為 db_manmanager,主要包括九章不同的數(shù)據(jù)表，用于存儲(chǔ)不同的信息，表名如圖 潘慶強(qiáng)的畢業(yè)設(shè)計(jì) 《企業(yè)人事管理系統(tǒng)》 7 ： 根據(jù)以上各節(jié)對(duì)系統(tǒng)功能分析和設(shè)計(jì)，規(guī)劃處本系統(tǒng)中使用的數(shù)據(jù)庫實(shí)體分別為員工實(shí)體，部門實(shí)體、工資實(shí)體、出勤實(shí)體、公出請(qǐng)假實(shí)體、人事調(diào)動(dòng)實(shí)體、等、下面給出 ER 圖 員工實(shí)體： 部門實(shí)體： 出身年月 身份證號(hào) 性別 姓名 編號(hào) Id 籍貫 ??? . 入黨團(tuán)時(shí)間 聯(lián)系電話 政治面貌 婚宴狀況 民族 年齡 員工 潘慶強(qiáng)的畢業(yè)設(shè)計(jì) 《企業(yè)人事管理系統(tǒng)》 8 工資實(shí)體： 出勤實(shí)體： 基本工資 員工編號(hào) 所屬工資月份 ID 請(qǐng)假扣除 職務(wù)津貼 獎(jiǎng)勵(lì)總額 全勤獎(jiǎng) 加班費(fèi) 工資 部門名稱 部門電話 部門地址 部門經(jīng)理 部門編號(hào) 部門 潘慶強(qiáng)的畢業(yè)設(shè)計(jì) 《企業(yè)人事管理系統(tǒng)》 9 公出請(qǐng)假實(shí)體： 根據(jù)設(shè)計(jì)好的 e_r 圖在數(shù)據(jù)庫中創(chuàng)建各表，下面給出比較重要 的數(shù)據(jù)表結(jié)構(gòu)。 5) 人事調(diào)動(dòng)的詳細(xì)記錄 6) 添加修改出勤模塊、員工日常公 出、請(qǐng)假信息的添加、修改、刪除和查詢。潘慶強(qiáng)的畢業(yè)設(shè)計(jì) 《企業(yè)人事管理系統(tǒng)》 1 江蘇城市職業(yè)學(xué)院畢業(yè)論文 企 業(yè) 人 事 管 理 系 統(tǒng) 06 計(jì)算機(jī)應(yīng)用 /機(jī)電一體化 潘慶強(qiáng) 潘慶強(qiáng)的畢業(yè)設(shè)計(jì) 《企業(yè)人事管理系統(tǒng)》 2 隨碟附送地方 企業(yè)人事 管理系統(tǒng) 人事管理是所用工廠、公司、企事業(yè)單位所必須的，它包括人事檔案的統(tǒng)計(jì)、查詢、更新、打印輸出等、如果這些工作由人工統(tǒng)計(jì) ，則工作量很大，若公司人數(shù)有幾萬或者幾十萬，人工統(tǒng)計(jì)將變得不可想象，用計(jì)算機(jī)可以是人們從繁重的勞動(dòng)中解脫出來，僅一些簡單的操作即可及時(shí)、準(zhǔn)確的獲得需要的信息。 4) 自動(dòng)分配員工編號(hào)和部門編號(hào)。 2. 根據(jù)系統(tǒng)的要求，設(shè)計(jì)系統(tǒng)的功能模塊， 企 業(yè)人事管理系統(tǒng) 人事管理 部門管理 考勤管理 權(quán)限管理 福利管理 工資管理 窗口 添加員工信息 員工調(diào)動(dòng) 查詢員工信息 修改員工信息 添加部門信息 修改部門信息 考勤信息設(shè)置 員工公出請(qǐng)假 工資信息管理 工資導(dǎo)出 添加福利信息 修改福利信息 管理員任意操作 非管理員只讀操作 層疊 平鋪 排列圖標(biāo) 潘慶強(qiáng)的畢業(yè)設(shè)計(jì) 《企業(yè)人事管理系統(tǒng)》 4 系統(tǒng)預(yù)覽： 企業(yè)人事管理系統(tǒng)由多個(gè)窗體組成，下面介紹幾個(gè)典型的窗體： 登陸窗體 主窗體 潘慶強(qiáng)的畢業(yè)設(shè)計(jì) 《企業(yè)人事管理系統(tǒng)》 5 員工添加窗體 添加修改出勤記錄 潘慶強(qiáng)的畢業(yè)設(shè)計(jì) 《企業(yè)人事管理系統(tǒng)》 6 福利管理 工資管理 三：數(shù)據(jù)庫設(shè)計(jì)： 1. 數(shù)據(jù)庫的概要說明 本系統(tǒng)是為中小型企業(yè)服務(wù)的人事管理系統(tǒng)，考慮到系統(tǒng)在系統(tǒng)內(nèi)部 局域網(wǎng)的應(yīng)用，采用了 sql server 2021 作為該 系統(tǒng)的數(shù)據(jù)庫平臺(tái)。 下面時(shí)本系統(tǒng)中在 Module1 模塊中使用的一些公共變量和數(shù)據(jù)庫鏈接函數(shù)。 blnAddBM：用于添加修改部門信息的標(biāo)記， blnAddGCQJ 是修改公 出請(qǐng)假記錄的標(biāo)記， blnAddBX 是添加修改福利信息的標(biāo)記 3 聲明一個(gè)用于存儲(chǔ) 所屬工資月份的字符型公用變量，一個(gè)用于標(biāo)記日期對(duì)話框的整形變量。User ID=sa。平鋪?zhàn)哟绑w vbTileHorizontal End Sub Private Sub pltb_Click() 39。 1 picture 屬性，選擇自己設(shè)置好的圖片文件 2 屬性中找到 icon 屬性，選擇一個(gè)圖標(biāo) 3 為主窗體設(shè)置標(biāo)題 在屬性中找到 caption 屬性，潘慶強(qiáng)的畢業(yè)設(shè)計(jì) 《企業(yè)人事管理系統(tǒng)》 15 直接將其文本框中輸入“企業(yè)人事管理系統(tǒng)”。選擇工程部件命令，在部件中選擇， （ 2） 在窗體上添加一個(gè) imagelist 控件，用于存放工具欄按鈕上顯示的圖標(biāo)。鼠標(biāo)右鍵單擊 toolbar，在彈出的菜單中選擇屬性命令，打開 toolbar控件的屬性頁對(duì)話框。 (用戶名 ) Else MsgBox 請(qǐng)檢查用戶名或者密碼是否輸入正確 , , 溫馨提示 End If With MDIfrm_main If admin Then . = False . = False . = False . = False . = False . = False 潘慶強(qiáng)的畢業(yè)設(shè)計(jì) 《企業(yè)人事管理系統(tǒng)》 18 . = False . = False . = False . = False . = False . = False . = False . = False .(1).Enabled = False .(2).Enabled = False .(4).Enabled = False .(5).Enabled = False .(6).Enabled = False End If End With If admin Then (1).Enabled = False (2).Enabled = False (3).Enabled = False End If Unload Me 七 、添加員工信息的模塊設(shè)計(jì) 1 添加員工信息模塊概述 添加員工信息模塊用于將員工的基本信息 、單位先關(guān)信息以及 相片等保存到數(shù)據(jù)庫中。Integrated Security=SSPI。Data Source=NORTHWIND\SQLEXPRESS 2）將數(shù)據(jù)保存到數(shù)據(jù)表 （ 1）使用 recordset 對(duì)象的 addnew 方法添加記錄 Addnew 方法用于為可更新的 recordset 對(duì)象創(chuàng)建新記錄，直接使用即可。 數(shù)據(jù)表建立完之后，將用于存儲(chǔ)二進(jìn)制數(shù)據(jù)的字段設(shè)置成二進(jìn)制 binary，varbinary 和 image 的數(shù)據(jù)類型或是 ol