1.使用ADO控件

首先需要在vb部件中添加ADO控件——属性

在此我们可以看到，有三种方式可以实现VB与数据库的连接。

1.data link文件连接：数据连接文件。

UDL文件存储数据库连接的方式和使用“ODBC”数据源名称（DSN）非常相似。UDL文件存储OLE DB连接信息，例如

提供程序、用户名、密码和其他选项等。

2.ODBC数据源连接方式

ODBC数据源的连接方式有三种类型

1.用户数据源:作为位于计算机本地的用户数据源而创建的，并且只能被创建的用户所使用。

2.系统数据源：作为属于计算机或系统二不是特定用户的系统数据源而创建，用户必须有访问权才能使用。

3.文件数据源：指定到文件中作为文件数据源而定义的，任何已经正确安装了驱动程序的用户皆可以使用这种数据源。

打开电脑——控制面板——管理工具——数据源ODBC

在此创建后，就可以在VB里面通过ODBC数据源进行相应的连接

3.使用连接字符串

这需要利用一些应用程序的软件比如Microsoft access,vb自带的应用程序管理也可以，来建立数据库，然后就可

以进行相应的交互了。

4.代码交互

在vb中通过引用对象，就可以通过代码来取代控件，来实现与数据库的连接交互。

通过引用microsoft activex data objects对象来实现，代码如下：

Dim objCn As New Connection

objCn.Open "Provider=Microsoft.Jet.OLEDB.3.51;" & _
"Data Source=" '数据库的存放路径

Set objcf.ActiveConnection = objCn

也可以通过数据源的建立，步骤与ODBC的数据源连接类似。然后在代码中实现连接

Set objCn = New Connection '实例化Connection对象
objCn.Open "DSN=数据源2DSN" '建立数据库连接

5.通过sql server建立的数据库进行代码连接。

首先，在sql server中通过sql语句建立数据库，然后在vb中进行连接，代码如下：

cn.connectionstring="provider=sqloledb.1; persist security info=false;user id=登陆用户名;password=登陆密码;initial catalog=数据库名;data source=服务器别名/Ip"