企業(yè)工資管理系統(tǒng)課程畢業(yè)論文-資料下載頁
2025-06-28 11:42本頁面
【正文】 Call Call (sql) = 統(tǒng)計結(jié)果列表 0 Unload MeElse MsgBox 這個月的工資未統(tǒng)計, vbOKOnly + vbExclamation, 提示End If選擇“工資信息管理”—“查詢工資”菜單，系統(tǒng)顯示如圖的查詢信息窗體，系統(tǒng)默認的是查詢出數(shù)據(jù)庫中所有的記錄（當管理員進入的時候），當從“員工編號”下拉列表中選擇一個員工編號后，單擊“查詢單人”按鈕，就會查詢出符合這個員工編號的記錄；如果需要返回查詢所有信息，單擊“查詢所有”按鈕，系統(tǒng)就會返回所有員工的信息。在“員工工資統(tǒng)計列表”中單擊鼠標右鍵，會彈出下圖的菜單，在“員工其他項目列表”中單擊鼠標右鍵也會出現(xiàn)下圖的菜單。如果要選擇“刪除基本工資設置”，出現(xiàn)如下的提示：具體的操作這里就不詳細介紹。選擇“工資信息管理”—“導出工資表”菜單，會出現(xiàn)下圖的“導出記錄”窗體中選擇需要導出工資的月份。選擇月份和保存位置后，單擊“導出”按鈕，系統(tǒng)會開始導出數(shù)據(jù)。單擊“確定”按鈕打開導出的文件，單擊“取消”按鈕回到系統(tǒng)。 導出的工資記錄 窗體的部分代碼為：If strusername = admin Then ’管理員的權限 sql = select stuffid from salarysetting Set rs = getrs(sql, salary) If = False Then While Not rs(0) Wend End If = 0 Select Case Case 0 sql = select * from salarysetting Call basictopic Call showbasic(sql) Case 1 sql = select * from salaryother Call othertopic Call showother(sql) Case 2 sql = select * from salarystatistics order by id desc Call listtopic Call showdata(sql) End Select Else ’ 用戶的權限 sql = select sid from stuffinfo where sname=39。 amp。 strusername amp。 39。 Set rs = getrs(sql, salary) While Not rs(0) Wend sd = rs(0) = 0 Select Case Case 0 sql = select * from salarysetting where stuffid=39。 amp。 sd amp。 39。 Call basictopic Call showbasic(sql) Case 1 sql = select * from salaryother where stuffid=39。 amp。 sd amp。 39。 Call othertopic Call showother(sql) Case 2 sql = select * from salarystatistics where stuffid=39。 amp。 sd amp。 39。 Call listtopic Call showdata(sql) End Select End IfEnd Sub 建立導出工資表窗體的時候，這是工資管理的最重要的一步。這個窗體中使用了CommondDialog控件，通過設置Flags屬性，使CommondDialog控件的對話框中顯示一個幫助按鈕，但是，程序員必須在這個位置提供相關的幫助主題。對于所有的公共對話框，當CancelError屬性為true，而且用戶單擊了對話框的“取消”按鈕時將生成一個錯誤?？梢栽陲@示對話框的同時捕獲此錯誤以檢驗是否按下了“取消”按鈕。這個控件可以顯示“打開”和“另存為”對話框，可以在打開對話框之前用Filter屬性指定在“文件類型”列表框中顯示的文件過濾器列表。這個窗體還引用了Microsoft Excel Object Library，目的是為了把建立的工資表導入到Excel表格中。這個窗體的制作是非常復雜的，尤其是從VB導入到表格中。建立導出工資表的窗體，當單擊“保存為”文本框右邊的按鈕，會提示用戶選擇保存路徑，然后單擊“導出”，會導到你所要保存的文件夾里。 6 結(jié)束語企業(yè)工資管理系統(tǒng)是一個典型的信息管理系統(tǒng)，其主要通過軟件工程方面的選擇課題、需求分析、總體設計、選用工具、程序模塊、系統(tǒng)測試等幾個步驟來實現(xiàn)。開發(fā)本系統(tǒng)的過程中，首先要對企業(yè)工資管理進行系統(tǒng)調(diào)研，熟悉企業(yè)財務、人事、工資發(fā)放管理的流程、步驟；其次在系統(tǒng)需求分析過程中，要透過現(xiàn)象看本質(zhì)，敏銳觀察到企業(yè)工資管理中存在的各種問題，并在總體設計把握好對問題的分析、理解，進而解決問題；選用開發(fā)工具要選用自己最熟悉、應用較多的開發(fā)工具，本系統(tǒng)開發(fā)選用MS Visual Basic ，其具有語言簡單、功能強大、組件眾多的優(yōu)點。程序模塊的編制中，重點把握系統(tǒng)內(nèi)部完整性、功能性、實用性、便捷性，使其能夠協(xié)調(diào)統(tǒng)一、運行無誤。運行結(jié)果證明，本企業(yè)工資管理系統(tǒng)極大提高了工作效率，節(jié)省了人力和物力，最終滿足企業(yè)財務管理、員工工資發(fā)放的需要，同時也成為現(xiàn)代化企業(yè)管理的標志參考文獻[1] 史斌星, Basic貫通教程[M].北京：清華大學出版,.[2] Basic 程序設計技能百練[M].中國鐵道出版社,.[3] Basic中文版入門與提高實用教程[M].中國鐵道出版社,.[4] Basic 數(shù)據(jù)庫項目案例導航[M].北京：清華大學出版社,.[5] Curtis Basic 數(shù)據(jù)庫編程[M].北京：清華大學出版社,.[6] Roger . 軟件工程—實踐者的研究方法. 機械工業(yè)出版社, 1999. 10.[7] FranceSo Basic 6 編程技術大全[M].機械工業(yè)出版社,.[8] 2000應用及實例錦集[M].人民郵電出
環(huán)評公示相關推薦
鄂ICP備17016276號-1