主题：对应加载该所选的表的所有列名称

CZY老师你好！

窗体中有COMBOBOX1 和 COMBOBOX2           

请先看以下代码：

选择控件ComboBox1时：

e.sender.items.clear
Dim s As String
For Each dt As DataTable In DataTables
s = dt.Caption  ‘获取了项目中所有表的标题   －－－ （如果用   s=dt.name,则是获取项目中所有表名称）
If s <> "" Then
    e.sender.items.Add(s)
End If
Next

我现在需要：

选择ComboBox2控件时;能根据ComboBox1所选择的表标题（注意是表的标题），对应加载该表的所有列名称；