99.txt

VB文章集（含API、窗口、数据库、多媒体、系统、文件、等等）

数据约束控件和 RecordSet


数据约束控件是指要求与Data 控件连接到一起的控件， 如DBGird 等。典型的特征是都有一个DataSource 属性， 该属性在运行时是不可用的。 在没有使用数据控件Data 而采用DAO 命令打开一个数据库后，如何将表中记录显示在数据约束控件内？方法如下：
约束控件在设计时应该连接到一个空的 DATA1，
在运行中：
Set DATA1.Recordset = 没有使用数据控件建立的Recordset
刷新该数据约束控件， 注意不能刷新DATA1。
由 awing 提供的例子如下：
在一个窗体内建立一个文本控件和一个数据控件，将文本控件的DataSource属性指向Data1，设置对应的字段，然后编下如程序：
dim db as database
dim rs as recordset
set db=opendatabase("temp.mdb")
set rs =db.openrecordset("files",dbopentable)
set data1.recordset=rs
运行程序后，点击数据控件的移动记录。