日本综合一区二区|亚洲中文天堂综合|日韩欧美自拍一区|男女精品天堂一区|欧美自拍第6页亚洲成人精品一区|亚洲黄色天堂一区二区成人|超碰91偷拍第一页|日韩av夜夜嗨中文字幕|久久蜜综合视频官网|精美人妻一区二区三区

在向大家詳細(xì)介紹VB.NET Access數(shù)據(jù)庫(kù)連接之前，首先讓大家了解下VB.NET的簡(jiǎn)介，然后全面介紹VB.NET Access數(shù)據(jù)庫(kù)連接。

網(wǎng)站建設(shè)哪家好，找成都創(chuàng)新互聯(lián)！專(zhuān)注于網(wǎng)頁(yè)設(shè)計(jì)、網(wǎng)站建設(shè)、微信開(kāi)發(fā)、小程序開(kāi)發(fā)、集團(tuán)企業(yè)網(wǎng)站建設(shè)等服務(wù)項(xiàng)目。為回饋新老客戶(hù)創(chuàng)新互聯(lián)還提供了裕華免費(fèi)建站歡迎大家使用！

Visual Basic.NET 是從 Visual Basic 語(yǔ)言演變而來(lái)的，是一種為高效地生成類(lèi)型安全和面向?qū)ο蟮膽?yīng)用程序而設(shè)計(jì)的語(yǔ)言。Visual Basic 允許開(kāi)發(fā)人員開(kāi)發(fā)面向 Windows、Web 和移動(dòng)設(shè)備的程序。與所有面向 Microsoft .NET Framework 的語(yǔ)言一樣，使用 Visual Basic 編寫(xiě)的程序都具有安全性和語(yǔ)言互操作性方面的優(yōu)點(diǎn)。這一代 Visual Basic 延續(xù)了為您提供一種簡(jiǎn)單快捷的方法來(lái)創(chuàng)建基于 .NET Framework 的應(yīng)用程序的傳統(tǒng)。

VB.NET的簡(jiǎn)介

VB.NET是微軟***平臺(tái)技術(shù)，是.netframeworkSDK的一種語(yǔ)言。VB.NET和VC#.NET在功能上沒(méi)有區(qū)別。編譯以后生成的可執(zhí)行文件被稱(chēng)為Assembly，即程序集。VB.net的版本號(hào)是VB7.0，它的運(yùn)行是建立在CLR(CommonLanguageRuntime)和MSIL(MicrosoftIntermediateLanguage)虛擬器上的。其實(shí)，它的機(jī)制和Java差不多。

VB.NET Access數(shù)據(jù)庫(kù)連接

采用OleDbConnection對(duì)象

 
 
 

  
  
  
Private Function getAccessConnection() As OleDbConnection  
  
  
  
Dim dbConnectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0;  
  
  
  
Data Source=|DataDirectory|\Resources\mag.mdb;Persist Security Info=true"  
  
  
  
Dim dbConnection As OleDbConnection = New OleDbConnection(dbConnectionString)  
  
  
  
Try  
  
  
  
dbConnection.Open()  
  
  
  
Catch Ex As Exception  
  
  
  
’MsgBox(Err.Description)  
  
  
  
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 dbConnection.State.ToString = "Closed" Then  
  
  
  
MsgBox(Chr(13) & " access 數(shù)據(jù)庫(kù)連接失敗 " & Chr(13), , "警告")  
  
  
  
Exit Sub  
  
  
  
End If  
  
  
  
 
  
  
  
DataAdapter.SelectCommand = New OleDbCommand(sqlStr,dbConnection)  
  
  
  
 
  
  
  
Try  
  
  
  
DataAdapter.Fill(dataSet,"Table")  
  
  
  
DataGridView.DataSource = dataSet.Tables("Table").DefaultView  
  
  
  
Catch Ex As Exception  
  
  
  
MsgBox(Err.Description)  
  
  
  
 
  
  
  
Finally  
  
  
  
dataSet.Dispose  
  
  
  
DataAdapter.Dispose  
  
  
  
dbConnection.Close  
  
  
  
dbConnection.Dispose  
  
  
  
End Try  
  
  
  
 
  
  
  
End Sub 
 
 
 

VB.NET Access數(shù)據(jù)庫(kù)文件，可以通過(guò) My Project -> 資源 -> 添加資源 -> 添加現(xiàn)有文件 這樣的方式來(lái)添加調(diào)試狀態(tài)下，每次運(yùn)行項(xiàng)目，Resources下面的數(shù)據(jù)庫(kù)將會(huì)覆蓋Debug下的數(shù)據(jù)庫(kù)

【編輯推薦】

1. 講解VB.NET面向?qū)ο缶幊痰奶匦?/font>
2. 概括VB.NET Environment類(lèi)
3. 剖析VB.NET使用TreeView控件
4. 簡(jiǎn)單概述VB.NET訪問(wèn)類(lèi)型
5. 淺析VB.NET使用DrawString方法