用combobox 筛选逻辑列 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 用combobox 筛选逻辑列

共有2899人关注过本帖树形打印复制链接主题：用combobox 筛选逻辑列

hudouzhi

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：婴狐帖子：30 积分：216 威望：0 精华：0 注册：2017/10/14 21:48:00

Post By：2017/11/5 13:39:00 [显示全部帖子]

看这样可行，我是个新手，亲测可用

vars("是") = 1

vars("否") = 0

'messagebox.show(vars("是"))

Dim co As WinForm.ComboBox = e.Form.Controls("ComboBox1")

Dim ds As List(of DataRow)

Dim dr As DataRow

If co.value <> "" Then

ds = DataTables("表a").Select("第三列 = " & vars(co.value))

For Each dr In ds

Dim dr1 As DataRow = DataTables("表c").addnew

dr1("员工编号") = dr("员工编号")

End If

主题：用combobox 筛选逻辑列