【正文】 管理 職位信息管理 班 次 系統(tǒng)維護(hù) 系統(tǒng)維護(hù) 用戶管理 用戶管理 密碼管理 背景設(shè)置 退 出 江蘇建筑職業(yè)技術(shù)學(xué)院畢業(yè)設(shè)計說明書 14 考勤查詢 對員工考勤信息上下班的管理，以及對出差、請假信息的添加、修改、刪除等信息的更新如圖 53 所示 圖 53 考勤查詢功能圖 考核查詢 對員工考核統(tǒng)計，考核明細(xì)的統(tǒng)計，對員工信息，考勤信息的查詢，如圖 54 圖 54 考核查詢功能圖 考核查詢 考 核 統(tǒng) 計 考 核 明 細(xì) 員工信息查詢 考勤信息查詢 考勤查詢 考勤查詢 出 差 管 理 請 假 管 理 考 勤 管 理 江蘇建筑職業(yè)技術(shù)學(xué)院畢業(yè)設(shè)計說明書 15 第 6 章 系統(tǒng)設(shè)計 登陸模塊 用戶登陸界面，輸入用戶名及密碼登陸主界面 如圖 61，本登錄界面主要運用了txtbox， label控件，輸入用戶名和密碼后會登錄到主界面，如果用戶名不對，則會提示重新輸入賬號。39。39。39。判斷密碼是否為空 MsgBox 請輸入密碼！ , vbOKOnly + vbExclamation, 警告 Exit Sub End If 39。判 斷是否有這個用戶 txtSql = select * from 用戶信息表 where 用戶名稱 = 39。 amp。 If Then txtSql, CN, adOpenStatic, adLockOptimistic If = True Then 39。如果沒有這個用戶 MsgBox 沒有這個帳號，請重新輸入帳號 !, vbOKOnly + vbExclamation, 警告 = = Else 39。如果有用戶 If Trim((1)) = Trim() Then 39。判斷權(quán)限 UserPrivs = If Trim((2)) = 管理員 Then 39。管理員權(quán)限 IsUserMode = 1 ElseIf Trim((2)) = 普通用戶 Then 39。普通用戶權(quán)限 IsUserMode = 2 Else 39。無權(quán) IsUserMode = 0 MsgBox 你沒有權(quán)限 !, vbExclamation, 警告 End End If UserPrivs = Trim((2)) UserName = Trim() Unload Me Exit Sub Else MsgBox 輸入密碼不正確，請重新輸入！ , vbOKOnly + vbExclamation, 警告 = End If End If miCount = miCount + 1 If miCount = 3 Then 39。三次錯誤 ,自動退出程序 End End If 江蘇建筑職業(yè)技術(shù)學(xué)院畢業(yè)設(shè)計說明書 17 Exit Sub Err: MsgBox 登錄出錯 ,請找管理員 !, vbExclamation Ok = False End End Sub Private Sub Form_Activate() End Sub Private Sub Form_Load() On Error GoTo Err 39。連數(shù)據(jù)庫代碼 If Then = Provider=。Persist Security Info=False。 江蘇建筑職業(yè)技術(shù)學(xué)院畢業(yè)設(shè)計說明書 18 圖 62 主界面 用戶管理 可以添加用戶，更改用戶權(quán)限，更改密碼，刪除用戶如圖 63所示 ，本界面主要運用了textbox,frame,label 等控件，來實現(xiàn)添加用戶，刪除用戶，選擇權(quán)限的功能。 圖 64 用戶密碼管理 員工信息管理 用于更改員工的姓名，性別，郵編，地址，電話，專業(yè)等等 如圖 65所示 ，次界面可以輸入員工的一些基本信息，有管理員登陸，進(jìn)行對員工信息的修改，增加和刪除，以確保員工信息的及時更新，是員工查看信息時可以瀏覽的最新的信息。 圖 66 部門信息管理 出差信息管理 對出差的員工的情況進(jìn)行添加，修改，瀏覽，刪除等 如圖 67，這個界面主要是對員工出差時所做的一個記錄，便于公司管理層查看員工的出差情況。在系統(tǒng)正式交付運行前，一般需要做系統(tǒng)測試，來檢測系統(tǒng)是否符合預(yù)期開發(fā)的目標(biāo)、產(chǎn)品的使用是否方便、產(chǎn) 品的穩(wěn)定性是否良好、產(chǎn)品在運行過程中是否會出現(xiàn)錯誤。 測試方法 測試任何產(chǎn)品都有兩種方法：如果已經(jīng)知道了產(chǎn)品應(yīng)該具有的功能，可以通過測試來檢驗是否每個功能正常使用；如果知道了產(chǎn)品的內(nèi)部工作過程，可以通過測試來檢測產(chǎn)品內(nèi)部動作是否按照說明書的規(guī)定正常工作。 在測試本系統(tǒng)時，采用的是黑盒測試來設(shè)計測試用例，而且在測試過程中，邀請很多同學(xué)和老師對系統(tǒng)的功能進(jìn)行測試。下面列舉主要的測試準(zhǔn)則： 所有的測試都應(yīng)該追溯到用戶需求。 應(yīng)該從“小模塊”測試開始，并逐步進(jìn)行“大模塊”測試。 為了達(dá)到最佳的測試效果，應(yīng)該由獨立的第三方從事測試工作。本系統(tǒng)能夠完成添加 、 修改 、 刪除 、 查詢等功能，可以監(jiān)督到員工平時的上班情況，上的班次等等， 通過這次課程設(shè)計， 我們深刻體會到要做好一個完整的事情，需要有系統(tǒng)的思維方式和方法，對待一個新的問題，要耐心、要善于運用已有的資源來充實自己。同時，使我對 VB 和 SQL2020 有了更加深刻的認(rèn)識，積累了使用軟件工程的思想來開發(fā)軟件的經(jīng)驗，同時最重要的是摸索出了一套考慮問題和解決問題的方法，使我們受益匪淺。 系統(tǒng)的不足和未來的計劃 總的來說，在這次的畢業(yè)設(shè)計種遇到了不少的問題，部分得 到了很好的解決，但也有少部分遺留的問題。以前雖然也有過做設(shè)計系統(tǒng)這塊，但大都是和同學(xué)一起討論，研究，第一次是自己從頭到尾的想設(shè)計題目中所遇到的問題，并寫了很多覺得自己能夠?qū)崿F(xiàn)的功能，但結(jié)果往往是事與愿違，很多功能因個人能力有限，并沒有設(shè)計出來，有的功能雖說做出來了，但是都存在著很多的缺點，有的并沒有多大的實用價值，無法應(yīng)用到這個功能，顯得很繁瑣， 這是我需要加強改進(jìn)的地方。 最后就是從一而終的問題了，在開發(fā)過程中我遇到了許許多多的問題，很多地方都不明白，經(jīng)常有打退堂鼓的想法，所以會經(jīng)常請教同學(xué)和王琛老師，最后的成果雖然不很完美，但我盡力了，并有所收獲。從設(shè)計選題到中期開發(fā)直到最后的設(shè)計成果展示，王老師始終本著嚴(yán) 謹(jǐn)?shù)闹螌W(xué)態(tài)度、高度的探索精神來督促我完成本次題目。 其次，要感謝其它各位老師、同學(xué)的熱心幫助。在此，要感謝他們。 通過本次的畢業(yè)設(shè)計。并且逐漸掌握了學(xué)習(xí)新鮮知識，掌握新鮮事物的能力。 江蘇建筑職業(yè)技術(shù)學(xué)院畢業(yè)設(shè)計說明書 24 參考文獻(xiàn) [1]劉昊 ， 張建軍 ， Visual Basic 程序設(shè)計 ， 北京煤炭工業(yè)出版社 ， 2020 [2]譚浩強 ， Visual Basic 中文版提高與應(yīng)用 ， 電子工業(yè)出版社 ， [3]杜兆將 ， SQL Server 數(shù)據(jù)庫管理與開發(fā)教程與實訓(xùn)（第二版） ， 北京大學(xué)出版社 ， 2020 [4]郭勝 ， 計算機網(wǎng)絡(luò) ， 北京清華大學(xué)出版社 ， 2020. [5]丁學(xué)鈞 ， 溫秀梅 ， Visual Basic 語言程序設(shè)計 ， 北京清華大學(xué)出版社 ， 2020 [6]尚俊杰 ， 網(wǎng)絡(luò)程序設(shè)計基礎(chǔ) ， 北京交通大學(xué)出版社 ， 2020 [7]郭鮮鳳 ， 郭翠英 ， SQL Server數(shù)據(jù)庫應(yīng)用開發(fā)技術(shù) ， 北京大學(xué)出版社 ， 2020