??怎么回事？急！

Question

Private Sub Command2_Click()
   
    adodc1.connectstring="dsn=pb"(pb是我ODBC的数据源)
    adodc1.commandtype=adcmdtext
    adodc1.recordsource="select * from box where 工程名称= '" & text5.text & "'" (box是我建立的数据库中的表名)
    set text1.datasource=adodc1
    set text2.datasource=adodc1
    set text3.datasource=adodc1
    set text4.datasource=adodc1
    
    text1.datafield=工程名称
    text2.datafield=工程价
    text3.datafield=材料
    text4.datafield=备注
  end sub  为什么我运行程序时，只显示第一条记录（我用作查询的“工程名称”字段在数据库里有重复项，也就是相同工程名称的记录有几条），即我点击adodc1的前进和后退按钮没有任何反应。
   怎么回事？请指教！！！！！！！！！是因为text控件的datasource和datafield项只能在属性窗口设置才有效吗？

Answer 1

set text1.datasource=adodc1
    set text2.datasource=adodc1
    set text3.datasource=adodc1
    set text4.datasource=adodc1
    
    text1.datafield=工程名称
    text2.datafield=工程价
    text3.datafield=材料
    text4.datafield=备注这里改改，先设置字段名，再绑定数据源。之前先加一句adodc1.refresh

Answer 2

我照做了，如下：
 Private Sub Command2_Click()
   
    adodc1.connectstring="dsn=pb"(pb是我ODBC的数据源)
    adodc1.commandtype=adcmdtext
    adodc1.recordsource="select * from box where 工程名称= '" & text5.text & "'" (box是我建立的数据库中的表名)
    adodc1.refresh    text1.datafield=工程名称
    text2.datafield=工程价
    text3.datafield=材料
    text4.datafield=备注    set text1.datasource=adodc1
    set text2.datasource=adodc1
    set text3.datasource=adodc1
    set text4.datasource=adodc1
    
  end sub可是效果还是一样啊！怎么回事？

Answer 3

数据库具体不是很清楚，但好像是连接ODBC时取数据的方式设置有问题

Answer 4

不会吧？我添加和修改都用的类似的ODBC连接啊 ，都没问题。

Answer 5

text1.datafield="工程名称"
text2.datafield="工程价"
text3.datafield="材料"
text4.datafield="备注"