vb課程設(shè)計(jì)-旅游信息管理系統(tǒng)-wenkub
2023-02-25 08:33:59 本頁(yè)面
【正文】 圖 4 員工實(shí)體圖 圖 5 產(chǎn)品實(shí)體圖 沈 陽(yáng) 大 學(xué) 產(chǎn)品 ID 出發(fā)時(shí)間 領(lǐng)隊(duì) 導(dǎo)游 員工 領(lǐng)隊(duì) 導(dǎo)游 ID 姓名 性別 投訴次數(shù) 薪金 課程 設(shè)計(jì)說(shuō)明書 圖 6 路線實(shí)體圖 圖 7 票務(wù)實(shí)體圖 沈 陽(yáng) 大 學(xué) 票務(wù) 班次 始發(fā)時(shí)間 到達(dá)地 價(jià)格 出發(fā)地 路線 序號(hào) 景點(diǎn) 價(jià)格 天數(shù) 交通 課程 設(shè)計(jì)說(shuō)明書 圖 8 E— R 圖 沈 陽(yáng) 大 學(xué) 姓 名 性 別 導(dǎo) 游 員 工 I D 聯(lián)系人電話 聯(lián)系人地址 團(tuán) 隊(duì) 散 客 客 戶 性 別 I D 姓 名 人 數(shù) 地 址 電 話 訂 單 產(chǎn) 品 路 線 出發(fā)時(shí)間 交 通 價(jià) 格 景 點(diǎn) 序 號(hào) 天 數(shù) I D 領(lǐng) 隊(duì) 帶 隊(duì) 投訴次數(shù) 薪 金 班次 價(jià) 格 出發(fā)地 到達(dá)地 始發(fā)時(shí)間 票 務(wù) 課程 設(shè)計(jì)說(shuō)明書 3． 2 業(yè)務(wù)需求陳述 本系統(tǒng)分 八 個(gè)大模塊： 客戶 資料 管理、 路線管理、報(bào)名接待管理、 產(chǎn)品 管理、員工管理 、統(tǒng)計(jì)查詢、 票務(wù)管理、 財(cái)務(wù) 管理。分別有這些子模塊現(xiàn)實(shí)在不同的環(huán)境下。 沈 陽(yáng) 大 學(xué) 課程 設(shè)計(jì)說(shuō)明書 圖 3 旅游信息管理系統(tǒng)線路添加界面 旅游信息管理系統(tǒng)的 導(dǎo)游管理界面 其 中包括了導(dǎo)游的添加查詢等功能，也是和數(shù)據(jù)庫(kù)相連接，在已輸入的信息中調(diào)出自己想查詢的結(jié)果，其中也包括了 texbox、 label、 picturebox、 mandbutton等模塊。 沈 陽(yáng) 大 學(xué) 課程 設(shè)計(jì)說(shuō)明書 圖 6 旅游信息管理系統(tǒng)游客信息查詢界面 旅游信息管理系統(tǒng)的系統(tǒng)設(shè)置 此系統(tǒng)還人性化的設(shè)置了用戶申請(qǐng)賬號(hào)和更改密碼的功能，可以更好的方便了管理員和用戶對(duì)自己想要的信息進(jìn)行查詢，下面就更改密碼頁(yè)面進(jìn)行介紹，其中包括了 texbox、 label、 mandbutton 三項(xiàng)，分別設(shè)為用戶名，舊密碼，新密碼，新密碼確定等功能。 （ 2） 、也許游客中有外國(guó)朋友，這就需要系統(tǒng)支持多種語(yǔ)言的更換，在這方面，因?qū)Ω鲊?guó)語(yǔ)言的學(xué)習(xí)有限，所以一定會(huì)受到相應(yīng)的制約 ， （ 3） 、還存在著一些保存問題，也許有些客戶的粗心大意，在沒有按下保存時(shí)就關(guān)掉了程序，這是也許就會(huì)造成信息的丟失，這就要求系統(tǒng)會(huì)自動(dòng)蹦出對(duì)話框來(lái)提示這一“是否需要保存”的信息來(lái)提醒用戶，在這一方面系統(tǒng)還需要改進(jìn)。 （ 2） 時(shí)間特性要求 在 系統(tǒng) 方面，響應(yīng)時(shí)間，更新處理時(shí)間都要求比較快且迅速，以滿足要求。 針對(duì) 學(xué)校所開設(shè)的可視化 VisualBasic 這一課程有了更 進(jìn)一步的鞏固 。當(dāng)然，由于學(xué)藝不精，在課程設(shè)計(jì)的過程也碰到的一些問題。實(shí)踐中才會(huì)發(fā)現(xiàn)錯(cuò)誤，也才能改進(jìn)，才能達(dá)到學(xué)習(xí)的最終目的。查詢?cè)谟脩粜畔⒈碇惺欠翊嬖诔鋈氲挠脩? = adCmdText = select*from 用戶表單 where 用戶名 =39。 39。判斷密碼與確認(rèn)密碼是否一致 If = Then 39。 39。女 39。 39。 39。 = = = = End Sub Private Sub cmdDelete_Click() If MsgBox(確認(rèn)要?jiǎng)h除嗎？ , vbOKCancel + vbQuestion, 信息提示 ) = vbOK Then If Then End If End If End Sub Private Sub Command1_Click() If = Then MsgBox (對(duì)不起，您還沒有輸入要查詢的旅游團(tuán)編號(hào)，請(qǐng)輸入！ ) Exit Sub End If If Len() 0 Then = adCmdText 沈 陽(yáng) 大 學(xué) 課程 設(shè)計(jì)說(shuō)明書 = select*from 組團(tuán)表單 where 旅游團(tuán)號(hào) =39。 = True Else MsgBox (請(qǐng)輸入要查找的旅游團(tuán)編號(hào)！ ) = Exit Sub End If End Sub Private Sub Command3_Click() = adCmdText = select*from 組團(tuán)表單 = True End Sub Private Sub Command4_Click()
環(huán)評(píng)公示相關(guān)推薦
鄂ICP備17016276號(hào)-1