如何在datalist中显示数据的问题..

Question

有这样一段程序
omm.CommandText = "Select kykubn   From pubs  Order By kykubn"
     Set rs = comm.Execute
Me.DataList1.ListField = rs.Fields(0)
Set DataList1.RowSource = rs
但是为什我运行的时候在datalist1中显示不了数据,这个时候在查询分析器中查询到
rs.Fields(0)=111
望指点.....

Answer 1

'还要加一句DataList1.Refresh呀.
omm.CommandText = "Select kykubn   From pubs  Order By kykubn"
     Set rs = comm.Execute
Me.DataList1.ListField = rs.Fields(0)
Set DataList1.RowSource = rs
DataList1.Refresh

Answer 2

Set DataList1.DataSource = rs
Set DataList1.RowSource = rs
DataList1.ListField = rs.Fields(0)
DataList1.DataField = rs.Fields(0)