日韩无码专区无码一级三级片|91人人爱网站中日韩无码电影|厨房大战丰满熟妇|AV高清无码在线免费观看|另类AV日韩少妇熟女|中文日本大黄一级黄色片|色情在线视频免费|亚洲成人特黄a片|黄片wwwav色图欧美|欧亚乱色一区二区三区

家喜歡用VB.NET編程嗎？在這里給大家介紹一下VB.NET，然后全面介紹VB.NET Access數(shù)據(jù)庫連接，大家來看看吧。 Visual Basic.NET 是從 Visual Basic 語言演變而來的，是一種為高效地生成類型安全和面向?qū)ο蟮膽?yīng)用程序而設(shè)計的語言。Visual Basic 允許開發(fā)人員開發(fā)面向 Windows、Web 和移動設(shè)備的程序。與所有面向 Microsoft .NET Framework 的語言一樣，使用 Visual Basic 編寫的程序都具有安全性和語言互操作性方面的優(yōu)點(diǎn)。這一代 Visual Basic 延續(xù)了為您提供一種簡單快捷的方法來創(chuàng)建基于 .NET Framework 的應(yīng)用程序的傳統(tǒng)。
 
VB.NET介紹

創(chuàng)新互聯(lián)主營黃陵網(wǎng)站建設(shè)的網(wǎng)絡(luò)公司,主營網(wǎng)站建設(shè)方案,app軟件開發(fā),黃陵h5微信小程序開發(fā)搭建,黃陵網(wǎng)站營銷推廣歡迎黃陵等地區(qū)企業(yè)咨詢

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

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

采用OleDbConnection對象

 
 
 

  
  
  
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ù)庫連接失敗 " & 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ù)庫文件，可以通過 My Project -> 資源 -> 添加資源 -> 添加現(xiàn)有文件 這樣的方式來添加調(diào)試狀態(tài)下，每次運(yùn)行項(xiàng)目，Resources下面的數(shù)據(jù)庫將會覆蓋Debug下的數(shù)據(jù)庫，上述有VB.NET介紹和VB.NET Access數(shù)據(jù)庫連接的代碼，希望可以給大家?guī)砑夹g(shù)上的提高。

網(wǎng)站欄目：基礎(chǔ)篇：VB.NET介紹Access數(shù)據(jù)庫連接
網(wǎng)頁地址：http://m.5511xx.com/article/cccghhg.html