客房管理系統(tǒng)論文和代碼(編輯修改稿)
2025-07-20 02:21 本頁面
【文章內(nèi)容簡介】 Sub 程序設(shè)計 本人負(fù)責(zé)的程序代碼是 訂貨單 和 銷售 表單項的設(shè)計工作 部分核心代碼如下:訂貨表單處理代碼：Private Sub Command13_Click() If (Trim() = Or Trim() = Or Trim() = Or Trim() = ) Then k = MsgBox(請您認(rèn)真添寫每一項, , 提示) Exit Sub End If sql = select * from consumer where 訂貨商編號=39。 amp。 Trim() amp。 39。 sql, n, 1, 3 If ( 0) Then k = MsgBox(你輸入的訂貨商編號已經(jīng)存在 請重新輸入!, , 提示) = = = = Else rst(0) = Trim() rst(1) = Trim() rst(2) = Trim() rst(3) = Trim() End If select * from consumer, n, 1, 1 Set = rst End Sub銷售表單處理代碼：Private Sub Command11_Click()Dim price As DoubleDim str As StringDim num As Integersql = select * from goods where 貨品編號=39。 amp。 Trim() amp。 39。 sql, n, 1, 1num = rst(數(shù)量)If (num Val(Trim()) 11) Then k = MsgBox(對不起 你輸入的訂貨數(shù)量
研究報告相關(guān)推薦
鄂ICP備17016276號-1