记得老师和师哥说过红皮书上的五个例子特别的简单,照着敲实现就可以了，我也照着敲了，也实现了，但总觉得五个实例应该有属于它们的核心思想。想想自己敲这几个例子并实现确实没用多长时间,当时也只是觉得实例四比较难,别的实例也没有太多问题.直到小刘叫我讲的时候,才发现自己只知道代码的大概意，不理解代码为什么会这样写，为什么不用别的方法实现…….。也许真的是前面基础没有打好,但那已经是过去式，现在能做的只有踏踏实实的去发现问题,解决问题.   那先来总结一下前段时间敲的五实例吧！

 一、五实例用到的两种数据库连接方式

（1）有源连接

    通过采用ADO访问ODBC数据源，完成数据库连接

具体格式：

Cnn1.connectionstring="DSN=mySQLsODBC;UID=sa;PWD=123;"

（2）无源连接

方法一、 ADO对象

具体格式：

a.访问access数据库：
cnn2.ConnectionString ="Provider=Microsoft.jet.OLEDB.3.51;" & _

                                 "DataSource=" & App.Path & "\实例1.mdb"

 b.访问SQL Server数据库：

Cnn3.Connectingstring="provider=Microfoft.Jet.OLEDB.4.0;DATASource=D:\数据库\实例1.mdb"

方法二、ADO Data控件

二、实例详解

                                            实例一 “系统登录”对话框

（一）数据库管理系统登录对话框两种基本方法：

方法1：数据库中建立一个表保存系统用户登录信息，完成验证。

方法2：一些支持安全验证的数据库管理系统，可将系统用户定义为数据库用户。

本例采用方法1

（二）技术要领

（1）窗体中只有一个默认按钮和取消按钮

（2）ADO  Connection对象

• connectionstring属性：指定数据源的基本信息
• Open方法
• close方法

（3）ADO   Recordset对象：用于保存从数据源获得的记录集

• ActiveConnection属性：代表数据源的活动连接
• EOF属性：当前记录位于记录集最后一个纪录之后       True
• BOF属性：当前记录位于第一个记录之前     True
• Fields集合：包含Recordset对象的所有Field对象，可使用Fields获得当前记录各个字段的值。   Objrs.fields（"口令"）.value
• open方法：打开记录集，其参数为执行查询SQL命令字符串。

（4）自定义函数过程