有关datacombo??求助

Question

请问datacombo的rowsource,rowmember,listfield属性怎么用代码加载。
哪位朋友帮我写上代码。在下万分感谢。

Answer 1

Set datacombo.DataSource = Adodc1
datacombo.DataField = "Col1"
datacombo.BoundColumn = "Col1"
Set datacombo.RowSource = Adodc1
datacombo.ListField = "Col1"

Answer 2

dim rs1 as new recordset
dim rs2 as new recordset
...
rs1.open strSQL,YourConn,？，？
rs2.open strSQL,YourConn,adOpenKeyset，？with Me.DataCombo1
set .DataSource = rs1
set .rowsource=rs2
.listfield=rs2.fields(?).name
.BoundColumn=rs2.fields(?).name
.DataField ==rs1.fields(?).name
end withhttp://expert.csdn.net/Expert/topic/1555/1555547.xml?temp=.8196527