下载信息  [文件大小：   下载次数： ]

点击浏览该文件:通过下拉列找到表的标题名称，打到对应的列名.table

如题   请例子 ！

首先说明：我的表名都是使用英文，标题用中文。

ComboBox1的代码：

Dim cmb As WinForm.ComboBox = e.Sender
cmb.items.clear
Dim str As String = e.Form.Controls("ComboBox1").Value
For Each dc As DataCol In DataTables(str).DataCols
    cmb.items.Add(dc.caption)  ‘此处代码是找到表的标题名称。如果代码改为：cmb.items.Add（dc.name) 则是找到表名
Next

ComboBox2的代码：

Dim cmb As WinForm.ComboBox = e.Sender
cmb.items.clear
Dim str As String = e.Form.Controls("ComboBox1").Value
For Each dc As DataCol In DataTables(str).DataCols
    cmb.items.Add(dc.name)
Next

问题出于：ComboBox2无法识别ComboBox1的标题名称；请帮忙解决

根据标题找出对应的表：

Dim s as string = "标题"

dim dt as datatable

for each t as datatable in datatables

    if t.caption then

       dt = t

       exit for

    end if

next

狐爸，说实话，我不知道这个代码如何使用。