數(shù)據(jù)庫(kù)設(shè)計(jì)與應(yīng)用開(kāi)發(fā)

1、計(jì)算機(jī)科學(xué)與工程學(xué)院武 漢 工 程 大 學(xué)計(jì)算機(jī)科學(xué)與工程學(xué)院數(shù)據(jù)庫(kù)系統(tǒng)概論實(shí)驗(yàn)報(bào)告專(zhuān)業(yè)班級(jí)11網(wǎng)工1-2實(shí)驗(yàn)地點(diǎn)計(jì)算機(jī)大樓423機(jī)房學(xué)生學(xué)號(hào)指導(dǎo)教師學(xué)生姓名實(shí)驗(yàn)時(shí)間實(shí)驗(yàn)項(xiàng)目實(shí)驗(yàn)3 數(shù)據(jù)庫(kù)設(shè)計(jì)與應(yīng)用開(kāi)發(fā)（6學(xué)時(shí)）實(shí)驗(yàn)類(lèi)別操作性（） 驗(yàn)證性（） 設(shè)計(jì)性（ ） 綜合性（ ） 其它（ ）實(shí)驗(yàn)?zāi)康募耙?.依照數(shù)據(jù)庫(kù)設(shè)計(jì)的方法，完成學(xué)生管理系統(tǒng)的數(shù)據(jù)庫(kù)設(shè)計(jì)。2.掌握程序設(shè)計(jì)語(yǔ)言和SQL-Server的連接方法。3.建立簡(jiǎn)單的數(shù)據(jù)庫(kù)訪問(wèn)界面。掌握數(shù)據(jù)庫(kù)應(yīng)用系統(tǒng)開(kāi)發(fā)的基本方法。成 績(jī) 評(píng) 定 表類(lèi) 別評(píng) 分 標(biāo) 準(zhǔn)分值得分合 計(jì)上機(jī)表現(xiàn)積極出勤、遵守紀(jì)律主動(dòng)完成實(shí)驗(yàn)設(shè)計(jì)任務(wù)30分程序代碼比較規(guī)范、基本正確

2、功能達(dá)到實(shí)驗(yàn)要求30分實(shí)驗(yàn)報(bào)告及時(shí)遞交、填寫(xiě)規(guī)范內(nèi)容完整、體現(xiàn)收獲40分說(shuō)明： 評(píng)閱教師： 日 期： 2013 年 月 日實(shí) 驗(yàn) 內(nèi) 容實(shí)驗(yàn)內(nèi)容：依照學(xué)生管理系統(tǒng)的要求，完成如下任務(wù) 1.設(shè)計(jì)適合此應(yīng)用需求的規(guī)范化的數(shù)據(jù)庫(kù)。2.學(xué)習(xí)如何進(jìn)行數(shù)據(jù)庫(kù)連接。4.制作一個(gè)簡(jiǎn)單的數(shù)據(jù)庫(kù)訪問(wèn)程序。（DELPHI、VB、PB等）要求能完成下列處理要求：1.學(xué)生信息的增、刪、改及查詢(xún)操作。2.選課和課程信息的系列操作。 實(shí)驗(yàn)步驟：一、VB連接SQL Server數(shù)據(jù)庫(kù)方法一：1）打開(kāi)VB，新建一個(gè)“標(biāo)準(zhǔn)EXE”。2)在“工程”里面選擇“部件”，添加“Microsoft ADO Data Control 6.0

3、(SP6)”和“Microsoft DataGrid Control 6.0(SP6)”，點(diǎn)擊“確定”。3)在左側(cè)工具中雙擊Adodc控件和DataGrid控件并將其放在合適的位置。4) 右擊Adodc1，在彈出的下拉菜單中選擇“ADODC屬性”,出現(xiàn)屬性頁(yè)，選擇“使用連接字符串”，點(diǎn)擊“生成”，選擇“Microsoft OLE DB Provider for SQL Server”,點(diǎn)擊下一步。5)在“數(shù)據(jù)鏈接屬性”中輸入如圖所示信息，點(diǎn)擊確定。6)點(diǎn)擊“測(cè)試連接”。7) 在Form1空白處雙擊鼠標(biāo)左鍵，彈出代碼編輯窗口。8)在編輯窗口輸入如下代碼。Private Sub DataGrid1

4、_Click()Adodc1.Visible = FalseAdodc1.RecordSource = "select * from Student"Adodc1.RefreshSet DataGrid1.DataSource = Adodc1.RecordsetDataGrid1.RefreshEnd Sub9)點(diǎn)擊“運(yùn)行”，則連接到JXGL數(shù)據(jù)庫(kù)的Student表，出現(xiàn)如圖所示的結(jié)果。10)連接Course表和SC表只需將代碼中的表名修改即可，得到如下結(jié)果。(1)VB和JXGL數(shù)據(jù)庫(kù)Course表連接結(jié)果：(2) VB和JXGL數(shù)據(jù)庫(kù)SC表連接結(jié)果：2、 VB連接SQL

5、 Server數(shù)據(jù)庫(kù)方法二以及數(shù)據(jù)庫(kù)的訪問(wèn)程序：（一）VB連接SQL Server數(shù)據(jù)庫(kù)：1） 打開(kāi)控制面板，雙擊“數(shù)據(jù)源”圖標(biāo)。2） 在“ODBC數(shù)據(jù)源管理器”中選擇“系統(tǒng)DSN”,點(diǎn)擊“添加”按鈕，出現(xiàn)“創(chuàng)建新數(shù)據(jù)源頁(yè)面”，選擇添加SQL Server。3） 在創(chuàng)建到SQL Server的新數(shù)據(jù)源中輸入“數(shù)據(jù)源名稱(chēng)”，選擇我們需要的服務(wù)器類(lèi)型。4）在“創(chuàng)建到SQL Server的新數(shù)據(jù)源”中選擇“使用網(wǎng)絡(luò)登錄ID的Windows NT驗(yàn)證”。5）在“更改默認(rèn)的數(shù)據(jù)庫(kù)為（D）”選擇我們所需的數(shù)據(jù)源名稱(chēng)，點(diǎn)擊“下一步”，再點(diǎn)擊“完成”。6）點(diǎn)擊“測(cè)試數(shù)據(jù)源”，出現(xiàn)“測(cè)試成功”，則連接成功。（2

6、） 數(shù)據(jù)庫(kù)的訪問(wèn)程序：1、對(duì)數(shù)據(jù)庫(kù)的查詢(xún)：1） 雙擊“Adodc控件”，添加如圖所示的控件。2） 右擊“Adodc控件”設(shè)置其屬性如下所示。3） 在右側(cè)屬性-Form1中分別設(shè)置Text1的DataSource為“Adodc1”，DataField為“Sno”，Text2的DataSource為“Adodc1”，DataField為“Sname”，Text3的DataSource為“Adodc1”，DataField為“Ssex”。4） 點(diǎn)擊VB中的“運(yùn)行”按鈕，則可以成功查詢(xún)Student表中學(xué)生的信息。5）點(diǎn)擊“Adodc控件”中向右的圖標(biāo)，則可以查詢(xún)到所有學(xué)生的信息。2、 對(duì)數(shù)據(jù)庫(kù)中數(shù)據(jù)

7、的添加：1） 在VB中新建一個(gè)窗體，如圖所示。2） 在左側(cè)工具中雙擊“Adodc控件”和“DataGrid控件”并將其放在合適的位置。3） 對(duì)“Adodc控件”屬性的設(shè)置和前面相同。4） 雙擊退出按鈕，對(duì)此按鈕進(jìn)行編程。5） 對(duì)Form1加入如圖所示的按鈕。6） 雙擊新添加的各個(gè)按鈕對(duì)其編程：Private Sub Command1_Click()Form.ShowEnd SubPrivate Sub Command2_Click()tex_Sno.Text = ""tex_Sname.Text = ""tex_Ssex.Text = "&qu

8、ot;Adodc1.RefreshAdodc1.Recordset.AddNewcmd_add.Enabled = False '添加數(shù)據(jù)按鈕禁用cmd_save.Enabled = True '保存數(shù)據(jù)按鈕啟用End SubPrivate Sub Command3_Click()If tex_Sno.Text = "" Then MsgBox ("請(qǐng)輸入學(xué)號(hào)")ElseIf tex_Sname.Text = "" Then MsgBox ("請(qǐng)輸入姓名")ElseIf tex_Ssex.Text

9、= "" Then MsgBox ("請(qǐng)輸入性別")Else Adodc1.Recordset("學(xué)號(hào)") = tex_Sno.Text Adodc1.Recordset("姓名") = tex_Sname.Text Adodc1.Recordset("性別") = tex_Ssex.Text cmd_add.Enabled = Truecmd_save.Enabled = FalseEnd IfEnd SubPrivate Sub Command4_Click()Unload Form1Unload Form2End Sub7） 編寫(xiě)好程序后即可實(shí)現(xiàn)對(duì)該數(shù)據(jù)庫(kù)中學(xué)生信息的添加。實(shí) 驗(yàn) 總 結(jié) 在本次數(shù)據(jù)庫(kù)實(shí)驗(yàn)中，我將數(shù)據(jù)庫(kù)中的理論知識(shí)，運(yùn)用到實(shí)踐中來(lái)。同時(shí)我也遇到很多困難，在解決它們的同時(shí)我學(xué)到了很多，受益匪淺，特別是如何分析、建立、開(kāi)發(fā)一個(gè)系統(tǒng)。在實(shí)驗(yàn)中我熟練掌握了常用控件的添加、窗體的調(diào)試、控件的布局以及其對(duì)應(yīng)屬性的設(shè)置！并且對(duì)我們不了解的VB代碼有了一定的了解。由于開(kāi)始對(duì)VB和SQL Server的連接沒(méi)有什么了解，而且我們也沒(méi)有學(xué)習(xí)過(guò)VB，所以這次的實(shí)驗(yàn)我基本上都是自己查找各種資料來(lái)獨(dú)立完成此次試驗(yàn)。在實(shí)驗(yàn)中我