数据库建立连接的方式

(1)通过代码 获取 :

如:

Dim objCn as new connection ,objRs as new Recordset,strCn as String

Connection 连接对象

Recordset 结果集 用于保存结果

String 用于保存连接的地址 字符数据

如

objCn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;" & _
 "Data Source=" & App.Path & "\实例1.mdb"
 objCn.Open

(2) 通过ODBC数据源连接

建立数据源

然后连接

Set objCn=new connection 

objCn.open “DSN=实例 DSN”

set objRs=new recordset

(3) 采用数据绑定

控件连接

Ado data 控件 右击属性中设计 连接

可以绑定到内部控件,和一些activateX

控件

 (4) 显示数据控件

DataGrid控件 显示记录集的全部数据

MSFlexGrid 控件

 数据库添加方法（VB6）

定义相关量

一个结果集,用来保存结果,更新结果

第一个字符串 ,用来保存sql语句,查询位置

一个字符串,用来保存查询函数的查询状态

Dim mrc As ADODB.Recordset
    Dim txtSQL As String
    Dim MsgText As String

第二:

验证数据的有效性.

1:

是否为空