酒店人事工資管理系統—畢業設計論文(存儲版)

　　

【正文】 職務名稱 文本 30 是 備注 文本 255 是 (3)職工考勤信息表 字段名稱 數據類型 長度 主鍵 允許空 職工編號 文本 6 是 職工姓名 文本 10 是 考勤日期 文本 6 否 部門名稱 文本 50 是 出勤天數 數字 整型 是 假日加班 數字 整型 是 其它加班 數字 整型 是 13 酒店人事工資管理系統 第 13 頁 出差天數 數字 整型 是 補休天數 數字 整型 是 請假次數 數字 整型 是 曠工天數 數字 整型 是 遲到次數 數字 整型 是 早退 次數 數字 整型 是 備注 文本 255 是 (4)職工工資信息表 字段名稱 數據類型 長度 主鍵 允許空 職工編號 文本 6 是 職工姓名 文本 10 是 計發日期 文本 6 否 部門名稱 文本 50 是 底薪 數字 單精度型 是 獎金 數字 單精度型 是 補貼 數字 單精度型 是 加班費 數字 單精度型 是 房帖費 數字 單精度型 是 扣考核 數字 單精度型 是 養老金 數字 單精度型 是 醫療保險 數字 單精度型 是 住房公積金 數字 單精度 型 是 稅前小計 數字 單精度型 是 所得稅 數字 單精度型 是 實發工資 數字 單精度型 是 (5)口令信息表 字段名稱 數據類型 長度 主鍵 允許空 用戶名 文本 20 是 密碼 文本 10 是 權限 文本 6 是 14 酒店人事工資管理系統 第 14 頁 第四章 詳細設計工作 數據模塊的創建 將數據庫連接、數據表和數據源等運行期不可見的組件都放在窗體設計界面上，雖然在調用時比較直觀，但卻為界面布局設計帶來的麻煩，而且也不利于數據的統一管理。確定數據庫位置 Dim rc As New 39。當不同權限的用戶登錄到該界面時功能有所不同，其控制由“用戶登錄”界面控制。保存當前各個輸入框的值 FBmmc = Trim() FBz = Trim() = 0 39。 查詢代碼： Private Sub DataFind() 39。 amp。 If SQL Then SQL = select * from 部門基本情況 where 部門編號 39。寫入表頭標題 = 1: = 部門編號 = 2: = 部 門 名 稱 = 3: = 備 注 SQL = SQL amp。數據刪除 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(真的要刪除表格里滿足條件的所有記錄嗎？ , vbYesNo + vbQuestion) If YesNo = vbYes Then DelSQL = If Then DelSQL = DelSQL amp。 Trim() amp。39。在此窗體中輸入的信息都進過合法性檢測，判斷職工編號是否出現重復，位數是否為 6 位（前兩位為部門編號，后四位為職工自25 酒店人事工資管理系統 第 25 頁 身編號）等。對職工 工資進行按月分組，計算職工各種工資項目和個人所得稅款等一些信息。 2 用戶管理 28 酒店人事工資管理系統 第 28 頁 該功能只針對管理員有效，用于對所有權限用戶口令的管理。檢測輸入口令的次數 Dim DLYongHuMing As String Dim DLQuanXian As String Private Sub DataSave() 39。 ) SQL = SQL amp。 amp。 SQL = SQL amp。39。39。 amp。 39。 QuanXian End Sub Private Sub Men_Bjkqxx_Click() 編輯考勤信息 .Height = 8685 編輯考勤信息 .Width = 10290 編輯考勤信息 .Show 編輯考勤信息 .SetFocus (1).Text = 狀態：編輯考勤信息 amp。 Dim Cmdsize As Integer 39。 amp。 39。39。 ) (SQL) End Sub Private Sub DataFind() 39。 DLYongHuMing amp。 SQL = SQL amp。 ,用戶名 SQL = SQL amp。 圖 29 酒店人事工資管理系統 第 29 頁 源代碼： 1 用戶登陸 Dim rc As New 39。 1 密碼設置 該界面比較簡單，能讓登陸的用戶修改自己的密碼，但不能更改用戶名，此項對所有權限的用戶都適用。并能根據部門名稱、考勤日期進行職工考勤信息查詢。 1編輯職工信息 作為編輯職工信息這一項，所實現的功能是對 公司職工資料信息的存儲與編輯，方便對職工的分類與管理。 39。 and 部門名稱 =39。由于刪除記錄不可能在大量的數據中盲目的尋找，因此數據刪除也有數據查找功能，先在對應的文本框中輸入要進行數據刪除的條件，再按刪除按鈕，系統便會列出滿足刪除條件的部門記錄，并提示是否刪除滿足條件的全部部門記錄，也可以一條一條刪除部門記錄，只要在數據表格中選中要刪除的部門記錄，在按一下刪除按鈕即可刪除數據。進行數據表格控件的修改 Dim i As Integer Dim j As Integer Dim FBmbh As String Dim FBmmc As String Dim FBz As String FBmbh = Trim() 39。 Trim() amp。 If Then SQL = SQL amp。恢復當前各個輸入框的值 = FBmmc = FBz 20 酒店人事工資管理系統 第 20 頁 (2)數據查詢 當操作員需要對某個部門進行查詢時，可以在編輯部門信息窗體下部中找到查詢按鈕。 添加代碼設置如下： Private Sub DataFresh(SQL As String) 39。 根據系統模塊結構，建立系統主界面。 amp。本次設計選擇了 Access 2021 作為后臺數據庫，利用 Visual Basic 6 提供的數據庫開發平臺開發前臺部分。 *對其提供的部門資料情況進行添加、查詢、修改和刪除操作。這在一定程度上能夠節省人力物力，同時也大大加強了對數據處理的及時性和準確性。 *對其提供的部門資料情況進行添加、查詢、修改和刪除操作。這在一定程度上能夠節省人力物力，同時也大大加強了對數據處理的及時性和準確性。 Access 與許多優秀的關系數據庫一樣，可以讓你很容易地連接相關的信息而且還對其他的數據庫系統有所補充。 整個系統從符合操作簡便、界面友好、靈活、實用、安全的要求出發。 隨著科學技術的不斷提高 ,計算機科學日漸成熟 ,其強大的功能已為人們深刻認識 ,它已進入人類社會的各個領域并發揮著越來越重要的作用。 因此，開發這樣一套管理軟件成為很有必要的事情 ,在下面的各章中我們將以開發一套酒店人事工資管 理系統為例 ,談談其開發過程和所涉及到的問題及解決方法。 關鍵字 Visual Basic Access2021 控件 窗體 域 Abstract The system of managing census register file is a typical application of managing information system （ know as MIS） ,which mainly includes building up database of backend and developing the application interface of frontend. The former required consistency and integrality and security of data. The later should make the application powerful and easily used. By looking up lots of datum, we selected Visual Basic presented by Microsoft because of its objective tools in Win32. VB offered a series of ActiveX 3 酒店人事工資管理系統 第 3 頁 operating a database. It can give you a shortcut to build up a prototype of system application. The prototype could be modified and developed till users are satisfied with it. Key Word Visual Basic 、 Access202 ActiveX、 Form、 Field 4 酒店人事工資管理系統 第 4 頁 目 錄 前言 ........................................................................................................................................................ 2 摘要 ........................................................................................................................................................ 2 第一章 導論 .............................................................................................