初识vb数据库凯发之实例3（使用数据绑定访问数据）
制作特点
使用ADOData控件创建Access数据库连接,使用文本框的数据绑定特性来显示数据
设计分析
首先用ADO Data控件连接数据库获得数据源,然后将该数据源绑定到文本框来显示数据.
优点:使用ADO Data 控件可以在不编写代码的情况下轻松实现数据库访问.
访问数据库的方式
方法1:使用ADO对象,通过编写代码访问数据库(实例1,2)
方法2:使用ADOData控件快速创建数据库连接,不用编写代码(本例使用)
方法3:使用数据库环境设计器创建数据库连接,不用编写代码
技术要领
ADOData控件的基本结构
单击使第一个记录成为当前记录
单击使前一个记录成为当前记录
单击使后一个记录成为当前记录
单击使最后一个记录成为当前记录
ADOData控件属性设置
ADOData控件可以在属性窗口中设置,还可以通过属性页对话框设置
以下是使用属性页的方法
右击ADOData控件选择ADODC属性
通用中有三种连接数据库的方式
此例我们使用第三种
设计应用程序窗体
设置ADO Data的属性
在通用选项卡中选择使用连接字符串单选按钮,单击生成,选择Microsoft Jet4.0 OLE DBProvider,
单击下一步,打开连接选项卡,输入Access数据库文件名,如果数据库需要身份信息,则需要制定用户名称和密码
单击确定
打开 记录员选项卡,在命令类型下拉列表中选中 2-adcmdtable,在表或存储过程名称列表框中选中系统用户
单击确定，完成
将第一个文本框的DataSource属性设置为Adodc1,DataField属性设置为用户名，第二个文本框的DataSource属性设置为Adodc1,DataField属性设置为口令，
编写代码
由于ADO Data控件的标题默认情况下只能显示控件的默认名称，以下就是通过编写控件的MoveComplete事件处理过程代码使他可以显示当前记录序号和总记录数
Private Sub Adodc1_MoveComplete(ByVal adReason As ADODB.EventReasonEnum, ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)
Adodc1.Caption = "当前记录：" & Adodc1.Recordset.AbsolutePosition _
& "/" & Adodc1.Recordset.RecordCount
End Sub
运行结果为
