概括VB.NETAccess数据库连接

在向大家详细介绍VB.NET Access数据库连接之前，首先让大家了解下VB.NET的简介，然后全面介绍VB.NET Access数据库连接。

网站建设哪家好，找成都创新互联！专注于网页设计、网站建设、微信开发、小程序开发、集团企业网站建设等服务项目。为回馈新老客户创新互联还提供了裕华免费建站欢迎大家使用！

Visual Basic.NET 是从 Visual Basic 语言演变而来的，是一种为高效地生成类型安全和面向对象的应用程序而设计的语言。Visual Basic 允许开发人员开发面向 Windows、Web 和移动设备的程序。与所有面向 Microsoft .NET Framework 的语言一样，使用 Visual Basic 编写的程序都具有安全性和语言互操作性方面的优点。这一代 Visual Basic 延续了为您提供一种简单快捷的方法来创建基于 .NET Framework 的应用程序的传统。

VB.NET的简介

VB.NET是微软***平台技术，是.netframeworkSDK的一种语言。VB.NET和VC#.NET在功能上没有区别。编译以后生成的可执行文件被称为Assembly，即程序集。VB.net的版本号是VB7.0，它的运行是建立在CLR(CommonLanguageRuntime)和MSIL(MicrosoftIntermediateLanguage)虚拟器上的。其实，它的机制和Java差不多。

VB.NET Access数据库连接

采用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 数据库连接失败 " & 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数据库文件，可以通过 My Project -> 资源 -> 添加资源 -> 添加现有文件 这样的方式来添加调试状态下，每次运行项目，Resources下面的数据库将会覆盖Debug下的数据库

【编辑推荐】

1. 讲解VB.NET面向对象编程的特性
2. 概括VB.NET Environment类
3. 剖析VB.NET使用TreeView控件
4. 简单概述VB.NET访问类型
5. 浅析VB.NET使用DrawString方法

当前题目：概括VB.NETAccess数据库连接
网站URL：http://wtcwzsj.com/article/cdjjgch.html