DataList问题

Question

我有个表AA  想吧表AA里的数据显示在  DataList1 上 我要代码 帮忙给一段。还有就是点击DataList1 如何获得DataList1里面的值

Answer 1

放一个ado数据控件，设置数据库。
放一个datalist1，设置datasource为这个数据控件。
datamember选择绑定aa表的字段。

Answer 2

vb部件中添加datalist adodc复制以下代码去测试。
Option ExplicitPrivate Sub DataList1_Click()
    Text1.Text = DataList1.BoundText '单击得到值
End SubPrivate Sub Form_Load()
    Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Program Files\Microsoft Visual Studio\VB98\NWIND.MDB;Persist Security Info=False"
    Adodc1.CursorLocation = adUseClient
    Adodc1.CommandType = adCmdTable
    Adodc1.RecordSource = "Employees"
    Adodc1.Refresh
    
    Set DataList1.DataSource = Adodc1
    Set DataList1.RowSource = Adodc1
    DataList1.ListField = Adodc1.Recordset.Fields("FirstName").Name
    
End Sub

Answer 3

Dim rsr As New ADODB.Recordset
sqlr = "select 工艺名称 from 工艺名称 where 类别='轧辊、备件堆焊' order by 工艺编号"
rsr.Open sqlr, db    Adodc3.ConnectionString = db
    Adodc3.CursorLocation = adUseClient
    Adodc3.CommandType = adCmdTable
    Adodc3.RecordSource = sqlr
    Adodc3.Refresh
    
    Set DataList1.DataSource = Adodc3
    Set DataList1.RowSource = Adodc3
    DataList1.ListField = Adodc3.Recordset.Fields("工艺名称").Name为什么提示SELECT 附近有语法错误呢？？？？

Answer 4

select 字段名 from 表名 where 条件