主题：参照做的列项设置通用版，能够自动获取表名 列名并进行相关数据填写 但是不能在数据填写后 调到其他表中 无法使用数据词典 求解

列控件 enter 事件

Dim ts As String = ""
For Each t As Col In Tables(e.Form.Controls("ComboBox1").text).Cols
    ts &= t.Name & "|"
Next
e.sender.ComboList = ts.TrimEnd("|")