初识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
(编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |