Adodc控件和文本框绑定的控件的问题

Question

我的程序中有许多文本框要和Adodc绑定，但是当执行set Adodc1.RecordSet=RS(RS表示新的数据集）后，文本框并没有随着Adodc改变而改变。这是为什么，如何才能使之及时更新

Answer 1

这个好想要重新指定text绑定的数据源和数据字段（即使你显示的2个数据字段一样）

Answer 2

我的程序中用到许多的文本框和Adodc控件绑定，如果要重新设置的话那就要改好多地方了，有没有简单的方法，比如设置某个属性或用某个方法。

Answer 3

set Adodc1.RecordSet=RS后 adodc1.refresh试试

Answer 4

自己编写一个 初始化 text 的 数据源和字段的 sub 。我给几段代码，供参考：
sub settextdata    Me.text1.DataSource = Adodc1
    Me.text1.DataField = no
    Me.text2.DataSource = Adodc1
    Me.text2.DataField = name
    Me.text3.DataSource = Adodc1
    Me.text3.DataField = age
    '.....可以继续添加剩余 text 的代码
end  sub再用：
    Adodc1.ConnectionString = strConn
    Adodc1.RecordSource = strSQL
    Adodc1.Refresh如果 text 太多的话，最好用 text数组控件，这样就可以用 for ... next 一次性解决了。
另外，在初始化 text 的数据源 前，先取得 所选 表 tab 中的各字段名称，先保存到一个数组中，再传递到 settextdata 中实现。比如' 先把所选表的各字段的名称 取得并保存到数组 Alldfield 中
sub settextdata
    for i =0  to  vtextcount-1  ' text控件的个数 
        Me.text1（i）.DataSource = Adodc1
        Me.text1（i）.DataField = Alldfield（i）
    next i  
end  sub