數(shù)據(jù)庫(kù)課設(shè)報(bào)告房產(chǎn)管理系統(tǒng)-資料下載頁(yè)
2025-02-10 01:42本頁(yè)面
【導(dǎo)讀】沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專用紙Noi. 第1章系統(tǒng)功能概述。房產(chǎn)信息管理系統(tǒng)就是利用計(jì)算機(jī)根據(jù)樓盤(pán)信息、樓房信息、戶型信息進(jìn)行房產(chǎn)信息管理。用VB和SQLSERVER軟件實(shí)現(xiàn)如下功能：。第2章數(shù)據(jù)庫(kù)設(shè)計(jì)。通過(guò)對(duì)一些典型銷(xiāo)售管理系統(tǒng)的考查、分析以及實(shí)際的市場(chǎng)調(diào)查與研究，要求本系統(tǒng)具有。要包含以下實(shí)體及其屬性：。樓盤(pán)信息實(shí)體E-R圖。建筑面積套內(nèi)面積。售樓信息表的結(jié)構(gòu)設(shè)計(jì)：。用戶入住表的結(jié)構(gòu)設(shè)計(jì)：。sqlstr="Select*From系統(tǒng)信息Where用戶名='"&Text1&&qu
【正文】 樓盤(pán)名稱 總建筑面積 位置 = = End Sub （ 2） 樓房信息查詢 選擇樓層進(jìn)行模糊查詢： 沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專用紙 No27 沈陽(yáng)理工大學(xué) 其功能代碼如下： Private Sub Command1_Click() Dim str As String If (0) = Then str = select * from 樓房信息 str = str amp。 where 樓房信息 .樓號(hào) like39。 amp。 Trim() amp。 %39。 = str ElseIf (1) = Then str = select * from 樓房信息 str = str amp。 where 樓房信息 .單元號(hào) like39。 amp。 Trim() amp。 %39。 = str ElseIf (2) = Then str = select * from 樓房信息 str = str amp。 where 樓房信息 .樓層 like39。 amp。 Trim() amp。 %39。 = str ElseIf (3) = Then str = select * from 樓房信息 沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專用紙 No28 沈陽(yáng)理工大學(xué) str = str amp。 where 樓房信息 .房號(hào) like39。 amp。 Trim() amp。 %39。 = str ElseIf (4) = Then str = select * from 樓房信息 str = str amp。 where 樓房信息 .單價(jià) like39。 amp。 Trim() amp。 %39。 = str End If End Sub Private Sub Command2_Click() Unload Me End Sub Private Sub Form_Load() 樓號(hào) 單元號(hào) 樓層 房號(hào) 單價(jià) = 樓號(hào) = End Sub （ 3） 戶型信息查詢 沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專用紙 No29 沈陽(yáng)理工大學(xué) 選擇戶型結(jié)構(gòu)進(jìn)行模糊查詢： 沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專用紙 No30 沈陽(yáng)理工大學(xué) 其功 能代碼如下： Private Sub Command1_Click() Dim str As String If (0) = Then str = select * from 戶型信息 where 戶型編號(hào) = 39。 amp。 Trim() amp。 39。 = str ElseIf (1) = Then str = select * from 戶型信息 str = str amp。 where 戶型信息 .戶型結(jié)構(gòu) like39。 amp。 Trim() amp。 %39。 = str ElseIf (2) = Then str = select * from 戶型信息 str = str amp。 where 戶型信息 .建筑面積 like39。 amp。 Trim() amp。 %39。 = str ElseIf (3) = Then 沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專用紙 No31 沈陽(yáng)理工大學(xué) str = select * from 戶型信息 str = str amp。 where 戶型信息 .套內(nèi)面積 like39。 amp。 Trim() amp。 %39。 = str ElseIf (4) = Then str = select * from 戶型信息 str = str amp。 where 戶型信息 .戶型簡(jiǎn)介 like39。 amp。 Trim() amp。 %39。 = str End If End Sub Private Sub Command2_Click() Unload Me End Sub Private Sub Form_Load() 戶型編號(hào) 戶型結(jié)構(gòu) 建筑面積 套內(nèi)面積 戶型簡(jiǎn)介 = 戶型編號(hào) 39。 = End Sub 總結(jié) 通過(guò)本 次數(shù)據(jù)庫(kù)課程設(shè)計(jì)使我更加深入的 掌握了數(shù)據(jù)庫(kù)設(shè)計(jì)的基本思想， 也學(xué)會(huì)了對(duì)VB 程序設(shè)計(jì)的基本使用，根 據(jù)實(shí)際中的問(wèn)題 抽象出概念模型，進(jìn)行轉(zhuǎn)化，使之成為相應(yīng)的關(guān)系模型，由此模型進(jìn)行數(shù)據(jù)庫(kù)的設(shè)計(jì)，并進(jìn)行了數(shù)據(jù)庫(kù)的檢測(cè)，熟悉了建立數(shù)據(jù)庫(kù)常見(jiàn)的方法 ，掌握了如何從實(shí)際問(wèn)題抽象出關(guān)系模型的基本方法，對(duì)于概念模型的設(shè)計(jì)采用 ER 的方法將概念模型轉(zhuǎn)化為關(guān)系模型 。此工程有利于實(shí)現(xiàn) 房產(chǎn)信息系統(tǒng)的管理 ，實(shí)現(xiàn)了 數(shù)據(jù)庫(kù)的基本功能。 在此還 要 特別 感謝劉 老師在軟件工程和數(shù)據(jù)庫(kù)課程中認(rèn)真負(fù)責(zé)的教學(xué)，才使得我能結(jié)合所學(xué)的知識(shí)完成這一課程設(shè)計(jì)。 沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專用紙 No32 沈陽(yáng)理工大學(xué) 參考文獻(xiàn) [1] 王珊 . 數(shù)據(jù)庫(kù)系統(tǒng)簡(jiǎn)明教程 . 北京 . 高等教育出版社 . 2021 年 9 月 [2] 劉韜、駱娟、 何旭洪 . Visual BASIC 數(shù)據(jù)庫(kù)系統(tǒng)開(kāi)發(fā)實(shí)例導(dǎo)航 . 北京 . 人民郵電出版社 . 2021 年 5 月 [3] 武新華、魏平俊、魏經(jīng)娟 .《 Visual BASIC 管理信息系統(tǒng)開(kāi)發(fā)案例》 . 西安 . 西安電子科技大學(xué)出版社 . 2021 年 4 月 ［ 4］李英杰 . 2021 程序設(shè)計(jì)實(shí)例教程 .天津 . 天津大學(xué)出版社 . 2021 年 11 月
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1