對(duì)數(shù)據(jù)庫(kù)操作的基本內(nèi)容

訪問(wèn)數(shù)據(jù)庫(kù)的機(jī)制1：使用“數(shù)據(jù)命令(Command)+數(shù)據(jù)讀取器”(Datareader)建立Connection對(duì)象(conn)?建立Command對(duì)象(comm)?建立DataReader(odr)對(duì)象?設(shè)置連接字符串?打開(kāi)conn的連接設(shè)置數(shù)據(jù)命令對(duì)象comm的Connection屬性、Commandtype屬性和Commandtext屬性調(diào)用Command對(duì)象的ExcuteReader的方法，并將查詢結(jié)果賦給dr對(duì)象利用odr的hasrows屬性判斷數(shù)據(jù)讀取器對(duì)象是否包含數(shù)據(jù)記錄?利用一個(gè)循環(huán)來(lái)反復(fù)調(diào)用odr對(duì)象的Read方法，讀取返回的數(shù)據(jù)調(diào)用odr對(duì)象的Close方法來(lái)關(guān)閉數(shù)據(jù)讀取器一關(guān)閉連接。例如：登陸窗口窗體級(jí)對(duì)象DimconnAsOleDb.OleDbConnectionDimcmdAsNewOleDb.OleDbCommandDimdrAsOleDb.OleDbDataReaderDimdaAsNewOleDb.OleDbDataAdapterDimdsAsNewDataSetDimbmDataAsBindingManagerBase?按鈕的Click事件DimsqlAsStringconn=NewOleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;DataSource="&Application.StartupPath&"\stuinfo.mdb")conn.Open()cmd=NewOleDb.OleDbCommand()sql=""select*from用戶表Where用戶名二?""& & “"'cmd.Connection=conncmd.CommandType=CommandType.Textcmd.CommandText=sqldr=comm..ExecuteReader2:使用“數(shù)據(jù)適配器(DataAdapter)+數(shù)據(jù)集(DataSet)”建立Connection對(duì)象(conn)f建立Command對(duì)象(comm)~建立DataAdapter對(duì)象(oda)f建立DataSet對(duì)象(ods)~建立DataTable對(duì)象(odt)設(shè)置連接字符串一打開(kāi)conn的連接設(shè)置數(shù)據(jù)命令對(duì)象comm的Connection屬性、Commandtype屬性和Commandtext屬性調(diào)用da對(duì)象的Fill方法，填充ds對(duì)象中的DataTable對(duì)象建立DataRow和DataColumn對(duì)象或者利用odt對(duì)象的相關(guān)屬性(Rows或者Columns)訪問(wèn)數(shù)據(jù)集中的表。例如：DimconnAsOleDb.OleDbConnectionDimcmdAsNewOleDb.OleDbCommandDimdrAsOleDb.OleDbDataReaderDimdaAsNewOleDb.OleDbDataAdapterDimdsAsNewDataSetDimbmDataAsBindingManagerBase?窗體的Load事件DimsqlAsStringconn=NewOleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;DataSource="&Application.StartupPath&"\stuinfo.mdb")conn.Open()cmd=NewOleDb.OleDbCommand()sql="select*from學(xué)生信息表"cmd.Connection=conncmd.CommandType=CommandType.Textcmd.CommandText=sqlda.SelectCommand=cmd?如果要下面的這個(gè)對(duì)象的聲明，那么在對(duì)數(shù)據(jù)的添加修改保存時(shí)就比較簡(jiǎn)單，直接使用數(shù)據(jù)集的對(duì)應(yīng)命令即可DimobdAsNewOleDb.OleDbCommandBuilder(da)da.Fill(ds,"學(xué)生信息表")DataGridView1.DataSource=ds.Tables("學(xué)生信息表").DefaultView數(shù)據(jù)綁定1、單一綁定所謂“單一綁定”是指將單一的數(shù)據(jù)元素綁定到控件的某個(gè)屬性。例如，將TextBox控件的Text屬性與“學(xué)生信息”數(shù)據(jù)表中的“姓名”字段進(jìn)行綁定。綁定語(yǔ)法格式如下：控件名稱.DataBindings.Add（"控件的屬性名稱",數(shù)據(jù)源，"數(shù)據(jù)成員"）（1）控件的屬性名稱該參數(shù)為字符串形式，指定綁定到控件的哪一個(gè)屬性。（2）數(shù)據(jù)源該參數(shù)為變量形式，可以是DataSet、DataTable、DataView或者數(shù)組等多種形式。（3）數(shù)據(jù)成員該參數(shù)為字符串形式，是數(shù)據(jù)源的子集合。如果數(shù)據(jù)源是DataSet,那么數(shù)據(jù)成員就是“DataTable.字段名稱”；如果數(shù)據(jù)源是DataTable,那么數(shù)據(jù)成員就是“字段名稱”。例如：TextBox1.DataBindings.Add（NewBinding（"Text",ds,"學(xué)生信息表.學(xué)號(hào)"））TextBox2.DataBindings.Add（NewBinding（"Text",ds,"學(xué)生信息表.姓名"））2、復(fù)合綁定所謂“復(fù)合綁定”是指控件和一個(gè)以上的數(shù)據(jù)元素進(jìn)行綁定，通常是指把控件和數(shù)據(jù)集中的多條數(shù)據(jù)記錄或者多個(gè)字段值、數(shù)組中的多個(gè)數(shù)組元素進(jìn)行綁定。DataGridView、ComboBox、ListBox和CheckedListBox等控件都支持復(fù)合數(shù)據(jù)綁定。語(yǔ)法格式為：控件名稱?DataSource=^據(jù)源.Tables（"數(shù)據(jù)成員"）.DefaultView例如，將DataGridView控件與數(shù)據(jù)集DataSet綁定，以便同時(shí)顯示數(shù)據(jù)表中的所有數(shù)據(jù)記錄。DataGridViewl.DataSource=ods.Tables（"班級(jí)信息”）.DefaultView記錄導(dǎo)航單擊【首記錄】按鈕（bntFirst），顯示數(shù)據(jù)表中的第一條記錄；單擊【上一條】按鈕（bntBack），顯示數(shù)據(jù)表中的上一條記錄；單擊【下一條】按鈕（bntNext），顯示下一條記錄；單擊【尾記錄】按鈕（bntLast），顯示最后一條記錄。1、單一綁定的控件導(dǎo)航例如：'取得代表"班級(jí)信息"數(shù)據(jù)表的CurrencyManager對(duì)象?為前面聲明的BindingManagerBase類的變量bmData賦值，使用該變量代表“班級(jí)信息”表的CurrencyManager對(duì)象，在其后需要使用代表“班級(jí)信息”表的CurrencyManager對(duì)象時(shí)，就可以直接使用bmData變量而不需要使用BindingContext類來(lái)獲取bmData=Me.BindingContext（ods,"班級(jí)信息"）?設(shè)定當(dāng)觸發(fā)PositionChanged事件時(shí)便執(zhí)行事件處理程序PositionChangedAddHandlerbmData.PositionChanged,AddressOfPositionChangedbntFirst單擊事件：bntLast單擊事件：bmData.Position=bmData.Count-lbntBack單擊事件：IfbmData.Position>0ThenbmData.Position-=1bntNext單擊事件：IfbmData.Position<bmData.Count—1ThenbmData.Position+=12、復(fù)合綁定控件的導(dǎo)航如果還想要對(duì)復(fù)雜綁定的控件進(jìn)行導(dǎo)航，就必須進(jìn)行判斷。也就是說(shuō)要將“當(dāng)前行”(bmData.Position)作為選中行(反向顯示)，其他行正常顯示，就可以實(shí)現(xiàn)導(dǎo)航。這要用到Rows集合中的Selected屬性，該屬性為True時(shí)表示該行被選中，為False時(shí)表示未被選中。例如：對(duì)DataGridView控件的導(dǎo)航DataGridView1.Rows(n).Selected=TrueDataGridView1.Rows(n).Selected=False記錄的操作1、聲明OleDbCommandBuilder對(duì)象?如果要下面的這個(gè)對(duì)象的聲明，那么在對(duì)數(shù)據(jù)的添加修改保存時(shí)就比較簡(jiǎn)單，直接使用數(shù)據(jù)集的對(duì)應(yīng)命令即可DimobdAsNewOleDb.OleDbCommandBuilder(da)對(duì)記錄的操作基本上包括“新增”、“添加”、“刪除”等操作。由于在做操作時(shí)已經(jīng)對(duì)應(yīng)更新到數(shù)據(jù)庫(kù)中，所以不需要保存按鈕。例如：“新增”按鈕TextBox1.Text=""TextBox2.Text=""ComboBox1.Text=""“添加”按鈕DimnRowAsDataRow=ds.Tables("學(xué)生信息表").NewRownRow("學(xué)號(hào)")=Trim(TextBoxl.Text)nRow("性別")=Trim(ComboBoxl.Text)ds.Tables("學(xué)生信息表").Rows.Add(nRow)da.Update(ds,"學(xué)生信息表")ds.Clear()da.Fill(ds,"學(xué)生信息表〃)“刪除”按鈕DimdelrowAsIntegerdelrow=學(xué)生信息表DataGridView.CurrentRow.Index '當(dāng)前選中行Ifdelrow>=0Anddelrow<ds.Tables("學(xué)生信息表").Rows.CountThenDimiAsIntegerds.Tables("學(xué)生信息表").Rows(delrow).Delete()da.Update(ds,"學(xué)生信息表")ds.Clear()da.Fill(ds,"學(xué)生信息表")EndIf2、沒(méi)有聲明0leDbCommandBuilder對(duì)象如果沒(méi)有聲明OleDbCommandBuilder對(duì)象，那么對(duì)數(shù)據(jù)的添加修改保存就要使用相應(yīng)的SQL語(yǔ)句。例如：“添加”按鈕DiminupsqlAsStringinupsql="insertinto學(xué)生信息表(學(xué)號(hào),姓名)values("&"'"&學(xué)號(hào)TextBox.Text&"',"& &姓名TextBox.Text&"')"conn.0pen()cmd=New0leDb.0leDbCommand()cmd.Connection=conncmd.CommandType=CommandType.Textcmd.CommandText=inupsqlcmd.ExecuteNonQuery()conn.Close()ds.Clear()da.Fill(ds,"學(xué)生信息表")“新增”按鈕TextBox1.Text=""TextBox2.Text=""ComboBox1.Text=""“刪除”按鈕DimdelsqlAsStringdelsql="deletefrom學(xué)生信息表where學(xué)號(hào)二&學(xué)號(hào)TextBox.Text&conn.0pen()cmd=New0leDb.0leDbCommand()cmd.Connection=conncmd.CommandType=CommandType.Textcmd.CommandText=delsqlcmd.ExecuteNonQuery()conn.Close()MessageBox.Show("刪除成功！"，"刪除提示")ds.Clear()da.Fill(ds,"學(xué)生信息表〃)“修改保存”按鈕DiminupsqlAsStringinupsql="update學(xué)生信息表"&"set學(xué)號(hào)二&學(xué)號(hào)TextBox.Text&"',"&"姓名二'"&姓名TextBox.Text&"'"&_"where學(xué)號(hào)二'"&學(xué)號(hào)TextBox.Text&"'"conn.Open()cmd=NewOleDb.OleDbCommand()cmd.Connection=conncmd.CommandType=CommandType.Textcmd.CommandText=inupsqlcmd.ExecuteNonQuery