主题：复选组合框问题

在窗口中建立一个复选组合框和组合框，复选组合框的取值列由组合框确定，在复选组合框 ENTER事件，填写代码：

Dim cmb As WinForm.CheckedComboBox =e.Sender
Dim str As String  =e.Form.Controls("ComboBox1").Value
cmb.DataSource = "dict" '列表项目来自
cmb.DisplayMember = str '设置显示列
cmb.ValueMember = str '设置取值列
cmb.DataFilter = str & "<> 'noyhing'"

为何需要选择2次组合框的选项后， 复选组合框才能真确显示列表项？ 请老师指教！

没办法，不能这样设置，变一下

Dim cmb As WinForm.CheckedComboBox =e.Sender
Dim str As String  =e.Form.Controls("ComboBox1").Value
cmb.ComboList = DataTables("dict").GetComboListString(str, str & "<> 'noyhing'") '列表项目来自

谢谢版主！