【正文】 Then sql = select*from 車型表 where 車型表 .車型 =39。 39。 amp。 39。 amp。 39。 amp。 。 Trim() amp。and 車型表 .價(jià)格 39。 Trim() amp。and 車型表 .價(jià)格 39。 Trim() amp。 ElseIf = And And And Then sql = select*from 車型表 where 車型表 .車型 =39。 39。 amp。 39。 amp。 。 Trim() amp。 ElseIf = And = And = And Then sql = select*from 車型表 where 車型表 .價(jià)格 39。 39。 amp。 。 Trim() amp。and 車型表 .價(jià)格 39。 Trim() amp。 ElseIf = And = And And Then sql = select*from 車型表 where 車型表 .品牌 =39。 39。 amp。 39。 amp。 。 Trim() amp。 ElseIf = And = And = And Then sql = select*from 車型表 where 車型表 .品牌 =39。 39。 amp。 39。 amp。 。 Trim() amp。and 車型表 .價(jià)格 39。 Trim() amp。 ElseIf = And = And And Then sql = select*from 車型表 where 車型表 .車型 =39。 Trim() amp。) Dim _dataset As New Dim sql As String If = And = And = And Then sql = select*from 車型表 where 車型表 .車型 =39。 Data Source=HAIERDT935NWDX。Form1 39。 = = CType((), ) = New (216, 328) = PictureBox1 = New (223, 63) = 1 = False 39。 39。Label1 39。 39。 39。不要使用代碼編輯器修改它。可以使用 Windows 窗體設(shè)計(jì)器修改此過程。Windows 窗體設(shè)計(jì)器所必需的 Private ponents As 39。窗體重寫 dispose 以清理組件列表。 InitializeComponent() 39。 四、 窗口設(shè)計(jì)與功能設(shè)計(jì)程序標(biāo)注 以下是歡迎界面的執(zhí)行代碼 Public Class Form1 Inherits Region Windows 窗體設(shè)計(jì)器生成的代碼 Public Sub New() () 39。請輸入正確的電話 39。用戶名不得大于 十個(gè)字節(jié) 39。請輸入正確的地址 39。請輸入正確的密碼 39。[09][09][09][09][09][09]39。 三 、 數(shù)據(jù)庫設(shè)計(jì) ER圖： 數(shù)據(jù)庫設(shè)計(jì)特點(diǎn)： 1． 使用存儲(chǔ)過程與 vb 連接 create procedure 查詢信息 。當(dāng)輸入錯(cuò)誤的管理員姓名時(shí)，左側(cè)會(huì)顯示非管理人員不得進(jìn)入的圖片；當(dāng)輸入 sun時(shí)，左側(cè)會(huì)顯示 sun 管理員的圖片，再輸入相應(yīng)的密碼并點(diǎn)擊 登錄 時(shí)，進(jìn)入 sun 管理員所負(fù)責(zé)管理的界面 —— sun 管理員車型數(shù)據(jù)界面；當(dāng)輸入 pu 時(shí)，左側(cè)會(huì)顯示 pu 管理員的圖片，再輸入相應(yīng)的密碼并點(diǎn)擊 登錄 時(shí)，進(jìn)入pu 管理員所負(fù)責(zé)管理的界面 —— pu 管理員訂單數(shù)據(jù)界面； sun 管理員車型數(shù)據(jù)界面 ： sun管理員可以在此界面中對車型表進(jìn)行如下操作：查詢、更新、插入和刪除數(shù)據(jù)； pu 管理員訂單數(shù)據(jù)界面 ： pu 管理員可以在此界面中對訂單表進(jìn)行查詢和更新操作。 查看訂單 ：當(dāng)用戶訂購成功后，如果 想要查看自己的訂單，可以在這個(gè)界面中輸入自己的訂單號(hào) 和 密碼 ，再點(diǎn)擊確認(rèn)，右側(cè)顯示訂單 信息。用戶輸入自己的 用戶名 和 密碼 ，點(diǎn)擊訂單號(hào)的 左框 ，訂單號(hào)自動(dòng)生成，用戶填寫想要訂購的 車型代碼 后，點(diǎn)擊 價(jià)格框 ，自動(dòng)顯示該汽車模型的價(jià)格，然后用戶再填寫想要訂購的車型數(shù)量。注冊表中的用戶名不能相同（通過 用戶名可行性 來約束），各項(xiàng)信息都要認(rèn)真填寫，否則會(huì)提示錯(cuò)誤。 查詢車型 ：點(diǎn)擊 公司 下拉菜單的用戶所愿意購買車型所屬的公司，再點(diǎn)擊 立刻所搜 ，在右側(cè)就會(huì)顯示對應(yīng)公司所有的汽車模型信息；也可在 車型 中直接輸入用戶所愿意購買的車型，如果存在，那么在右側(cè)也會(huì)顯示對應(yīng)的汽車模型信息； 如果用戶對車型不熟悉，可點(diǎn)擊價(jià)格 的下拉菜單選擇自己所期望的價(jià)格，從而進(jìn)行查詢； 查詢過程中可以 同時(shí)輸入以上三者或其中的任意兩者 ， 如果存在符合的車型信息，那么在右側(cè)也會(huì)顯示。 二 、 課程主要功能描述 汽車模型訂購系統(tǒng) 由 五個(gè)窗體組 成。 此項(xiàng)目 主要 包括 用戶注冊、訂車、查看車型、查看訂單以及安全管理權(quán)限等。 同濟(jì) 大學(xué) 《數(shù)據(jù)庫技術(shù)及應(yīng)用 》 項(xiàng)目 報(bào)告 項(xiàng)目 報(bào)告題目： 汽車模型訂購系統(tǒng) 班級： 數(shù)據(jù)庫（ 3 ）班 組長 ： 朱潔韻 組員 ： 孫靜、浦曉紅、周瑛 年級： 大三 專業(yè)： 機(jī)械設(shè)計(jì)及其自動(dòng)化 指導(dǎo)教師： 袁科萍 日期： 2020 年 1 月 5 日 課題設(shè)計(jì)報(bào)告 一、課題設(shè)計(jì)目的和意義 汽車模型訂購系統(tǒng) 是專為 買車者在網(wǎng)上訂購汽車模型而 開發(fā)的系統(tǒng)。該系統(tǒng)可方便快捷地 實(shí)現(xiàn)在網(wǎng)上訂購車模 。這個(gè)系統(tǒng)的優(yōu)點(diǎn)是 操作效率 高 ， 查找車型方便、直觀 ， 訂車簡便、快速 ，通過本系統(tǒng)的設(shè)計(jì)，我們不但 對 VB 和數(shù)據(jù)庫有了進(jìn)一步的了解和掌握 ，還 學(xué)到了一些 在課程以外的知識(shí)。 歡迎界面 ：用戶點(diǎn)擊界面后進(jìn)入主界面； 主界面 ：主界面分為查詢車型、用戶 注冊及修改、訂車、查看訂單和管理員登錄五大部分組成。 用戶注冊及修改用 ：當(dāng)用戶已經(jīng)選擇好自己想要訂購的汽車模型后，需先進(jìn)行用戶注冊才能訂購。 訂車 ：當(dāng)用戶成功注冊后，進(jìn)入訂車過程。當(dāng)用戶點(diǎn)擊 確認(rèn) 鍵后，如果訂購成功，系統(tǒng)會(huì)告訴用戶應(yīng)該支付的總費(fèi)用；否則提示錯(cuò)誤。 管理員登錄 ：此系統(tǒng)一共設(shè)置了兩個(gè)管理員 sun 和 pu。 用戶使用說明書界面 ： 指導(dǎo)用戶使用網(wǎng)上訂購汽車模型。1 _ddh int, _mm char(6) as if exists(select*from 訂單表 ,客戶表 where 訂單表 .訂單號(hào) =_ddh and 訂單表 .用戶 名 =客戶表 .用戶名 and 客戶表 .密碼 =_mm) select 訂單表 .總費(fèi)用 ,訂單表 .用戶名 ,訂單表 .訂貨時(shí)間 ,訂單表 .車型代碼 ,訂單表 .數(shù)量 ,訂單表 .訂金情況 ,訂單表 .處理情況 from 訂單表 ,客戶表 where 訂單表 .訂單號(hào) =_ddh and 訂單表 .用戶名 =客戶表 .用戶名 and 客戶表 .密碼 =_mm else return 1 2． 完整的觸發(fā)器控制 對客戶表中密碼的約束： CREATE TRIGGER 密碼約束 ON 客戶表 FOR INSERT,update AS declare _密碼 as CHAR(6) BEGIN select _密碼 = from inserted i IF _密碼 NOT LIKE 39。 begin PRINT39。 ROLLBACK tran END End 對客戶表中 地址 的約束： CREATE TRIGGER 地址約束 ON 客戶表 FOR INSERT,update AS declare _地址 as varchar(50) BEGIN select _地址 = from inserted i IF len(_地址 )8 begin PRINT 39。 ROLLBACK tran END End 對客戶表中 用戶名 的約束： CREATE TRIGGER 用戶名約束長度 ON 客戶表 FOR INSERT,update AS declare _用戶名 as varchar(20) BEGIN select _用戶名 = from inserted i IF len(_用戶名 )10 begin PRINT 39。 ROLLBACK tran END end 對客戶表中 電話號(hào)碼 的約束： CREATE TRIGGER 電話約束 ON 客戶表 FOR INSERT,update AS declare _電話 as CHAR(11) BEGIN select _電話 = from inserted i if isnumeric(_電話 )=0 begin PRINT39。 ROLLBACK tran END end 此外，我們的數(shù)據(jù)庫基本符合第三范式規(guī)范，數(shù)據(jù)冗余度小，易于管理 。該調(diào)用是 Windows 窗體設(shè)計(jì)器所必需的。在 InitializeComponent() 調(diào)用之后添加任何初始化 End Sub 39。 Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean) If disposing Then If Not (ponents Is Nothing) Then () End If End If (disposing) End Sub 39。注意 : 以下過程是 Windows 窗體設(shè)計(jì)器所必需的 39。 39。 Friend WithEvents Timer1 As Friend WithEvents Label1 As Friend WithEvents PictureBox1 As () Private Sub InitializeComponent() = New Dim resources As = New (GetType(Form1)) = New () = New = New () 39。Timer1 39。 39。 = = New (Microsoft Sans Serif, !, , , CType(134, Byte)) = = New (48, 64) = Label1 = New (544, 72) = 0 = 歡迎進(jìn)入汽車的世界 = 39。PictureBox1 39。