主题：列内容查找

只查找货品资料表指定列的内容

 

1：“货品资料”表的列名称自动填充到“列选择”表的“列名”列中；

 

2：“货品主表”窗口的TextBox1只查找“列选择”表的列名打勾对应的列内容。

 

请问如何设置？

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

点击浏览该文件:测试.table

1、可以增加一个字符型全局变量

在项目属性AfterOpenProject中设置代码，如：

For Each dc As DataCol In DataTables("货品资料").DataCols
    Vars("Name") = Vars("Name") & "|" & dc.Name
Next

列选择表PrepareEdit事件代码
If e.Col.Name = "列名" Then
     e.Col.Combolist = Vars("Name")
End If

 

2、没明白你的意思

例如:

 

“列选择”表

列名               选择

品牌编号          True

品牌                False

货品编号          True

…………

 

“货品主表”窗口的TextBox1只查找“货品资料”表“品牌编号”、“货品编号”列符合条件的值。

 

 

 

 

 

 

窗口的AfterLoad事件代码改为：

 

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.BuildTree("货品资料", "货品类别|货品简称|品牌")
trv.Nodes.Insert("显示所有行","显示所有行",0)
DataTables("列选择").DataRows.Clear()
For Each dc As DataCol In DataTables("货品资料").DataCols
    Dim dr As DataRow = DataTables("列选择").AddNew()
    dr("列名") = dc.name
Next

 

2：“货品主表”窗口的TextBox1只查找“列选择”表的列名打勾对应的列内容。

例如:

 

“列选择”表

列名               选择

品牌编号          True

品牌                False

货品编号          True

…………

 

“货品主表”窗口的TextBox1只查找“货品资料”表“品牌编号”、“货品编号”列符合条件的值。

请问如何设置？