这个问题比较简单，你可以使用两种方式：
1、使用ADODB控件，添加一个Adodc1控件，点右键，点ADODC属性，在“使用连接自符串”中，点生成，然后选择“Microsoft OLE DB Provider for SQL Server”，点下一步，然后输入服务器名称或地址，用户名，选择数据库，测试成功后点确定即可。
2、直接使用程序，可以参考以下程序
在工程菜单中点引用，引用“Microsoft Actives Data Objects 2.6 Library”,
然后在联接数据库的地主输入以下代码
[code:f915d6f1cf]Dim conn As Connection
Dim strConn As String
strConn = "DRIVER={SQL Server};server=服务器IP;database=数据库;uid=用户名;pwd=密码"
Set conn = New ADODB.Connection
conn.Open strConn[/code:f915d6f1cf]
