數(shù)據(jù)庫課程設(shè)計(jì)酒店管理系統(tǒng)(參考版)
2025-04-18 08:46本頁面
【正文】 33 / 33。所以，我覺得這次課程設(shè)計(jì)還是達(dá)到了我預(yù)定的目標(biāo)了。其次，在系統(tǒng)實(shí)現(xiàn)的時(shí)候，我又了解了許多以前不懂的VB知識，覺得很有成就感。 CStr()End SubPrivate Sub Adodc1_WillChangeRecord(ByVal adReason As , ByVal cRecords As Long, adStatus As , ByVal pRecordset As ) Dim bCancel As Boolean Select Case adReason Case adRsnAddNew Case adRsnClose Case adRsnDelete Case adRsnFirstChange Case adRsnMove Case adRsnRequery Case adRsnResynch Case adRsnUndoAddNew Case adRsnUndoDelete Case adRsnUndoUpdate Case adRsnUpdate End Select If bCancel Then adStatus = adStatusCancelEnd SubPrivate Sub Command3_Click() On Error GoTo RefreshErr Exit SubRefreshErr: MsgBox End SubPrivate Sub Command2_Click()Unload MeEnd SubPrivate Sub Command1_Click()Static t%Do While = FalseIf = Text3(0).Text Then If = Trim(Text3(1).Text) Then MsgBox 登陸成功, vbOKOnly + vbInformation, 登錄 authority = Val(Trim(Text3(2))) Exit Sub Else MsgBox 密碼錯誤, vbOKOnly + vbExclamation, 登錄 t = t + 1 If t = 3 Then MsgBox 不能再次登, vbOKOnly + vbExclamation, 登錄 End If Exit Sub End IfElseEnd IfLoopIf = True Then MsgBox 沒有這個(gè)用戶End Sub客房信息查詢：Private Sub Toolbar1_ButtonClick(ByVal Button As ) If (1).Enabled = True Then End IfEnd Sub參考文獻(xiàn)：王刪，：高等教育出版社，：清華大學(xué)出版社， 總結(jié)通過這次數(shù)據(jù)庫課程設(shè)計(jì)，我覺得自己學(xué)會很多東西。Dim t%Private Sub Form_Unload(Cancel As Integer) = vbDefaultEnd SubPrivate Sub Adodc1_Error(ByVal ErrorNumber As Long, Description As String, ByVal Scode As Long, ByVal Source As String, ByVal HelpFile As String, ByVal HelpContext As Long, fCancelDisplay As Boolean) MsgBox Data error event hit err: amp?？头繝顟B(tài)：1代表房間可用、2代表房間使用中、3代表維護(hù)中。事由：1代表出差、2代表旅游、3代表探親、4代表開會?？头繝顟B(tài)：1代表房間可用、2代表房間使用中、3代表維護(hù)中。系統(tǒng)幫助在一個(gè)窗口：幫助窗口，提供系統(tǒng)使用過程中用戶遇到困難查找需要的幫助內(nèi)容，用目錄查詢、引索查詢（關(guān)鍵字查詢）。系統(tǒng)管理l 用戶管理本模塊包含一個(gè)窗口：用戶管理窗體，擁有管理員權(quán)限的用戶能對系統(tǒng)的用戶進(jìn)行增添、刪除和修改，并且能對用戶賦予不同的權(quán)限。l 入住記錄查詢本模塊包含一個(gè)窗體：入住記錄查詢窗體，能對旅客的入住記錄進(jìn)行詳細(xì)的查詢，能以旅客號、入住日期等不同的查詢條件進(jìn)行查詢，查詢后返回的結(jié)果能以報(bào)表的形式打印出來。例如：客房是否能夠使用，是否正在維護(hù)中。l 旅客的換房登記本模塊包含一個(gè)窗體：旅客換房登記窗體，當(dāng)旅客入住后要更換房間時(shí)，主要記錄旅客換房前的客房號、客房類型、換房日期和換房后的客房號和客房類型。l 旅客入住登記本模塊至少包含兩個(gè)窗體：旅客信息登記窗體、入住記錄登記窗體旅客信息登記主要是當(dāng)旅客入住時(shí)對旅客一些基本信息的記錄，以便需要的時(shí)候進(jìn)行查詢。旅客信息登記是在旅客預(yù)約客房時(shí)，對旅客的詳細(xì)信息進(jìn)行登記以便在入住的時(shí)候更方便登記自動入住。l 用戶信息維護(hù)該模塊包含一個(gè)窗體：用戶信息維護(hù)窗體，用戶登陸后能對自己的一些信息進(jìn)行維護(hù)。圖51系統(tǒng)功能結(jié)構(gòu)圖圖52前臺操作功能細(xì)分圖53數(shù)據(jù)
公司管理相關(guān)推薦
鄂ICP備17016276號-1