主题：控件下拉框不显示临时表的列内容

Dim cmd As new sqlcommand
cmd.commandtext="select 第一列,第二列 from {表A}"
Dim lsdt As DataTable=cmd.ExecuteReader()

e.Form.controls("table1").Table.datasource=lsdt

Dim cmb As WinForm.checkedComboBox
cmb = e.form.Controls("CCB1")
cmb.DisplayMember = "第二列" '设置显示列
cmb.ValueMember = "第一列" '设置取值列
cmb.DataSource = e.Form.controls("table1").Table.DataTable.name '列表项目来自于客户表