数据绑定到textbox时出错！

Question

我用了一个ado控件，我想用代码把数据绑定到textbox，代码如下Set dateTx.DataSource = Adodc1.Recordset
dateTx.DataField = Adodc1.Recordset.Fields("date")
...............
但run时显示:    run time error '545':unable to bind to fields :'2004-4-17''2004-4-17'是我date中第一个valuehow come like this? help

Answer 1

直接在text1文本框的屬性中綁定即可

Answer 2

'---------------
strsql = "select * from table where ----------- "
Adodc1.ConnectionString = ConnectString
Adodc1.CursorLocation = adUseClient
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = strsql
Adodc1.Refresh
'---------------可改成过程，方便以后调用。
Set dateTx.DataSource = Adodc1
dateTx.DataField = Adodc1.Recordset.Fields(2).Name

Answer 3

试下，楼主自己改下sql语句。

Answer 4

dateTx.DataField = "date"
应该是这样，不过手边没有VB环境，没试！！