因为在 Visual Basic 中，连接 SQL 数据库需要使用网络连接。
十载建站经验， 网站制作、成都做网站客户的见证与正确选择。创新互联提供完善的营销型网页建站明细报价表。后期开发更加便捷高效，我们致力于追求更美、更快、更规范。
如果您没有连接到互联网，则无法连接到 SQL 数据库。要解决这个问题，您可以尝试连接到互联网，然后再尝试连接到 SQL 数据库。
1.在使用ADO之前，必须先利用VB菜单中的“工程/引用”来引用“Microsoft ActiveX Data Objects 2.0 Librabry”，
然后ADO对象群中的Connection、Recordset、Command、Fields等对象才会成为程序可以引用的对象。
2.在窗体上布置一个ADODC控件，然后单击鼠标右键，待出现快捷菜单时，从中选取“ADODC属性”命令。
3.这个时候会打开“属性页”对话框，在对话框中选取“使用连接字符串”选项，并单击“生成”按钮。
4.之后出现的是“数据连接属性”(Data Link Properties)设置窗口，按照下面步骤执行：
〈1〉OLE DB提供者：想要连接的SQL Server，要选择Microsoft OLE DB Provider for SQL Server。
〈2〉输入Server名称：输入您安装SQL Server计算机的名称。
〈3〉输入UserName用户名称和Password用户密码：可以存取SQL Server的用户名称和密码。
〈4〉选取数据库：如果前面几个选项均输入正确的话，那么单击这个选项的下拉按钮，就可以列出SQL Server的所有数据库名称，再从中选取其中你的数据库名称。如果单击这个下拉按钮之后没有看到任何数据库名称，那么即表示您前面几个步骤中输入的内容有错误。
最后点击确认。
5.在成功连接到SQL Server中您的“进销存管理”数据库后，就可以开始下一步连接数据表的操作了，具体步骤如下：
〈1〉假设您要打开的表是 “MSFlexGrid”， 则将ADODC控件的属性中的CommandType设置成“AdCmdTable”。
〈2〉将ADODC控件中的RecordSource属性设置成您的表名，例如
“MSFlexGrid”。
6.完成这些步骤后就可以连接到您想使用的数据表了，代码步骤如下
在引用中添加Microsoft ActiveX Data Objects 2.X Library
代码如下:
Dim CN As New ADODB.Connection
Dim RS As New ADODB.Recordset
Dim strServerName, strUID, strPWD, strDataBase
Dim strConnect As String
'定义连接字符串
strServerName = 服务器名，或者服务器IP
strUID = 用户名
strPWD = 密码
strDataBase = 数据库名
strConnect = "Driver=;Server=" strServerName ";UID=" strUID ";PWD=" strPWD ";DataBase=" strDataBase
'连接到数据库
CN.Open strConnect
Set RS = CN.Execute("SELECT * FROM ....")
该回答在6月12日 01:20由回答者修改过
实例名错误，即服务器名错误导致访问不到服务器
应该用 机器名\实例名 作为服务器名
远程可以用IP
本地可以用点号，因为localhost有可能被host文件重新指向了。
1、开始--》所有程序--》Microsoft Visual Studio 2008 R2--》配置工具--》SQL server配置管理器
2、然后打开配置管理器，查看图中的服务是否开启了。如果没有开启，就把相应的服务开启。
3、进行连接，此时已经已经不再报错了。
注意：第一步中的是sql server配置管理器而不是reporting service 配置管理器。
