- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 复选列表框问题 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=140828)
-- 发布时间：2019/9/15 18:11:00
-- 复选列表框问题
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:狐表实验1.zip |
里面有一个导出窗口，想要达到的功能是，通过一个组合框，先选择要导出的表，这个已经实现，
问题：不能根据所选择的表，在复选列表框中，自动显示该表下的全部列，请大师指点一下，谢谢！！！
另：全选、清除按钮的代码可能没有问题，导出按钮的代码也会出问题，请顺便测试一下，保证能正常导出，予以更正指教。
-- 发布时间：2019/9/15 18:29:00
--
目的是：尝试在一个项目中，让客户想导出哪个表可以任意选择，想导出哪个表的哪些列的数据也可以任意选择。
-- 发布时间：2019/9/15 21:04:00
--
下拉组合框TextChanged事件
Dim s As String
For Each dc As DataCol In DataTables(e.Sender.Text).DataCols
s &= dc.Name & "|"
Next
Dim lstcols As WinForm.CheckedListBox = e.Form.Controls("lstcols")
lstcols.ComboList = s.Trim("|")
-- 发布时间：2019/9/16 8:25:00
-- 仍有问题未解决
导出按钮的代码，如何根据组合框不同的值，列出对应的表来呢？即表达式合成问题怎么处理？
-- 发布时间：2019/9/16 9:03:00
--
Dim ex As New Exporter
Dim name As String = e.Form.Controls("ComboBox1").text
ex.SourceTableName = name
-- 发布时间：2019/9/22 23:41:00
--
谢谢大师，试验成功了，非常感谢！！！