概括VB.NET Access數據庫連接

　　 　　在向大家詳細介紹VBNET Access數據庫連接之前首先讓大家了解下VBNET的簡介然後全面介紹VBNET Access數據庫連接

　　Visual BasicNET 是從 Visual Basic 語言演變而來的是一種為高效地生成類型安全和面向對象的應用程序而設計的語言Visual Basic 允許開發人員開發面向 WindowsWeb 和移動設備的程序與所有面向 Microsoft NET Framework 的語言一樣使用 Visual Basic 編寫的程序都具有安全性和語言互操作性方面的優點這一代 Visual Basic 延續了為您提供一種簡單快捷的方法來創建基於 NET Framework 的應用程序的傳統

　　VBNET的簡介

　　VBNET是微軟最新平台技術frameworkSDK的一種語言VBNET和VC#NET在功能上沒有區別編譯以後生成的可執行文件被稱為Assembly即程序集的版本號是VB它的運行是建立在CLR(CommonLanguageRuntime)和MSIL(MicrosoftIntermediateLanguage)虛擬器上的其實它的機制和Java差不多

　　VBNET Access數據庫連接

　　采用OleDbConnection對象

　　
Private Function getAccessConnection() As OleDbConnection   
Dim dbConnectionString As String = Provider=MicrosoftJetOLEDB;   
Data Source=|DataDirectory|\Resources\magmdb;Persist Security Info=true   
Dim dbConnection As OleDbConnection = New OleDbConnection(dbConnectionString)   
Try   
dbConnectionOpen()   
Catch Ex As Exception   
MsgBox(ErrDescription)   
End Try   
Return dbConnection   
End Function 

　　
private Sub fillDataGridView()   
 
Dim sqlStr As String = select * from Table  
Dim DataAdapter As New OleDbDataAdapter   
Dim dataSet As New DataSet   
Dim DataGridView As New DataGridView   
Dim dbConnection As OleDbConnection = getAccessConnection()   
 
If dbConnectionStateToString = Closed Then   
MsgBox(Chr() &  access 數據庫連接失敗  & Chr()  警告)   
Exit Sub   
End If   
 
DataAdapterSelectCommand = New OleDbCommand(sqlStrdbConnection)   
 
Try   
DataAdapterFill(dataSetTable)   
DataGridViewDataSource = dataSetTables(Table)DefaultView   
Catch Ex As Exception   
MsgBox(ErrDescription)   
 
Finally   
dataSetDispose   
DataAdapterDispose   
dbConnectionClose   
dbConnectionDispose   
End Try   
 
End Sub 

　　VBNET Access數據庫文件可以通過 My Project > 資源 > 添加資源 > 添加現有文件 這樣的方式來添加調試狀態下每次運行項目Resources下面的數據庫將會覆蓋Debug下的數據庫

From:http://tw.wingwit.com/Article/program/net/201311/12382.html