綜合設(shè)計(jì)實(shí)驗(yàn)成語詞典查詢系統(tǒng)設(shè)計(jì)

1、.綜合設(shè)計(jì)實(shí)驗(yàn) 成語詞典查詢系統(tǒng)設(shè)計(jì)一、實(shí)驗(yàn)?zāi)康?了解SQL語言各語句的語法與使用方法；2掌握DataProvider 和DataSet兩個(gè)核心組件的常用屬性、方法的含義及使用方法；3掌握利用DataProvider 和DataSet兩個(gè)核心組件實(shí)現(xiàn)數(shù)據(jù)庫記錄的插入、修改、刪除的方法；4使學(xué)生能夠通過老師講過的內(nèi)容靈活運(yùn)用多種控件，實(shí)現(xiàn)對(duì)簡(jiǎn)單數(shù)據(jù)庫的維護(hù)，能夠自行調(diào)試，顯示或保存實(shí)驗(yàn)結(jié)果。并使學(xué)生更深入的掌握面向?qū)ο蟪绦蛟O(shè)計(jì)這門課程。二、基本要求（1）創(chuàng)建成語詞典查詢系統(tǒng)所需的表（成語詞典表），并能連接上數(shù)據(jù)庫。 （2）完成對(duì)所建成語詞典表的插入、修改、刪除功能（3）完成對(duì)成語的精確和模糊查詢

2、（4）完成對(duì)成語詞典查詢結(jié)果保存為Word文檔及其導(dǎo)入成語詞典。（5）為完成上述功能，還需運(yùn)用菜單、工具條等多種控件三、實(shí)驗(yàn)步驟：1. 創(chuàng)建數(shù)據(jù)庫：打開SQL Server Management Studio，創(chuàng)建數(shù)據(jù)庫”成語字典庫“然后新建一個(gè)名為成語字典表的表，如圖1所示。圖12. 創(chuàng)建項(xiàng)目：在Microsoft Visual Studio 2010中創(chuàng)建一個(gè)名為“成語字典應(yīng)用”的Windows窗體應(yīng)用程序項(xiàng)目。3. 設(shè)計(jì)界面：在空白窗體中添加菜單Button、Label、TextBox、ComboBox、RichTextBox、DataGridView、MenuStrip、SqlConn

3、ection、SqlDataAdapter、SqlCommand、SaveFileDialog、OpenFileDialog控件，對(duì)控件的屬性進(jìn)行修改，如表1所示。并且對(duì)菜單欄上的選項(xiàng)設(shè)置快捷鍵和訪問鍵。控件名稱屬性屬性值MenuStripItems瀏覽（查看所有、保存結(jié)果、退出）、查詢（精確查詢、模糊查詢）、添加、刪除、修改、退出Label1Text選擇查詢方式：GroupBox1Text操作界面Label2Text設(shè)置查詢值：Label3Text顯示界面：Label4Text拼音：Label5Text成語：Label6Text備注：Label7Text拼音簡(jiǎn)寫：Label8Textlabe

4、l8button1Text精確查詢button2Text模糊查詢button3Text添加button4Text修改button5Text刪除button6Text導(dǎo)出到Word文件Button7Text從Word文件中導(dǎo)入comboBox1Items拼音、成語、備注、拼音簡(jiǎn)寫表1控件屬性及屬性值圖二圖二為進(jìn)行整體布局后窗體效果圖。4. 在Form1.h 編寫菜單、按鈕、標(biāo)簽的事件（單擊事件）。（1）在窗體的頭文件中引用System:Data:SqlClient命名空間后，才可以使用該命名空間內(nèi)定義的如SqlConnection等類的對(duì)象。因此需要在窗體的頭文件中添加如下語句： using n

5、amespace System:Data:SqlClient;因?yàn)橐形募膶?dǎo)出和導(dǎo)入所以要在命名空間部分加上：using namespace System:IO;并且在窗體類中要定義一個(gè)SqlConnection 類型的對(duì)象con，并在Form1類的構(gòu)造函數(shù)中進(jìn)行初始化。代碼如下所示。 Form1(void)InitializeComponent();/TODO: 在此處添加構(gòu)造函數(shù)代碼/con=gcnew SqlConnection();con-ConnectionString = LData Source=.;Initial Catalog=成語字典庫;Integrated Securi

6、ty=True;/用Connection控件鏈接到服務(wù)器名為”.“數(shù)據(jù)庫名為“成語字典庫“，用windows身份驗(yàn)證方式登陸SqlConnection con; /在窗體的頭文件中定義一個(gè)con（2）在視圖設(shè)計(jì)器下點(diǎn)擊菜單欄“瀏覽”雙擊“查看所有”便進(jìn)入此按鍵的單擊事件函數(shù)下編寫代碼。private: System:Void 查看所有ToolStripMenuItem_Click(System:Object sender, System:EventArgs e) String sql=select * from 成語字典表;/定義了sql字符串，其內(nèi)容為sqlsever數(shù)據(jù)庫的查詢語句 Dat

7、aSet ds=gcnew DataSet();/定義了數(shù)據(jù)集的對(duì)象ds SqlDataAdapter ourda=gcnew SqlDataAdapter(sql,con); try /后面寫可能發(fā)生的異常事件 ourda-Fill(ds,zd); this-dataGridView1-DataSource=ds-Tableszd;/ dataGridView1中顯示表中的內(nèi)容 con-Open(); if (con-State=ConnectionState:Open) String sql= select count(*) from 成語字典表; SqlCommand cmd = gcn

8、ew SqlCommand( sql,con); String myinformation=表中成語的總數(shù)是: + cmd-ExecuteScalar()-ToString() + 條; label8-Text=myinformation; /label8顯示表中成語的總數(shù) if (con-State=ConnectionState:Open) con-Close(); catch(System:Data:SqlClient:SqlException ex)/顯示異常信息 MessageBox:Show(數(shù)據(jù)的異常信息是:+ex-Message,提示信息); （3）在視圖設(shè)計(jì)器下點(diǎn)擊菜單欄“查

9、詢”雙擊“精確查詢”便進(jìn)入此按鍵的單擊事件函數(shù)下編寫代碼。private: System:Void 精確查詢ToolStripMenuItem_Click(System:Object sender, System:EventArgs e) String sql= select * from 成語字典表 where +comboBox1-Text+ =+textBox1-Text+; MessageBox:Show(sql);/顯示sql語句 DataTable ourtable=gcnew DataTable(); SqlDataReaderrd; SqlCommandcmd=gcnew Sq

10、lCommand( sql,con); SqlDataAdapter ourda = gcnew SqlDataAdapter( sql,con); if(textBox1-Text=) MessageBox:Show(請(qǐng)輸入要查找成語的相關(guān)信息); return; Try/將查詢到的數(shù)據(jù)添加到富文本框中為導(dǎo)出做準(zhǔn)備 con-Open(); rd=cmd-ExecuteReader(); if(rd-Read() richTextBox1-Text+=rd拼音-ToString()+t; richTextBox1-Text+=rd成語-ToString()+t; richTextBox1-Te

11、xt+=rd備注-ToString()+t; richTextBox1-Text+=rd拼音簡(jiǎn)寫-ToString()+n; catch(System:Data:SqlClient:SqlException ex) MessageBox:Show(數(shù)據(jù)異常信息是：+ex-Errors,提示信息); return; finally rd-Close(); if(con-State=ConnectionState:Open) con-Close(); try ourda-Fill(ourtable); this-dataGridView1-DataSource=ourtable; catch(Sy

12、stem:Data:SqlClient:SqlException ex) MessageBox:Show(數(shù)據(jù)異常信息是：+ex-Errors,提示信息); （4）在視圖設(shè)計(jì)器下點(diǎn)擊菜單欄“查詢”雙擊“模糊查詢”便進(jìn)入此按鍵的單擊事件函數(shù)下編寫代碼。模糊查詢的代碼只需將sql查詢語句變?yōu)镾tring sql= select * from 成語字典表 where +comboBox1-Text+ like%+textBox1-Text+%;（5）在視圖設(shè)計(jì)器下雙擊菜單欄里“添加”項(xiàng)便進(jìn)入此按鍵的單擊事件函數(shù)下編寫代碼。private: System:Void 添加ToolStripMenuIte

13、m_Click(System:Object sender, System:EventArgs e) if(textBox3-Text=) MessageBox:Show(添加的對(duì)象內(nèi)容不能為空); return; try con-Open(); if (con-State=ConnectionState:Open) Stringsql=insert into 成語字典表(拼音,成語,備注,拼音簡(jiǎn)寫)values(+textBox2-Text+,+textBox3-Text+,+textBox4-Text+,+textBox5-Text+); MessageBox:Show(sql); SqlC

14、ommandcmd=gcnew SqlCommand(sql,con); cmd-ExecuteNonQuery(); MessageBox:Show(添加成功記錄); catch(SqlExceptionex) MessageBox:Show(數(shù)據(jù)的異常信息是：+ex-Message,提示信息); finally if(con-State=ConnectionState:Open) con -Close(); （6）在視圖設(shè)計(jì)器下雙擊菜單欄里“修改”項(xiàng)便進(jìn)入此按鍵的單擊事件函數(shù)下編寫代碼。private: System:Void 修改ToolStripMenuItem_Click(Syste

15、m:Object sender, System:EventArgs e) String sql= update 成語字典表 set +comboBox1-Text+ =+textBox2-Text+ where +comboBox1-Text+ =+textBox1-Text+; MessageBox:Show(sql); DataTable ourtable=gcnew DataTable(); SqlDataAdapter ourda = gcnew SqlDataAdapter( sql,con); try ourda-Fill(ourtable); catch(System:Data:

16、SqlClient:SqlException ex) MessageBox:Show(數(shù)據(jù)的異常信息是：+ex-Message,提示信息); （7）在視圖設(shè)計(jì)器下雙擊菜單欄里“刪除”項(xiàng)便進(jìn)入此按鍵的單擊事件函數(shù)下編寫代碼。private: System:Void 刪除ToolStripMenuItem_Click(System:Object sender, System:EventArgs e) if(comboBox1-Text=|textBox1-Text=)/選擇刪除方式和設(shè)置刪除值不能為空 MessageBox:Show(刪除對(duì)象的內(nèi)容不能為空); return; if(Windows

17、:Forms:DialogResult:OK!=MessageBox:Show(確定要?jiǎng)h除記錄嗎？,刪除,MessageBoxButtons:OKCancel) return;/如果點(diǎn)擊取消則返回 try con-Open(); if (con-State=ConnectionState:Open) String sql= delete from 成語字典表 where +comboBox1-Text+ =+textBox1-Text+; MessageBox:Show(sql); SqlCommand cmd = gcnew SqlCommand( sql,con); cmd-Execute

18、NonQuery(); MessageBox:Show(您已經(jīng)成功刪除+comboBox1-Text+ =+textBox1-Text+的記錄); catch( SqlException ex) MessageBox:Show(數(shù)據(jù)的異常信息是：+ex-Message,提示信息); finally if (con-State=ConnectionState:Open) con-Close(); （8）在視圖設(shè)計(jì)器下雙擊菜單欄里“退出”項(xiàng)便進(jìn)入此按鍵的單擊事件函數(shù)下編寫代碼。private: System:Void 退出ToolStripMenuItem_Click(System:Object

19、sender, System:EventArgs e) this-Close(); （9）在視圖設(shè)計(jì)器下雙擊 “導(dǎo)出到Word文件”按鈕便進(jìn)入此按鍵的單擊事件函數(shù)下編寫代碼，思路是將富文本框中的內(nèi)容導(dǎo)出到word。private: System:Void button6_Click(System:Object sender, System:EventArgs e) if(saveFileDialog1-ShowDialog()=Windows:Forms:DialogResult:OK) StreamWriter str=File:CreateText(saveFileDialog1-File

20、Name); str-Write(richTextBox1-Text);/內(nèi)容從richTextBox1寫入到word str-Close(); （10）在視圖設(shè)計(jì)器下雙擊 “從Word文件中導(dǎo)入”按鈕便進(jìn)入此按鍵的單擊事件函數(shù)下編寫代碼。private: System:Void button7_Click(System:Object sender, System:EventArgs e) openFileDialog1-InitialDirectory=E:;/設(shè)置了起始目錄openFileDialog1-Filter=富文本文件(*.rtf)|*.rtf|文本文件(*.doc)|*.doc

21、;/選擇文件類型 if (System:Windows:Forms:DialogResult:OK=openFileDialog1-ShowDialog() srtFileName=openFileDialog1-FileName; StreamReader sd=File:OpenText(srtFileName); this-richTextBox1-Text=; this-richTextBox1-Text=sd-ReadToEnd();/內(nèi)容添加到richTextBox1中 sd-Close(); 四窗體運(yùn)行和調(diào)試按下啟動(dòng)調(diào)試（F5）編譯成功，如果有錯(cuò)誤則應(yīng)根據(jù)錯(cuò)誤信息和位置找到錯(cuò)誤并

22、改正。也可以利用設(shè)置斷點(diǎn)的方式來進(jìn)行排錯(cuò)。我在程序調(diào)試過程中就遇到以下問題：控件忘記添加，數(shù)據(jù)庫的鏈接失敗，對(duì)象引用有錯(cuò)誤等。在編寫從word中導(dǎo)入的功能時(shí)遇到導(dǎo)入的內(nèi)容如果是漢字就有錯(cuò)誤，我就改用數(shù)據(jù)流的方式成功解決問題。界面上的所有功能都可以使用達(dá)到了實(shí)驗(yàn)要求。五實(shí)驗(yàn)小結(jié)本次實(shí)驗(yàn)的內(nèi)容是在學(xué)習(xí)完C+與Windows窗體應(yīng)用程序的基礎(chǔ)知識(shí)數(shù)據(jù)庫SQL Server之后一次各知識(shí)點(diǎn)結(jié)合的綜合性實(shí)驗(yàn)。本次實(shí)驗(yàn)運(yùn)用所學(xué)知識(shí)對(duì)一些概念，一些知識(shí)點(diǎn)的理解更進(jìn)一步加深。能夠通過老師講的內(nèi)容靈活運(yùn)用多種控件，實(shí)現(xiàn)對(duì)簡(jiǎn)單數(shù)據(jù)庫的維護(hù)，能夠自行調(diào)試，顯或保存實(shí)驗(yàn)結(jié)果。對(duì)更深入的掌握面向?qū)ο蟪绦蛟O(shè)計(jì)這門課程有很

23、大的幫助。六代碼清單Form1.h#pragma oncenamespace 成語字典應(yīng)用 using namespace System;using namespace System:ComponentModel;using namespace System:Collections;using namespace System:Windows:Forms;using namespace System:Data;using namespace System:Data:SqlClient;using namespace System:Drawing;using namespace System:I

24、O;/ / Form1 摘要/ public ref class Form1 : public System:Windows:Forms:Formpublic:String srtFileName;Form1(void)InitializeComponent();/TODO: 在此處添加構(gòu)造函數(shù)代碼/con=gcnew SqlConnection();con-ConnectionString = LData Source=.;Initial Catalog=成語字典庫;Integrated Security=True;SqlConnection con;private: System:Data

25、:SqlClient:SqlConnection sqlConnection1;public: private: System:Data:SqlClient:SqlCommand sqlSelectCommand1;private: System:Data:SqlClient:SqlCommand sqlInsertCommand1;private: System:Data:SqlClient:SqlCommand sqlUpdateCommand1;private: System:Data:SqlClient:SqlCommand sqlDeleteCommand1;private: Sys

26、tem:Data:SqlClient:SqlDataAdapter sqlDataAdapter1;private: System:Data:SqlClient:SqlCommand sqlCommand1;private: System:Windows:Forms:Label label8;private: System:Windows:Forms:Label label6;private: System:Windows:Forms:Label label5;private: System:Windows:Forms:Label label4;private: System:Windows:

27、Forms:Button button3;private: System:Windows:Forms:Button button4;private: System:Windows:Forms:Button button5;private: System:Windows:Forms:Button button6;private: System:Windows:Forms:TextBox textBox3;private: System:Windows:Forms:Label label7;private: System:Windows:Forms:TextBox textBox5;private

28、: System:Windows:Forms:TextBox textBox2;private: System:Windows:Forms:TextBox textBox4;private: System:Windows:Forms:GroupBox groupBox1;private: System:Windows:Forms:RichTextBox richTextBox1;private: System:Windows:Forms:SaveFileDialog saveFileDialog1;private: System:Windows:Forms:Button button7;pri

29、vate: System:Windows:Forms:OpenFileDialog openFileDialog1; protected:/ / 清理所有正在使用的資源。/ Form1()if (components)delete components;private: System:Windows:Forms:MenuStrip menuStrip1;protected: private: System:Windows:Forms:ToolStripMenuItem 瀏覽ToolStripMenuItem;private: System:Windows:Forms:ToolStripMenu

30、Item 查看所有ToolStripMenuItem;private: System:Windows:Forms:ToolStripMenuItem 保存結(jié)果ToolStripMenuItem;private: System:Windows:Forms:ToolStripSeparator toolStripMenuItem1;private: System:Windows:Forms:ToolStripMenuItem 退出ToolStripMenuItem1;private: System:Windows:Forms:ToolStripMenuItem 查詢ToolStripMenuIte

31、m;private: System:Windows:Forms:ToolStripMenuItem 精確查詢ToolStripMenuItem;private: System:Windows:Forms:ToolStripMenuItem 模糊查詢ToolStripMenuItem;private: System:Windows:Forms:ToolStripMenuItem 添加ToolStripMenuItem;private: System:Windows:Forms:ToolStripMenuItem 修改ToolStripMenuItem;private: System:Window

32、s:Forms:ToolStripMenuItem 刪除ToolStripMenuItem;private: System:Windows:Forms:ToolStripMenuItem 刷新ToolStripMenuItem;private: System:Windows:Forms:ToolStripMenuItem 退出ToolStripMenuItem;private: System:Windows:Forms:Label label1;private: System:Windows:Forms:Label label2;private: System:Windows:Forms:La

33、bel label3;private: System:Windows:Forms:DataGridView dataGridView1;private: System:Windows:Forms:Button button1;private: System:Windows:Forms:Button button2;private: System:Windows:Forms:ComboBox comboBox1;private: System:Windows:Forms:TextBox textBox1;private:/ / 必需的設(shè)計(jì)器變量。/ System:ComponentModel:C

34、ontainer components;#pragma region Windows Form Designer generated code/ / 設(shè)計(jì)器支持所需的方法 - 不要/ 使用代碼編輯器修改此方法的內(nèi)容。/ void InitializeComponent(void)this-menuStrip1 = (gcnew System:Windows:Forms:MenuStrip();this-瀏覽ToolStripMenuItem = (gcnew System:Windows:Forms:ToolStripMenuItem();this-查看所有ToolStripMenuItem

35、= (gcnew System:Windows:Forms:ToolStripMenuItem();this-保存結(jié)果ToolStripMenuItem = (gcnew System:Windows:Forms:ToolStripMenuItem();this-toolStripMenuItem1 = (gcnew System:Windows:Forms:ToolStripSeparator();this-退出ToolStripMenuItem1 = (gcnew System:Windows:Forms:ToolStripMenuItem();this-查詢ToolStripMenuIt

36、em = (gcnew System:Windows:Forms:ToolStripMenuItem();this-精確查詢ToolStripMenuItem = (gcnew System:Windows:Forms:ToolStripMenuItem();this-模糊查詢ToolStripMenuItem = (gcnew System:Windows:Forms:ToolStripMenuItem();this-添加ToolStripMenuItem = (gcnew System:Windows:Forms:ToolStripMenuItem();this-修改ToolStripMe

37、nuItem = (gcnew System:Windows:Forms:ToolStripMenuItem();this-刪除ToolStripMenuItem = (gcnew System:Windows:Forms:ToolStripMenuItem();this-刷新ToolStripMenuItem = (gcnew System:Windows:Forms:ToolStripMenuItem();this-退出ToolStripMenuItem = (gcnew System:Windows:Forms:ToolStripMenuItem();this-label1 = (gcn

38、ew System:Windows:Forms:Label();this-label2 = (gcnew System:Windows:Forms:Label();this-label3 = (gcnew System:Windows:Forms:Label();this-dataGridView1 = (gcnew System:Windows:Forms:DataGridView();this-button1 = (gcnew System:Windows:Forms:Button();this-button2 = (gcnew System:Windows:Forms:Button();

39、this-comboBox1 = (gcnew System:Windows:Forms:ComboBox();this-textBox1 = (gcnew System:Windows:Forms:TextBox();this-sqlConnection1 = (gcnew System:Data:SqlClient:SqlConnection();this-sqlSelectCommand1 = (gcnew System:Data:SqlClient:SqlCommand();this-sqlInsertCommand1 = (gcnew System:Data:SqlClient:Sq

40、lCommand();this-sqlUpdateCommand1 = (gcnew System:Data:SqlClient:SqlCommand();this-sqlDeleteCommand1 = (gcnew System:Data:SqlClient:SqlCommand();this-sqlDataAdapter1 = (gcnew System:Data:SqlClient:SqlDataAdapter();this-sqlCommand1 = (gcnew System:Data:SqlClient:SqlCommand();this-label8 = (gcnew Syst

41、em:Windows:Forms:Label();this-label6 = (gcnew System:Windows:Forms:Label();this-label5 = (gcnew System:Windows:Forms:Label();this-label4 = (gcnew System:Windows:Forms:Label();this-button3 = (gcnew System:Windows:Forms:Button();this-button4 = (gcnew System:Windows:Forms:Button();this-button5 = (gcnew

42、 System:Windows:Forms:Button();this-button6 = (gcnew System:Windows:Forms:Button();this-textBox3 = (gcnew System:Windows:Forms:TextBox();this-label7 = (gcnew System:Windows:Forms:Label();this-textBox5 = (gcnew System:Windows:Forms:TextBox();this-textBox2 = (gcnew System:Windows:Forms:TextBox();this-

43、textBox4 = (gcnew System:Windows:Forms:TextBox();this-groupBox1 = (gcnew System:Windows:Forms:GroupBox();this-richTextBox1 = (gcnew System:Windows:Forms:RichTextBox();this-saveFileDialog1 = (gcnew System:Windows:Forms:SaveFileDialog();this-button7 = (gcnew System:Windows:Forms:Button();this-openFile

44、Dialog1 = (gcnew System:Windows:Forms:OpenFileDialog();this-menuStrip1-SuspendLayout();(cli:safe_cast(this-dataGridView1)-BeginInit();this-groupBox1-SuspendLayout();this-SuspendLayout();/ / menuStrip1/ this-menuStrip1-Items-AddRange(gcnew cli:array(7) this-瀏覽ToolStripMenuItem, this-查詢ToolStripMenuIt

45、em, this-添加ToolStripMenuItem, this-修改ToolStripMenuItem, this-刪除ToolStripMenuItem, this-刷新ToolStripMenuItem, this-退出ToolStripMenuItem);this-menuStrip1-Location = System:Drawing:Point(0, 0);this-menuStrip1-Name = LmenuStrip1;this-menuStrip1-Size = System:Drawing:Size(619, 25);this-menuStrip1-TabIndex

46、= 0;this-menuStrip1-Text = LmenuStrip1;/ / 瀏覽ToolStripMenuItem/ this-瀏覽ToolStripMenuItem-DropDownItems-AddRange(gcnew cli:array(4) this-查看所有ToolStripMenuItem, this-保存結(jié)果ToolStripMenuItem, this-toolStripMenuItem1, this-退出ToolStripMenuItem1);this-瀏覽ToolStripMenuItem-Name = L瀏覽ToolStripMenuItem;this-瀏覽T

47、oolStripMenuItem-ShortcutKeys = static_cast(System:Windows:Forms:Keys:Alt | System:Windows:Forms:Keys:F);this-瀏覽ToolStripMenuItem-Size = System:Drawing:Size(58, 21);this-瀏覽ToolStripMenuItem-Text = L瀏覽(&F);/ / 查看所有ToolStripMenuItem/ this-查看所有ToolStripMenuItem-Name = L查看所有ToolStripMenuItem;this-查看所有To

48、olStripMenuItem-ShortcutKeys = static_cast(System:Windows:Forms:Keys:Control | System:Windows:Forms:Keys:A);this-查看所有ToolStripMenuItem-Size = System:Drawing:Size(189, 22);this-查看所有ToolStripMenuItem-Text = L查看所有(M);this-查看所有ToolStripMenuItem-Click += gcnew System:EventHandler(this, &Form1:查看所有ToolStripMenuItem_Clic