vb调用access数据库 access vba编程教程
很多朋友对于vb调用access数据库和access vba编程教程不太懂，今天就由小编来为大家分享，希望可以帮助到大家，下面一起来看看吧！
怎样用VB调用ACCESS中建立好的数据库中的数据
首先你需要在部件中把这两个部件添加到工具栏中并将他们拖到窗口中
上面那个是VB连接数据库的必要的一个部件，我说一下大致的步骤吧
1.先把上面第一个部件拖到Frm1上，接着新建一个模块并输入下面这串代码
红色框内是你的数据库名称打完之后先保存模块才能生效
2.在当前Frm1里面建几个text分别显示你数据库里面某个表里某个字段的数据
3.将第一个图中第二个部件拖到Frm1里，这个部件是用来显示你某个表里所有的数据的，你可以在你鼠标单击表里的内容时显示在窗体的几个TEXT中
大致应该就是按照这个思路去做的我因为没有具体的表什么的也不知道怎样讲的更明白点，而且我不太明白你最后那个计算是什么意思就只能帮到这了。。。有什么问题你可以追问
vb怎么调用access数据库中报表
在VB中运行Microsoft Access报表的好方法
在VB中如何使用直观、简便的报表一直是很多人关心的问题， Crystal Reports用起来又不太理想。现介绍一在VB中运行Microsoft Access报表的方法，用起来还不错。
利用Automation运行Microsoft Access报表
1.使用Microsoft Access建立数据库(如：novelty.mdb)的相关报表(如：rptEmployess)。
2.创建引用
在VB中使用“Project References"菜单创建一个对Microsoft Access 8.0 Object Library
的引用。
3.程序清单
注释：References MS Access 8.0 Object Library(this
注释：code will work with any verson of Access that
注释：supports Automation)
Dim MSAccess As Access.Application
Private sub Command1_Click()
Set MSAccess=NEW Access.Application
MSAccess.OpenCurrentDatabase(App.Path&"\novelty.mdb")
MSAccess.DoCmd.OpenReport"rptEmployess",acViewNormal
MSAccess.CloseCurrentDatabase
Set MSAccess=Nothing
end Sub
注：acViewNormal告知Access打开该报表并立即打印。
这种方法有个缺点，就是运行环境中必须装有MS Access。
VB怎么连接访问Access数据库
使用Visual Basic作为前端开发语言，与SQL Server接口有几种常用的方法，即：
①数据访问对象/Jet
②为ODBC API编程
③使用SQL Server的Visual Basic库(VBSQL)为DB库的API编程
④RDO远程数据对象(RemoteData Objects)
⑤ADO数据对象(Active Data Objects)
1、数据访问对象/Jet
VB支持Data Access Objects(DAOs)的子集。DAO的方法虽然不是性能最好的管理客户机—服务器之间的对话方式，但它的确有许多优点。DAO/Jet是为了实现从VB访问Access数据库而开发的程序接口对象。使用DAOs访问SQL Server的过程如下：应用程序准备好语句并送至Jet，Jet引擎(MASJT200.DLL)优化查询，载入驱动程序管理器并与之通讯，驱动程序管理器(ODBC.DLL)通过调用驱动器(SQLSRVR.DLL)的函数，实现连接到数据源，翻译并向SQL Server提交SQL语句且返回结果。下面是一个用DAOs访问SQL Server的VB实例。
注释：Form Declarations
Dim mydb As Database
Dim mydynaset As Dynasetオ
Private Sub Form_Load()
Set mydb= OpenDatabase("", False, False,"ODBC; DSN=Myserver; WSID=LCL; DATABASE= sales")
Set mydynaset= mydb CreateDynaset("Select*from Customers")オ
End Subァ
上述例子是以非独占、非只读方式打开sales数据库，并检索Customers表中的所有字段。OpenDatabase函数的最后一个参数是ODBC连接字符串参数，它指明了Microsoft Access连接到SQL Server所需要知道的一些内容。其中“DSN”为数据源名，“WSID”为工作站名，“DATABASE”为所要访问的数据库名。
2、利用ODBC API编程
ODBC(Open Database Connectivity)的思想是访问异种数据库的一种可移植的方式。与数据资源对话的公用函数组装在一个称为驱动程序管理器(ODBC.DLL)的动态连接中。应用程序调用驱动程序管理器中的函数，而驱动程序管理器反过来通过驱动器(SQLSRVR.DLL)把它们送到服务器中。
下面的代码使用上面一些函数先登录到一个服务器数据库，并为随后的工作设置了语句句柄。
Global giHEnv As Long
Global giHDB As Long
Global giHStmt As Long
Dim myResult As integer
Dim myConnection As Srting
Dim myBuff As String*256
Dim myBufflen As Integer
If SQLAllocEnv(giHEnv)<>SQL_SUCCESS Then
MsgBox"Allocation couldn注释：t happen!"
End If
If SQLAllocConnect(giHEnv,giHDB)<>SQL_SUCCESS Then
MsgBox"SQL Server couldn注释：t connect!"
End If
myConnection="DSN=myServer;UID=LCL;PWD=;APP=ODBCTest;WSID=LCL;DATABASE=sales"
myResult=SQLDriverConnect(giHDB,Test,form1.hWnd,myConnection.len(myConnection),myBuff,256,myBufflen,SQL_DRIVER_COMPLETE_REQUIED)
myResult=SQLAllocStmt(giHDS,giHStmt)
myResult=SQLFreeStmt(giHStmt,SQL_COLSE)
rsSQL="Select* from Customers Where City="Hunan""
myResult= SQLExecDirect(giHStmt,rsSQL,Len(rsSQL))
3、使用VBSQL对DB库API编程
DB库是SQL Server的本地API，SQL Server的Visual Basic库(VBSQL)为Visual Basic程序员提供API。从一定意义上说，VBSQL是连接Visual Basic程序到SQL Server的性能最好最直接的方式。VBSQL包含以下三个文件：
VBSQL.VBX：包含库函数，具有访问重要的消息和处理错误的能力
关于vb调用access数据库到此分享完毕，希望能帮助到您。