【正文】 第 23頁(yè) 刪除數(shù)據(jù)代碼： Private Sub DataDel() 39。保存當(dāng)前各個(gè)輸入框的值 FBmmc = Trim() FBz = Trim() = 0 39。 39。 and 部門名稱 =39。先在對(duì)應(yīng)的文本框中輸入要進(jìn)行數(shù)據(jù)查詢的條件，輸入完查詢條件后，點(diǎn)擊查詢按鈕進(jìn)行確定，系統(tǒng)便會(huì)查詢出滿足條件的部門記錄，并列到數(shù)據(jù)表格中，無滿足條件的部門記錄時(shí)，則彈出對(duì)話框提示“查無此記錄！”。進(jìn)行數(shù)據(jù)表格控件的更新 Dim i As Integer Dim j As Integer Dim FBmbh As String Dim FBmmc As String Dim FBz As String FBmbh = Trim() 39。用戶登錄到系統(tǒng)后進(jìn)入的就是該界面，所有功能一目了然。 \酒店人事工資管理系統(tǒng) .mdb 39。 用戶登陸 是否管理員 是否錄入數(shù)據(jù) 是否修改數(shù)據(jù) 錄入數(shù)據(jù) 修改數(shù)據(jù) 是否進(jìn)行 查詢 輸入查詢條件 是否刪除數(shù)據(jù) 刪除數(shù)據(jù) 退出系統(tǒng) 12 酒店人事工資管理系統(tǒng) 第 12頁(yè) 、數(shù)據(jù)庫(kù)設(shè)計(jì) 在 Access 2021 數(shù)據(jù)庫(kù)中創(chuàng)建表 ： 根據(jù)設(shè)計(jì)要求，需要 5 個(gè)數(shù)據(jù)表：部門基本情況表 、 職工基本信息表 、 職工考勤信息表 、 職工工資信息表 、 口令信息表。 *對(duì)其提供的人員資料情況進(jìn)行添加、查詢、修改和刪除操作。 本次的開發(fā)內(nèi)容 —— 酒店人事工資管理系統(tǒng)就是信息管理與現(xiàn)代化辦公設(shè)備相結(jié)合的例子。 *對(duì)其提供的人員資料情況進(jìn)行添加、查詢、修改和刪除操作。 本次的開發(fā)內(nèi)容 —— 酒店人事工資管理系統(tǒng)就是信息管理與現(xiàn)代化辦公設(shè)備相結(jié)合的例子。 Visual Basic作為應(yīng)用程序的開發(fā) “ 利器 ” 也表現(xiàn)在數(shù)據(jù)庫(kù)應(yīng)用程序的開發(fā)上，它良好的界面和強(qiáng)大的控件功能使數(shù)據(jù)庫(kù)編程變得簡(jiǎn)單多了。 論文主要介紹了本課題的開發(fā)背景，所要完成的功能和開發(fā)的過程。 作為計(jì)算機(jī)應(yīng)用的一部分 ,使用計(jì)算機(jī)對(duì)人事信息進(jìn)行管理 ,具有著手工管理所無法比擬的優(yōu)點(diǎn) .例如 :檢索迅速、查找方便、可靠性高、存儲(chǔ)量大、保密性好、壽命長(zhǎng)、成本低等。這些優(yōu)點(diǎn)能夠極大地提高人事管理的效率 ,也是酒店的科學(xué)化、正規(guī)化管理 ,與世界接軌的重要條件。重點(diǎn)的說明了系統(tǒng)設(shè)計(jì)的重點(diǎn)、設(shè)計(jì)思想、難點(diǎn)技術(shù)和解決方案。 Visual Basic 提供了強(qiáng)有力的數(shù)據(jù)庫(kù)存取能力，將 Windows 的各種先進(jìn)特性與強(qiáng)大的數(shù)據(jù)庫(kù)管理功能有機(jī)地結(jié)合在一起。開發(fā)本系統(tǒng)希望使人事管理人員可以從年復(fù)一年的輸入、計(jì)算、統(tǒng)計(jì)等工作中解脫出來，由于人事方面的數(shù)據(jù)眾多，輸入、統(tǒng)計(jì)極為不便，輸入量大，計(jì)算量大。 *對(duì)其提供的人員考勤資料情況進(jìn)行添加、查詢、修改和刪除 操作，并可按考勤月份進(jìn)行分類。開發(fā)本系統(tǒng)希望使人事管理人員可以從年復(fù)一年的輸入、計(jì)算、統(tǒng)計(jì)等工作中解脫出來，由于人事方面的數(shù)據(jù)眾多，輸入、統(tǒng)計(jì)極為不便，輸入量大，計(jì)算量大。 *對(duì)其提供的人員考勤資料情況進(jìn)行添加、查詢、修改和刪除操作，并可按考勤月份進(jìn)行分類 。這 5 個(gè)數(shù)據(jù)表的結(jié)構(gòu)如下各表： (1)部門基本情況表 字段名稱 數(shù)據(jù)類型 長(zhǎng)度 主鍵 允許空 部門編號(hào) 文本 6 True 否 部門 名稱 文本 30 是 備注 文本 255 是 (2)職工基本信息表 字段名稱 數(shù)據(jù)類型 長(zhǎng)度 主鍵 允許空 職工編號(hào) 文本 6 否 職工姓名 文本 10 否 性別 文本 2 是 出生日期 日期 /時(shí)間 短日期 否 民族 文本 10 是 政治面貌 文本 10 是 最后學(xué)歷 文本 10 是 所學(xué)專業(yè) 文本 20 是 聯(lián)系電話 文本 20 是 畢業(yè)學(xué)校 文本 30 是 籍貫 文本 50 是 家庭住址 文本 50 是 進(jìn)入公司時(shí)間 日期 /時(shí)間 短日期 否 部門名稱 文本 30 是 職務(wù)名稱 文本 30 是 備注 文本 255 是 (3)職工考勤信息表 字段名稱 數(shù)據(jù)類型 長(zhǎng)度 主鍵 允許空 職工編號(hào) 文本 6 是 職工姓名 文本 10 是 考勤日期 文本 6 否 部門名稱 文本 50 是 出勤天數(shù) 數(shù)字 整型 是 假日加班 數(shù)字 整型 是 其它加班 數(shù)字 整型 是 13 酒店人事工資管理系統(tǒng) 第 13頁(yè) 出差天數(shù) 數(shù)字 整型 是 補(bǔ)休天數(shù) 數(shù)字 整型 是 請(qǐng)假次數(shù) 數(shù)字 整型 是 曠工天數(shù) 數(shù)字 整型 是 遲到次數(shù) 數(shù)字 整型 是 早退 次數(shù) 數(shù)字 整型 是 備注 文本 255 是 (4)職工工資信息表 字段名稱 數(shù)據(jù)類型 長(zhǎng)度 主鍵 允許空 職工編號(hào) 文本 6 是 職工姓名 文本 10 是 計(jì)發(fā)日期 文本 6 否 部門名稱 文本 50 是 底薪 數(shù)字 單精度型 是 獎(jiǎng)金 數(shù)字 單精度型 是 補(bǔ)貼 數(shù)字 單精度型 是 加班費(fèi) 數(shù)字 單精度型 是 房帖費(fèi) 數(shù)字 單精度型 是 扣考核 數(shù)字 單精度型 是 養(yǎng)老金 數(shù)字 單精度型 是 醫(yī)療保險(xiǎn) 數(shù)字 單精度型 是 住房公積金 數(shù)字 單精度 型 是 稅前小計(jì) 數(shù)字 單精度型 是 所得稅 數(shù)字 單精度型 是 實(shí)發(fā)工資 數(shù)字 單精度型 是 (5)口令信息表 字段名稱 數(shù)據(jù)類型 長(zhǎng)度 主鍵 允許空 用戶名 文本 20 是 密碼 文本 10 是 權(quán)限 文本 6 是 14 酒店人事工資管理系統(tǒng) 第 14頁(yè) 第四章 詳細(xì)設(shè)計(jì)工作 數(shù)據(jù)模塊的創(chuàng)建 將數(shù)據(jù)庫(kù)連接、數(shù)據(jù)表和數(shù)據(jù)源等運(yùn)行期不可見的組件都放在窗體設(shè)計(jì)界面上，雖然在調(diào)用時(shí)比較直觀，但卻為界面布局設(shè)計(jì)帶來的麻煩，而且也不利于數(shù)據(jù)的統(tǒng)一管理。確定數(shù)據(jù)庫(kù)位置 Dim rc As New 39。當(dāng)不同權(quán)限的用戶登錄到該界面時(shí)功能有所不同，其控制由“用戶登錄”界面控制。保存當(dāng)前各個(gè)輸入框的值 FBmmc = Trim() FBz = Trim() = 0 39。 查詢代碼： Private Sub DataFind() 39。 amp。 If SQL Then SQL = select * from 部門基本情況 where 部門編號(hào) 39。寫入表頭標(biāo)題 = 1: = 部門編號(hào) = 2: = 部 門 名 稱 = 3: = 備 注 SQL = SQL amp。數(shù)據(jù)刪除 Dim DelSQL As String Dim YesNo As Integer Dim SQL As String SQL = select * from 部門基本情況 If = 1 Then SQL, Cnndb, 3, 2 If 0 Then YesNo = MsgBox(真的要?jiǎng)h除表格里滿足條件的所有記錄嗎？ , vbYesNo + vbQuestion) If YesNo = vbYes Then DelSQL = If Then DelSQL = DelSQL amp。 Trim() amp。39。在此窗體中輸入的信息都進(jìn)過合法性檢測(cè)，判斷職工編號(hào)是否出現(xiàn)重復(fù)，位數(shù)是否為 6 位（前兩位為部門編號(hào)，后四位為職工自25 酒店人事工資管理系統(tǒng) 第 25頁(yè) 身編號(hào)）等。對(duì)職工 工資進(jìn)行按月分組，計(jì)算職工各種工資項(xiàng)目和個(gè)人所得稅款等一些信息。 2 用戶管理 28 酒店人事工資管理系統(tǒng) 第 28頁(yè) 該功能只針對(duì)管理員有效，用于對(duì)所有權(quán)限用戶口令的管理。在該系統(tǒng)開發(fā)中我通過建立數(shù)據(jù)庫(kù)，以及對(duì)各種信息庫(kù)的開發(fā)（如：添加、查詢、修改、刪除資料）及設(shè)計(jì)系統(tǒng)維護(hù)安全部分，完成了此次對(duì)酒店人事工資管理系統(tǒng)的設(shè)計(jì)。 同時(shí)，在這次的系統(tǒng)開發(fā)中我也看到了自己在新知識(shí)的學(xué)習(xí)，新工 具的應(yīng)用方面的不足。我想，在今后的學(xué)習(xí)和工作中，我將針對(duì)這些發(fā)現(xiàn)的問題，不斷努力和提高自身各方面的素質(zhì)，為社會(huì)作出自己應(yīng)有的貢獻(xiàn) 本酒店人事工資管理系統(tǒng)的順利完成，還要感謝王忠軍老師的大力幫助與細(xì)心指導(dǎo) ！ 32 酒店人事工資管理系統(tǒng) 第 32頁(yè) 參考文獻(xiàn) [1] 襲沛曾，陸慰民 ，楊志強(qiáng) . Visual Basic 程序設(shè)計(jì)教程（ 版） . 高等教育出版社 . 2021 年 [2] 肖 建 ，薛鳳武 ， 吳靜 . Visual Basic 基礎(chǔ)教程 . 中國(guó)電力出版社 . 2021 年 [3] 張大年， 廖智勇 ，劉檢鋒 . Visual Basic 數(shù)據(jù)庫(kù)應(yīng)用開發(fā)與實(shí)例 . 清華大學(xué)出版社 . 2021 年 [4] 楊宗志 . Visual Basic 數(shù)據(jù)庫(kù)程序設(shè)計(jì) . 清華大學(xué)出版社 . 2021 年 [5] 陳豫龍， 何旭洪 . Visual Basic 數(shù)據(jù)庫(kù)開發(fā)實(shí)例導(dǎo)航 人民郵電出版社 . 2021 年 [6] Visual Basic 時(shí)尚編程百例 機(jī)械工業(yè) 出版社 . 2021 年 [7] 飛思科技產(chǎn)品研發(fā)中心 . Access 2021 數(shù)據(jù)處理技術(shù) 電子工業(yè)出版社 2021 年 33 酒店人事工資管理系統(tǒng) 第 33頁(yè)