vbaccess數(shù)據(jù)庫應(yīng)用課程設(shè)計貿(mào)易公司管理信息系統(tǒng)總報告-資料下載頁
2025-05-29 22:49本頁面
【正文】 庫中的數(shù)據(jù)，限于時間，本系統(tǒng)僅創(chuàng)建了用戶登錄窗體和用戶信息編輯窗體。下面分別進行介紹。 本系統(tǒng)設(shè)計的登錄窗體專門用于系統(tǒng)管理員使用，管理員通過用戶姓名和密碼登錄，登錄成功后，登錄成功后將進入用戶管理窗體，通過該窗體就可以查詢和編輯用戶信息。登錄窗體設(shè)計見如圖51所示： 圖61 用戶登錄窗體用戶登錄窗體的主要代碼:Option ExplicitDim t As Integer 39。記錄確定次數(shù)Private Sub Form_Load()t = 0End SubPrivate Sub cmdCancle_Click() Unload MeEnd Sub Private Sub cmdOK_Click()Dim sql As StringDim rs_login As New Dim conn As New Dim txtusername As String provider=。 data source= amp。 amp。 If Trim() = Then MsgBox 用戶名不能為空，請重新輸入！ Else sql = select * from 用戶和密碼 where 姓名=39。 amp。 Trim() amp。 39。 sql, conn, adOpenKeyset, adLockOptimistic If = True Then MsgBox 沒有這個用戶,請重輸入！, vbOKOnly + vbExclamation, = Else txtusername = If Trim((1)) = Trim() Then Unload Me 39。MsgBox 登錄成功 Else MsgBox 密碼不正確,請重輸入！, vbOKOnly + vbExclamation, = End If End If End If t = t + 1 If t = 3 Then Unload Me End IfEnd Sub用戶信息瀏覽與編輯窗體使用Adodc控件與數(shù)據(jù)庫建立連接，使用DataGrid控件瀏覽和編輯用戶信息，使用命令按鈕添加、修改和刪除用戶信息.，窗體設(shè)計操作界面見圖62所示: 圖62 編輯窗體圖窗體中對象的屬性見表61。nameCaption其他屬性Command1添加Command2更新Command3刪除Command4保存表61 窗體屬性表主要代碼:Private Sub Command1_Click()End SubPrivate Sub Command2_Click() 39。更新數(shù)據(jù)庫數(shù)據(jù) MsgBox 保存成功, vbInformation, 恭喜 = TrueEnd SubPrivate Sub Command3_Click()MsgBox 刪除成功, vbInformation, End SubPrivate Sub Command4_Click() 39。更新數(shù)據(jù)庫數(shù)據(jù) MsgBox 更新成功, vbInformation, 恭喜 = TrueEnd Sub 總結(jié)通過本此課程設(shè)計，讓我們更進一步地掌握了《數(shù)據(jù)庫應(yīng)用》課程的相關(guān)知識，熟悉了創(chuàng)建數(shù)據(jù)庫管理系統(tǒng)的全過程。熟練地掌握了運用SQL語言和視圖創(chuàng)建基本表、選擇查詢、參數(shù)查詢、生成表查詢、追加查詢的方法，同時也熟練地掌握了創(chuàng)建用戶窗體、報表和宏對象的方法。本系統(tǒng)創(chuàng)建的后臺數(shù)據(jù)庫能夠獨立運行，并滿足用戶對數(shù)據(jù)庫管理的各種需求。為了拓展我們的視野，并使用這些知識創(chuàng)建了用戶登錄窗體和基本圖書管理窗體，通過這些窗體實現(xiàn)用戶對數(shù)據(jù)庫的管理。經(jīng)過程序調(diào)試，前臺系統(tǒng)運行良好。在數(shù)據(jù)庫的設(shè)計過程中，我們遇到了種種困難，比如ER圖的確定，每一個問題的解決都加深了我們對數(shù)據(jù)庫的了解。不過，由于專業(yè)知識的限制，我們所制作的貿(mào)易公司管理信息系統(tǒng)仍然存在一些問題，如系統(tǒng)缺少計算功能，今后需要進一步學(xué)習(xí)，完善系統(tǒng)的功能。致謝感謝鄭玲利老師平時對我們的教導(dǎo)，此次課程設(shè)計，老師幫助了我們很多，在此感謝老師對我們的悉心教導(dǎo)。老師對工作的負責(zé)深深地影響了我們?nèi)M成員，使我們在不知不覺中全心投入了課程設(shè)計，盡自己最大的努力把系統(tǒng)做得更好。參考文獻 [1] [M].北京：清華大學(xué)出版社，.[2] ：清華大學(xué)出版社
高考資料相關(guān)推薦
鄂ICP備17016276號-1