vb.net數(shù)據(jù)庫(kù)編程 vbnet數(shù)據(jù)庫(kù)編程例子

vb.net實(shí)現(xiàn)sqlite數(shù)據(jù)庫(kù)編程示例

;?? 在項(xiàng)目開發(fā)中充分體會(huì)到了一個(gè)精簡(jiǎn)數(shù)據(jù)存儲(chǔ)模塊的重要性及實(shí)用性 在綜合了三年開發(fā)經(jīng)驗(yàn)的基礎(chǔ)上 向各位推介一下sqlite數(shù)據(jù)庫(kù) 希望更多的程序猿支持開源精神 ??? ??? Imports System data SQLite??? ??? Public Class Form ??? ??? Dim conn As SQLiteConnection??? ??? Private Sub Button _Click（ByVal sender As System Object ByVal e As System EventArgs） Handles Button Click??? ??? If System IO File Exists（ test db ） = True Then??? ??? System IO File Delete（ test db ）??? ??? End If??? ??? SQLiteConnection CreateFile（ test db ）??? ??? conn = New SQLiteConnection（ Data Source=test db ;Pooling=true;FailIfMissing=false ）??? ??? If conn State ConnectionState Open Then??? ??? conn Open（）??? ??? MsgBox（ 打開成功！ ）??? ??? End If??? ??? Dim cmd As New SQLiteCommand??? ??? cmd Connection = conn??? ??? cmd CommandText = CREATE TABLE Test （ID INTEGER PRIMARY KEY TestName VARCHAR（ ） TestTime DateTime Operator VARCHAR（ ）） ??? ??? Dim result As Integer = cmd ExecuteNonQuery（）??? ??? If result = Then??? ??? MsgBox（ 成功 ）??? ??? Else??? ??? MsgBox（ 失敗 ）??? ??? End If??? ??? cmd = conn CreateCommand（）??? ??? cmd CommandText = insert into Test（TestName TestTime Operator）values（@Name @TestTime @Operator） ??? ??? cmd Parameters Add（ @Name Data DbType String） Value = 動(dòng)靜 ??? ??? cmd Parameters Add（ @TestTime Data DbType DateTime） Value = Now（）??? ??? cmd Parameters Add（ @Operator Data DbType String） Value = peer ??? ??? result = cmd ExecuteNonQuery（）??? ??? If result Then??? ??? MsgBox（ 插入成功 ）??? ??? End If??? ??? SelectShowInfo（）??? ??? ??? ??? cmd = conn CreateCommand（）??? ??? cmd CommandText = update? Test set TestName= 動(dòng)靜 ??? ??? result = cmd ExecuteNonQuery（）??? ??? If result Then??? ??? MsgBox（ 更新成功 ）??? ??? End If??? ??? ??? SelectShowInfo（）??? ??? ??? ??? cmd = conn CreateCommand（）??? ??? cmd CommandText = delete from Test ??? ??? result = cmd ExecuteNonQuery（）??? ??? If result Then??? ??? MsgBox（ 刪除成功 ）??? ??? End If??? ??? SelectShowInfo（）??? ??? cmd Dispose（）??? ??? If conn State = ConnectionState Open Then??? ??? conn Close（）??? ??? End If??? ??? End Sub??? ??? Public Sub SelectShowInfo（）??? ??? Dim sa As New SQLiteDataAdapter（ select * from Test conn）??? ??? Dim ds As New System Data DataSet??? ??? sa Fill（ds Test ）??? ??? Dim mytable As New System Data DataTable??? ??? mytable = ds Tables（ Test ）??? ??? Me DataGridView DataSource = mytable??? ??? Me DataGridView Refresh（）??? ??? End Sub??? ??? End Class lishixinzhi/Article/program/net/201311/13874

創(chuàng)新互聯(lián)公司是專業(yè)的德安網(wǎng)站建設(shè)公司，德安接單;提供成都網(wǎng)站設(shè)計(jì)、網(wǎng)站制作,網(wǎng)頁(yè)設(shè)計(jì),網(wǎng)站設(shè)計(jì),建網(wǎng)站,PHP網(wǎng)站建設(shè)等專業(yè)做網(wǎng)站服務(wù);采用PHP框架,可快速的進(jìn)行德安網(wǎng)站開發(fā)網(wǎng)頁(yè)制作和功能擴(kuò)展;專業(yè)做搜索引擎喜愛的網(wǎng)站,專業(yè)的做網(wǎng)站團(tuán)隊(duì),希望更多企業(yè)前來(lái)合作!

我是新手學(xué)習(xí)VB.NET數(shù)據(jù)庫(kù)編程，我想知道如何用DataGridView顯示數(shù)據(jù)庫(kù)中的數(shù)據(jù)？

1.前臺(tái)配置數(shù)據(jù)源，那樣顯示有局限性。

2.用代碼綁定數(shù)據(jù)源，一般都是采用這種方法，其實(shí)很簡(jiǎn)單的。

可以參考小小的世界論壇。

vb.net+數(shù)據(jù)庫(kù)編程問(wèn)題

使用OleDb將數(shù)據(jù)庫(kù)綁定datagridview，然后添加RowHeaderMouseClick事件，在此事件中定義選中某一行后在textbox中顯示相應(yīng)的數(shù)據(jù)，在添加的按鈕中定義打開form2，用sql語(yǔ)句查詢數(shù)據(jù)庫(kù)得到想要的關(guān)鍵字所關(guān)聯(lián)的數(shù)據(jù)，顯示出來(lái)就可以了。這里我給你一部分我寫過(guò)的代碼，基本上和你的要求很像，但是不完全一樣，你自己研究研究，改改應(yīng)該就可以了。

'datagridview綁定數(shù)據(jù)庫(kù)

Public Class form1

Private ObjetConnection As OleDbConnection

Private ObjetCommand As OleDbCommand

Private ObjetDataAdapter As OleDbDataAdapter

Private ObjetSet As New DataSet()

' SQL語(yǔ)句

Private strSql As String

Private ObjetDataTable As DataTable

Private ObjetDataRow As DataRow

Private Numeroligne As Integer

'定義路徑

Private strConn As String

Private ObjetCommandBuilder As OleDbCommandBuilder

Dim dv As New DataView

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

strConn =

"Provider=Microsoft.ACE.OLEDB.12.0; Data source=" Application.StartupPath "\文件名.accdb" /此處文件路徑

strSql =

"Select * 表名 "

ObjetConnection =

New OleDbConnection()

ObjetConnection.ConnectionString = strConn

ObjetConnection.Open()

ObjetCommand =

New OleDbCommand(strSql)

ObjetDataAdapter =

New OleDbDataAdapter(ObjetCommand)

ObjetCommand.Connection() = ObjetConnection

ObjetDataAdapter.Fill(ObjetSet,

"表明")

dv.Table = ObjetSet.Tables(

"表名")

DataGridView1.DataSource = dv

　

ObjetConnection.Close()

End Sub

/此處是RowHeaderMouseclick事件

Private Sub DataGridView1_RowHeaderMouseClick(sender As Object, e As DataGridViewCellMouseEventArgs) Handles DataGridView1.RowHeaderMouseClick

此處添加顯示表中相應(yīng)信息

Me.TextBox1.text = DataGridView1.SelectedRows(0).Cells(0).Value

Me.TextBox2.text = DataGridView1.SelectedRows(0).Cells(1).Value

.........

End Sub

VB.NET分層開發(fā)的幾點(diǎn)心得

從這一章開始 我們將通過(guò)一個(gè)系列的講座來(lái)向諸位展現(xiàn)Visual Basic Net的獨(dú)特魅力以及使用它開發(fā)應(yīng)用程序的基本方法 Visual Basic Net是微軟公司在 年推出的一種開發(fā)基于 Net平臺(tái)應(yīng)用程序的開發(fā)語(yǔ)言 也是微軟公司極力推薦的一種開發(fā) Net平臺(tái)應(yīng)用程序的開發(fā)語(yǔ)言 首先還是讓我們來(lái)簡(jiǎn)單了解一下Visual Basic Net和其前一個(gè)版本 也是目前世界上擁有最多使用者的開發(fā)語(yǔ)言 Visual Basic 的主要區(qū)別 一 Visual Basic和Visual Basic Net的主要區(qū)別 雖然說(shuō)Visual Basic Net是Visual Basic 的后繼版本 但在我看來(lái)Visual Basic Net除了在語(yǔ)法上還保留Visual Basic原有的蹤影以外 因?yàn)槎邘缀踉?％以上保持相似或相同 但在其他很多方面 Visual Basic Net都和Visual Basic截然不同 也許正是這些不同點(diǎn) 才使得Visual Basic Net功能更強(qiáng)大 更有生命力 但同樣也為Visual Basic程序員轉(zhuǎn)型為為Visual Basic Net程序員帶來(lái)了困難 因?yàn)閂isual Basic Net提出了很多新的功能 概念和觀點(diǎn) 掌握Visual Basic Net不僅要掌握語(yǔ)法 還需要理解并運(yùn)用這些新的功能 概念和觀點(diǎn) 當(dāng)然也需要掌握 Net框架 理解CLR（Common Language Runtime 通用語(yǔ)言進(jìn)行時(shí)） 下面就從數(shù)據(jù)訪問(wèn) Web開發(fā)和組件創(chuàng)建三個(gè)方面來(lái)簡(jiǎn)要談?wù)劧叩膮^(qū)別 數(shù)據(jù)訪問(wèn) 不同點(diǎn)主要表現(xiàn)在 數(shù)據(jù)訪問(wèn)技術(shù) 數(shù)據(jù)訪問(wèn)具體實(shí)現(xiàn)方法和數(shù)據(jù)綁定上的不同 在數(shù)據(jù)訪問(wèn)技術(shù)上 Visual Basic 是通過(guò)ADO（Active X Data Object 即 Active X數(shù)據(jù)對(duì)象）來(lái)實(shí)現(xiàn)對(duì)數(shù)據(jù)庫(kù)訪問(wèn)的 同時(shí)為了保證對(duì)早期版本的兼容 也提供RDO（遠(yuǎn)程數(shù)據(jù)對(duì)象）和DAO（數(shù)據(jù)訪問(wèn)對(duì)象）二種數(shù)據(jù)訪問(wèn)技術(shù) 在Visual Basic Net中是使用ADO NET來(lái)訪問(wèn)數(shù)據(jù)庫(kù) ADO NET是 NET框架的一部分 其對(duì)應(yīng)的類庫(kù)是 Net FramWork SDK的真子集 ADO和ADO NET這兩種技術(shù)在概念 功能和實(shí)現(xiàn)上都有許多差異 由于篇幅所限 這里就不一一介紹了 其實(shí)在Visual Basic Net中也可以使用ADO來(lái)訪問(wèn)數(shù)據(jù)庫(kù) 但ADO在Visual Basic Net中是以組件的形式出現(xiàn)的 通過(guò)添加引用才可以在Visual Basic Net中使用 添加引用的過(guò)程 其實(shí)就是對(duì)組件互操作 經(jīng)過(guò)互操作后的組件 已經(jīng)并非先前意義上的組件 而是轉(zhuǎn)變成可供Visual Basic Net直接使用的 Net類庫(kù) 在數(shù)據(jù)訪問(wèn)的具體實(shí)現(xiàn)方法上 Visual Basic 實(shí)現(xiàn)數(shù)據(jù)訪問(wèn)主要是兩種方法 其一是在程序設(shè)計(jì)階段 可通過(guò)把數(shù)據(jù)源綁定到ADODC控件或使用數(shù)據(jù)環(huán)境 其二在運(yùn)行時(shí) 可以通過(guò)編程方式創(chuàng)建記錄集RecordSet對(duì)象并與記錄集對(duì)象交換數(shù)據(jù) 同樣在Visual Basic Net中實(shí)現(xiàn)數(shù)據(jù)訪問(wèn)的方法主要也是二種 其一是在程序設(shè)計(jì)階段 通過(guò)創(chuàng)建 配置數(shù)據(jù)適配器DataAdapter和生成數(shù)據(jù)集DataSet 其二在運(yùn)行中 通過(guò)編程方式動(dòng)態(tài)創(chuàng)建 配置數(shù)據(jù)適配器和創(chuàng)建 生成數(shù)據(jù)集 在數(shù)據(jù)綁定（Data Bind）上 在Visual Basic 中實(shí)現(xiàn)數(shù)據(jù)綁定通過(guò)設(shè)置控件的下列屬性來(lái)實(shí)現(xiàn) DataChanged DataField DataFormat DataMember 和 DataSource 通常是把控件的顯示屬性綁定到數(shù)據(jù)源中的相應(yīng)字段 在Visual Basic Net中 數(shù)據(jù)綁定的應(yīng)用范圍可廣泛得多 Visual Basic Net中可以將任何控件的任何屬性綁定到包含數(shù)據(jù)的任何結(jié)構(gòu)中 Web開發(fā) Visual Basic是使用Active Server Page（簡(jiǎn)稱ASP）來(lái)創(chuàng)建在 Web應(yīng)用程序 在ASP中 編寫Web頁(yè)面并非純正的Visual Basic語(yǔ)言 而是Visual Basic腳本語(yǔ)言 VBScript 在Visual Basic Net中是使用ASP NET技術(shù)來(lái)編寫Web頁(yè)面 在ASP NET中使用的也不再是腳本語(yǔ)言 而是真正意義編程語(yǔ)言 其中就可以是Visual Basic Net 開發(fā)過(guò)ASP頁(yè)面的朋友都清楚 雖然編寫ASP頁(yè)面對(duì)開發(fā)工具要求很低 但由于其是面向過(guò)程式開發(fā) 所以稍微復(fù)雜一點(diǎn)的ASP代碼都顯得雜亂無(wú)章 這都給程序設(shè)計(jì) 調(diào)試 修改帶來(lái)了麻煩 而Visual Basic Net是建立在新的框架結(jié)構(gòu)上 Visual Basic Net完全支持Web編程 憑借ASP NET的Web 應(yīng)用程序 XML Web services等等基于Web上的功能 使得Visual Basic Net開發(fā)Web 頁(yè)面與開發(fā)Windows編程很相似 Web頁(yè)面代碼也不顯得有條有理了 組件創(chuàng)建 在使用Visual Basic 和Visual Basic Net編寫應(yīng)用程序時(shí) 雖然都可以通過(guò)從工具箱中選擇組件 通過(guò)拖入方式在應(yīng)用程序中加入組件 但二者在實(shí)現(xiàn)機(jī)理上卻存在根本不同 在Visual Basic 中 應(yīng)用程序中創(chuàng)建的組件全部是組件 即可在應(yīng)用程序中使用的ActiveX控件 ActiveX 類型的DLL 和 ActiveX類型的EXE 而在Visual Basic Net中 向窗體中拖入的組件 都是基于繼承 從 Net框架提供的SDK中相應(yīng)的類繼承 經(jīng)過(guò)實(shí)例化后 通過(guò)添加功能才把組件加入到設(shè)計(jì)窗體中 這些過(guò)程都可以在Visual Basic Net的源代碼中找到 Visual Basic Net中使用的每一個(gè)組件都是從Component或Control基類派生出來(lái)的 當(dāng)然Visual Basic和Visual Basic Net之間還存在很多差別 如 Visual Basic 只提供單線程模式 并不支持多線程 而在Visual Basic Net全面支持多線程 并且在Visual Basic Net中還增加了結(jié)構(gòu)化異常處理等新的功能 所以對(duì)于那些Visual Basic的程序員 從Visual Basic程序員轉(zhuǎn)型到Visual Basic Net就有極強(qiáng)的必要性 下面就簡(jiǎn)要介紹一下這種必要性 二．從Visual Basic轉(zhuǎn)型到Visual Basic Net的必然和必要性 雖然Visual Basic得到了很多人的認(rèn)可 也有許多配套產(chǎn)品都提供了Visual Basic的接口 但隨之時(shí)間的延續(xù) 其缺點(diǎn)也逐漸暴露了 有些甚至是無(wú)法 容忍 的 首先作為一種解釋性的語(yǔ)言 不僅程序執(zhí)行速度慢 并且在分發(fā)應(yīng)用程序時(shí) 還需要帶上解釋庫(kù) 其次Visual Basic并非完全的面向?qū)ο蟮拈_發(fā)語(yǔ)言 從根本上說(shuō) 它應(yīng)該是一種面向過(guò)程的開發(fā)語(yǔ)言 而Visual Basic Net做為下一代的Visual Basic語(yǔ)言 它是一種為開發(fā) Net平臺(tái)應(yīng)用程序而度身定做的程序語(yǔ)言 因?yàn)閂isual Basic Net中完全集成了 Net FrameWork（ Net框架）和CLR（Common Language Runtime 即 公共語(yǔ)言運(yùn)行時(shí)） 同時(shí) Net 框架和公共語(yǔ)言運(yùn)行時(shí)又共同提供Visual Basic Net語(yǔ)言互操作性 垃圾資源回收 可靠安全性和版本改進(jìn)的支持 通過(guò)Visual Basic Net能夠簡(jiǎn)便 快捷地創(chuàng)建 Net平臺(tái)應(yīng)用程序 XML Web services 和 ASP NET Web 應(yīng)用程序 Visual Basic Net做為開發(fā) Net平臺(tái)的程序語(yǔ)言 那它就為開發(fā)現(xiàn)跨平臺(tái)程序創(chuàng)造了可能 因?yàn)槲覀冎?微軟推出 Net 其目的之一就是實(shí)現(xiàn)跨平臺(tái) 雖然目前微軟只提供了在Windows平臺(tái)上運(yùn)行的 Net框架 還無(wú)法實(shí)現(xiàn)真正意義上的跨平臺(tái) 但隨著MONO的出現(xiàn)（雖然它還存在很多問(wèn)題 并且目前的MONO只為C＃提供支持） 但可以預(yù)見的是在不久的將來(lái) Visual Basic Net實(shí)現(xiàn)Write Once And Run AnyWhere的時(shí)間不會(huì)太久 Visual Basic Net是一種編譯性的語(yǔ)言 但這種編譯和以前接觸的編譯有所區(qū)別 因?yàn)榻?jīng)過(guò)Visual Basic Net編譯器編譯后得到文件并不是可以在計(jì)算機(jī)直接運(yùn)行的二進(jìn)制文件 它的性質(zhì)是一種IL文件（中間語(yǔ)言文件） 在運(yùn)行IL文件時(shí) 首先是通過(guò)CLR下的JIT（即時(shí)編譯器） 把這種IL文件再編譯成二進(jìn)制文件 我們看到的程序運(yùn)行 其實(shí)是經(jīng)過(guò)JIT編譯后的二進(jìn)制文件在執(zhí)行 這時(shí)可能有很多朋友會(huì)問(wèn) 這種二次編譯是否多此一舉 具體實(shí)現(xiàn)中是否很麻煩 是否會(huì)影響程序的運(yùn)行速度？二次編譯的確是影響了程序運(yùn)行的速度 但它卻為實(shí)現(xiàn)跨平臺(tái)帶來(lái)了可能 其實(shí)這種編譯過(guò)程猶如Java中的JVM（Java虛擬機(jī)） 正是JVM才使得Java能夠開發(fā)出跨平臺(tái)的應(yīng)用程序 二次編譯是CLR在 Net框架下自動(dòng)實(shí)現(xiàn)IL文件到二進(jìn)制文件轉(zhuǎn)變的 它是一種自動(dòng)完成的 并不需要人員的參與 所以它并不會(huì)給程序執(zhí)行帶來(lái)麻煩 Visual Basic Net 還是一種真正的面向?qū)ο蟮拈_發(fā)語(yǔ)言 可以說(shuō)OOP思想已經(jīng)深入到語(yǔ)言中的任一角落 如 在Visual Basic Net中創(chuàng)建的Windows組件 就是從類中繼承 類經(jīng)過(guò)實(shí)例化得到的 Visual Basic Net還增加了許多新功能和改進(jìn)功能 如繼承 接口和重載等 這些都使Visual Basic Net成為功能強(qiáng)大的面向?qū)ο蟮木幊陶Z(yǔ)言 微軟公司在推出Visual Basic Net的同時(shí) 還推出了Visual Basic Net的開發(fā)工具Visual Studio Net Java程序員羨慕Visual Basic Net程序員的重要原因之一就是 Visual Basic Net擁有一個(gè)任何比目前Java程序員所使用的開發(fā)環(huán)境都好的集成開發(fā)環(huán)境 Visual Studio Net 三 Visual Basic Net開發(fā)利器Visual Studio Net簡(jiǎn)介 微軟公司提供了四個(gè)不同的Visual Studio Net版本 分別是 企業(yè)級(jí)結(jié)構(gòu)設(shè)計(jì)版 企業(yè)級(jí)開發(fā)版 專業(yè)版和學(xué)院版 其中學(xué)院版主要是為在校大學(xué)生學(xué)習(xí)Visual Studio Net準(zhǔn)備的 它又分成三個(gè)獨(dú)立的版本 Visual C＃標(biāo)準(zhǔn)版 Visual Basic Net標(biāo)準(zhǔn)版和Visual C＋＋標(biāo)準(zhǔn)版 上述的每一個(gè)版本的價(jià)格都不菲 現(xiàn)在在市面上買到主要是 張CD碟片的Visual Studio Net企業(yè)級(jí)結(jié)構(gòu)設(shè)計(jì)版 （請(qǐng)注意 本文介紹的是Visual Studio Net Net FrameWork SDK 版本號(hào)是 ）下面就以此版本討論一下如何安裝Visual Studio Net 安裝 Visual Studio NET 版本的系統(tǒng)要求 每一個(gè)版本的Visual Studio Net有著不同的組件組合 這也就決定了對(duì)計(jì)算機(jī)有著不同的系統(tǒng)要求 建議您的計(jì)算機(jī)系統(tǒng)滿足下列要求 操作系統(tǒng) Windows XP 專業(yè)版 Windows XP Home Windows 服務(wù)器版 Windows 專業(yè)版 Windows Workstation Windows NT Server Windows Net Server版處理器 Pentium II 級(jí) 主頻 MHz以上處理器 推薦使用Pentium II lishixinzhi/Article/program/net/201311/12194

VB程序設(shè)計(jì)一般的四個(gè)步驟

1、建立應(yīng)用程序界面

2、設(shè)置對(duì)象的屬性

3、編寫應(yīng)用程序的代碼

4、保存和運(yùn)行程序

VB擁有圖形用戶界面（GUI）和快速應(yīng)用程序開發(fā)（RAD）系統(tǒng)，可以輕易的使用DAO、RDO、ADO連接數(shù)據(jù)庫(kù)，或者輕松的創(chuàng)建Active?X控件，用于高效生成類型安全和面向?qū)ο蟮膽?yīng)用程序。程序員可以輕松的使用VB提供的組件快速建立一個(gè)應(yīng)用程序。

擴(kuò)展資料

VB語(yǔ)言缺點(diǎn)

Visual Basic 語(yǔ)言具有不支持繼承、無(wú)原生支持多線程、異常處理不完善等三項(xiàng)明顯缺點(diǎn)，使其有所局限性（此些缺點(diǎn)皆已在 vb .net 獲得改進(jìn)）。

1、不支持繼承

VB 5.0 和 VB 6.0 都是基于對(duì)象的編程語(yǔ)言，但是不包含繼承特性。VB 中提供了特殊的類的功能，但是還是不能滿足程序員的需求。

2、無(wú)原生支持多線程

Visual Basic 對(duì)于多線程無(wú)原生支持，只能通過(guò)Windows API的調(diào)用實(shí)現(xiàn)，且極其的不穩(wěn)定。因?yàn)樵贏PI創(chuàng)建的線程中，并沒(méi)有自動(dòng)初始化運(yùn)行時(shí)庫(kù)，導(dǎo)致部分的函數(shù)無(wú)法使用。一般的，在VB6等早期的VB開發(fā)環(huán)境下，使用API創(chuàng)建線程的目的是完成容易使程序假死的大量數(shù)據(jù)或者邏輯的計(jì)算。

3、異常處理不完善

Visual Basic 中內(nèi)置異常處理，即使未寫異常處理代碼，一旦用戶出錯(cuò)也會(huì)彈出一個(gè)明確寫出出錯(cuò)原因?qū)υ捒颍又绦蚪K止。

Visual Basic 中可以使用 Err.Raise拋出異常。對(duì)系統(tǒng)及用戶拋出的異常的處理常用兩種模式：一是使用 On Error Resume Next 處理錯(cuò)誤；另一種是使用 On Error Goto 將運(yùn)行引入錯(cuò)誤處理代碼。但相對(duì) C++ 等語(yǔ)言而言，這樣的異常處理破壞了代碼的結(jié)構(gòu)。

VB.Net數(shù)據(jù)庫(kù)編程的問(wèn)題

你的這個(gè)只寫刪除datagrid表格里的數(shù)據(jù)啦...跟本就沒(méi)有寫刪除數(shù)據(jù)庫(kù)的.也沒(méi)有更新數(shù)據(jù)庫(kù)的.

以下是刪除按鈕的代碼..

If MsgBox("數(shù)據(jù)刪除不可恢復(fù)，確認(rèn)刪除數(shù)據(jù)么？", vbYesNo) = vbYes Then

rec.Delete

rec.MoveNext

rec.Requery

End If

以下是form窗體的datagrid顯示數(shù)據(jù)表的代碼:

If rec.State = adStateOpen Then rec.Close

SQL = "select * from jbxx" '定義sql查詢語(yǔ)句

rec.Open SQL, con, adOpenStatic, adLockOptimistic '打開記錄集

Set dg.DataSource = rec '用datagrid控件顯示記錄集

以下是模塊..

Public con As New Connection '定義數(shù)據(jù)連接，公共變量

Public coon, coom As String

Sub Main()

ChDir App.Path '轉(zhuǎn)換相對(duì)路徑

con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=cq.mdb;Persist Security Info=False"

'定義數(shù)據(jù)庫(kù)連接

con.CursorLocation = adUseClient '以客戶端的方式打開

con.Open ' 打開連接

登陸.Show

End Sub

希望能幫到你...

標(biāo)題名稱：vb.net數(shù)據(jù)庫(kù)編程 vbnet數(shù)據(jù)庫(kù)編程例子
文章路徑：http://www.jiaotiyi.com/article/hgcgjh.html