在DropDownForm 窗口里的CheckedListBox 里
在窗口加载事件里加入以下代码：
Dim lb As WinForm.CheckedListBox = e.Form.Controls("CheckedListBox1")
lb.ComboList = DataTables("项目总表").GetComboListString("项目号")
此功能可以实现了。
但是，发觉，如果我的DataTables("项目总表")表如果加载一些新的数据入来， CheckedListBox1里的不会同步更新， 显示的还是第一次下拉出来 的项目
不会自己同步的。加个刷新按钮，调用上面代码手工刷新数据