3.VB开发环境中连接数据库
（1）启动Visual Basic 6.0后，单击“文件|新建工程”菜单，在工程模板中选择“标准EXE”，Visual Basic自动产生一个Form窗体，属性都是缺省设置。
（2）添加工程---〉引用---〉microsoft ActiveX Data Objects 2.6 library （3）添加工程---〉部件---〉microsoft ADO Data Control6.0 、microsoft DataGrid Control6.0
（4）设置ADODC1的两个属性 connectstring 和 recordsource （5）本实验的参考界面如下：
说明： SQL语句的结果显示可以不局限于上图所示的交互界面，可以采用菜单或者下拉列表框等其他形式进行交互。也可以在此功能上进行扩展。
4.通过ADO对象连接数据库 （1）ADO的概述
ActiveX Data Object（ADO）是继ODBC之后功能强大的数据访问技术，ADO是一座连接应用程序和OLE DB的桥梁。OLE DB是一个底层的数据访问接口，用它可以访问各种数据源。
使用ADO控件和ADO对象均可访问SQL Server数据库。（1）使用ADO控件主要设置ConnectionString和RecordSource属性。（2）使用ADO对象访问SQL Server数据库时，要在程序中声明或新建ADO对象，然后调用ADO对象的属性和方法即可。ADO的主要对象包括Connection对象、Command对象、Recordset对象。
34
（2）VB开发环境中通过ADO对象连接数据库实例
在form表单中的查询按钮的click事件中加入如下代码：
Dim conn As New ADODB.Connection ‘创建一个连接对象 Dim rec As New ADODB.Recordset ‘创建一个记录集对象 Dim strConn As String 'strConn = \'Initial Catalog=northwind;Data Source=hl\ strConn = \ ‘声明一个连接字符串 这里要根据自己的机器名及数据库名进行更改 conn.Open strConn ‘打开连接对象 rec.Open \ Set DataGrid1.DataSource = rec ‘设置datadrid的数据来源
35
附录：数据库实验报告格式
专业(类)班级 姓名 学号 日期 一、 实验名称 ：
二、
实验目的和要求：
三、 实验程序源代码：
四、 总结与体会：
36