具体解释VB中连接access数据库的几种方法

在VB中，连接ACCESS数据库的方法主要有以下三种

使用ADO对象，通过编写代码访问数据库

Connection 对象

ODBC数据源

使用ADO Data 控件高速创建数据库连接

有三种连接方法

Data Link文件

使用ODBC数据源名称

使用连接字符串

使用数据环境设计器创建数据库连接

首先加入环境引用。

然后找到数据源进行连接

不管是哪一种连接，都是先有一个路径，通向要连接的数据源，和数据源建立关系，在连接。就好比从北京到上海，能够做汽车，能够做火车，还能够做飞机，汽车走快速，火车走铁路，飞机走航线，过程不一样，但结果是一样的，都是到达上海目的地。

VB6与数据库的连接方法很多，取决于你的目的，如果你主要是为了把数据按照传统的表格方式展现出来，那么你可以用DBGrid之类的控件，里面可以设置数据源，然后自动他就会自动获取数据源里面的信息并显示出来，也可以进行一些简单的数据修改 *** 作。如果你想要对数据进行比较复杂的程序处理，那么可以使用ADO对象来连接和查询数据库，里面有一个RecordSet对象，可以对查询的结果进行遍历，分析等。

对Access数据库加密一般都是使用Access软件实现吧？我不清楚代码怎么实现，但是用软件就只需要在菜单 *** 作就可以了。具体来说就是文件菜单选择打开，在”打开“后面的下拉式莱单中选为独占模式打开，这样打开文件后，使用工具菜单里面的安全，里面就有设置数据库密码

有多种连接方式，可以用数据控件连接，也可以用组件连接。下面是用ADO组件来连接的例子（假定ACCESS数据库文件和程序是放在同一个文件夹的）：

Private Sub Form_Click() '点击窗体运行

Dim conn As Object, rs As Object

Set conn = CreateObject("Adodb.Connection")

conn.Open "provider=Microsoft.Jet.OLEDB.4.0 Data Source=" & App.Path & "\a.mdb"

Set rs = CreateObject("Adodb.Recordset")

rs.Open "select * from b", conn, 1, 1

Do Until rs.EOF

    '这里是循环列出表b中的每条记录，熟悉的人就知道怎么做了

    rs.MoveNext

Loop

rs.Close

Set rs = Nothing

conn.Close

Set conn = Nothing

End Sub

---