企業(yè)工資管理系統(tǒng)-資料下載頁
2025-08-10 02:12本頁面
【正文】 (管理員)這樣，可以在前臺輸入數(shù)據(jù)直接存到后臺的Access數(shù)據(jù)庫里的管理員表里面。可以很方便的實現(xiàn)用戶的管理。當(dāng)用戶添加一個用戶時，需要輸入當(dāng)前的管理員的用戶名和密碼，添加完成后，按【保存】按鈕還要對新添加的用戶進行密碼核對，以確保管理員的正確性。其保存代碼如下：Private Sub cmdsave_Click()If = Then MsgBox 用戶名不能為空！, vbCritical, 系統(tǒng)提示 Exit SubElseIf = Then MsgBox 密碼不能為空！, vbCritical, 系統(tǒng)提示 Exit SubElseIf = Then MsgBox 確認密碼不能為空！, vbCritical, 系統(tǒng)提示 Exit SubElseIf Then MsgBox 您兩次輸入的密碼不一致！, vbCritical, 系統(tǒng)提示 = = Exit SubEnd If(用戶名) = (密碼) = MsgBox 數(shù)據(jù)保存成功！, vbOKOnly, 系統(tǒng)提示 = = = = True = True = True = FalseEnd Sub而對于管理員的刪除，也應(yīng)該輸入當(dāng)前管理員的用戶名和密碼。當(dāng)刪除時，還應(yīng)該判斷是否只有一個。因為，管理員至少應(yīng)該存在一個，這樣才能對所有的數(shù)據(jù)進行操作。刪除代碼如下：Private Sub cmddelete_Click()Dim str1 As String, str2 As String, i As Integer, j As Integeri = If i = 1 Then MsgBox 該系統(tǒng)至少應(yīng)有一個管理員！, vbOKOnly, 系統(tǒng)提示 Exit SubEnd Ifstr1 = InputBox(請輸入您要刪除管理員的用戶名！, 對話框)For j = 1 To iIf (用戶名) = str1 Then str2 = InputBox(請輸入您要刪除管理員的密碼！, 對話框) If (密碼) = str2 Then MsgBox 數(shù)據(jù)刪除成功！, vbOKOnly, 系統(tǒng)提示 Exit Sub Else: MsgBox 您輸入管理員密碼不正確！, vbCritical, 系統(tǒng)提示 Exit Sub End IfElse: End IfNext jMsgBox 您輸入的當(dāng)前用戶不存在！, vbCritical, 系統(tǒng)提示End Sub經(jīng)過這樣一系列的設(shè)置后，對于管理員帳戶的添加，修改，保存和刪除便可以很方便的操作。 添加幫助窗體在VB中添加Form窗體，在屬性值窗口中的（名稱）框中改名為：Frmhelp1在Frmhelp1窗體中添加在添加的控件里面，設(shè)置標簽Label、框架Frame屬性值，然后在設(shè)置一系列的屬性值，設(shè)置完成后。圖 第五章 結(jié) 束 語通過本次畢業(yè)設(shè)計實踐，我不僅加深了對Visual Basic 程序設(shè)計工具的熟悉，加深了對Access 2000的認識；而且還學(xué)到了一些有關(guān)財務(wù)系統(tǒng)的開發(fā)方面的知識。體會了軟件開發(fā)的基本過程，這為我今后在該領(lǐng)域上的應(yīng)用奠定了基礎(chǔ)。在指導(dǎo)老師許院長的引導(dǎo)和幫助下，通過幾個多月的設(shè)計和開發(fā)，企業(yè)工資管理系統(tǒng)基本開發(fā)完畢。其功能基本符合用戶需求，能夠完成職工基本信息、工資輸入和統(tǒng)計。以及各類查詢的打印。并提供部分系統(tǒng)維護功能,使用戶方便進行數(shù)據(jù)備份和恢復(fù)、數(shù)據(jù)刪除。同時也考慮到了單位編碼以減少數(shù)據(jù)冗余的問題，對于數(shù)據(jù)的一致性的問題也通過程序進行了有效的解決。但是，在開發(fā)過程中，由于平時在軟件開發(fā)方面的實踐太少，因而重復(fù)工作太多。又由于時間和技術(shù)水平的限制，本軟件的部分功能還有不盡人意的地方，請老師和同學(xué)多提寶貴意見，以使我在今后的工作中進一步完善。我將不勝感激！參 考 文 獻[1] 趙振江、張二峰，Visual Basic 程序設(shè)計案例教程， 北京：人民郵電出版社.[2] 李禹生、廖明潮，Access 2000 應(yīng)用技術(shù)實訓(xùn)指導(dǎo)，北京：中國水利水電出版社.[3] 郭勝、夏邦貴，Visual Basic 數(shù)據(jù)庫開發(fā)入門與范例解析，北京：機械工業(yè)出版社.[4] 楊誠忠，中文版 Access 2000 快速入門教程，北京：航空工業(yè)出版社.[5] 郭琦，Visual Basic 數(shù)據(jù)庫系統(tǒng)開發(fā)技術(shù)，北京：人民郵電出版社.[6] 賈嵐，中文 Access 數(shù)據(jù)庫應(yīng)用教程——數(shù)據(jù)庫開發(fā)師，北京：北京希望電子出版社.[7] 于英杰，Visual Basic 數(shù)據(jù)庫開發(fā)與專業(yè)應(yīng)用，北京：國防工業(yè)出版社. 25
環(huán)評公示相關(guān)推薦
鄂ICP備17016276號-1