正文內容

數據庫課程設計-酒店管理信息系統-資料下載頁

2026-04-06 12:12本頁面

　　

【正文】 fyroom的Click事件,程序判斷為修改狀態后，首先刪除原有記錄，然后把新內容加入到數據庫中 Dim intCount As Integer If flagRedit Then ‘判斷記錄窗體是否打開 If 1 Then‘判斷客房信息列表內容是否為空 gintRmode=2‘設置為修改狀態　　　　 intCount=‘紀錄當前記錄位置=”select*from rooms where roomNO=’”amp。Trim((intCount,1))amp。”’” Else Call menuAddroom_Click‘添加記錄　　　End If Else =”select*from rooms” End IfEnd Sub 刪除客房信息Private Sub menuDeleteroom_Click() Dim txtSQL As String Dim intCount As Integer Dim mrc As Dim MsgText As String If flagTedit Then If 1 Then‘判斷客房信息列表內容是否為空　　 If MsgBox(“真的要刪除這條文件記錄么？”,vbOKCancel+vbExclamation,“警告”)=vbOK Then intCount=‘記載當前記錄位置　　 txtSQL=”delete from rooms where roomNO=‘”amp。Trim((intCount,1)amp。”’” Set mrc=ExecuteSQL(txtSQL,MsgText)‘執行刪除操作　　　　　　　　Unload frmRoom =”select*from rooms” End If End If End If End Sub查詢客房信息Private Sub From_Load()‘載入窗體時，將自動加入所有記錄的入庫時間 Dim i As Integer Dim j As Integer Dim sSql As String Dim txtSQL As String Dim MsgText As String Dim mrc As txtSQL=”select DISTINCT typename from roomtype”‘初始化客房種類 Set mrc=ExecuteSQL(txtSQL,MsgText) If Not Then Do While Not Trim((0)) Loop =0 Else MsgBox “請先進行客房標準設置!”,vbOKOnly+vbExclamation,”警告” Exit Sub End If End SubPrivate Sub cmdOK_Click()‘設置完查詢內容和方式后，單擊cmdOk按鈕查詢 Dim sQSql As String If chkItem(0).Value=vbChecked Then sQSql=”roomNO=’”amp。Trim(txtItem(0)amp。””)amp。”’” End If If chkItem(1).Value=vbChecked Then If Trim(sQSqlamp。””)=”” Then sQSql=”roomtype=’”amp。Trim(Combo1amp。””)amp。”’” Else End If End If If Trim(sQSql)=”” Then MsgBox “請設置查詢條件！”,vbOKOnly+vbExclamation,“警告” Exit Sub Else If flagRedit Then Unload frmRoom End If =”select*from rooms where”amp。sQSql End If End Sub7．小結對于本次課程設計主要從三方面，即知識、技能和態度，學生采用自我評估方式來檢查自己，這樣可以產生這種日常性的，內省方式的自我評估，以檢查自己的學習進度和成績，改進學習方法和增強學習自信心。13 /

點擊復制文檔內容

公司管理相關推薦

數據庫課程設計-酒店管理信息系統-資料下載頁

數據庫課程設計(學院學生管理信息系統)-資料下載頁

數據庫課程設計(學院學生管理信息系統)-資料下載頁

數據庫課程設計報告---圖書管借還管理信息系統數據庫-資料下載頁

數據庫課程設計-企業人事管理信息系統-資料下載頁

數據庫課程設計--圖書館管理信息系統-資料下載頁

數據庫原理與應用課程設計論文-教室管理信息系統數據庫的設計-資料下載頁

數據庫課程設計報告——圖書館管理信息系統-資料下載頁

數據庫課程設計-小型賓館管理信息系統實驗報告-資料下載頁

數據庫課程設計說明書-超市管理信息系統-資料下載頁

最新數據庫課程設計教室管理信息系統組免費下載-資料下載頁

網上書店管理信息系統數據庫課程設計(32頁)-資料下載頁

數據庫課程設計旅行社管理信息系統(廣工)-資料下載頁

db課程設計報告--物流公司管理信息系統的數據庫設計-資料下載頁

db課程設計報告--物流公司管理信息系統的數據庫設計-資料下載頁

數據庫課程設計報告---圖書館管理信息系統-其他專業-資料下載頁

數據庫課程設計-酒店管理信息系統-全文預覽

數據庫課程設計-酒店管理信息系統-預覽頁

數據庫課程設計-酒店管理信息系統-免費閱讀

數據庫課程設計-酒店管理信息系統(存儲版)

數據庫課程設計-酒店管理信息系統-文庫吧在線文庫