如何在筛选时，随机变动列名 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 如何在筛选时，随机变动列名

共有1450人关注过本帖树形打印复制链接主题：如何在筛选时，随机变动列名

zhangchi96

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

等级：二尾狐帖子：555 积分：5037 威望：0 精华：0 注册：2012/2/11 13:27:00

如何在筛选时，随机变动列名 发帖心情

Post By：2024/4/16 17:56:00 [只看该作者]

Dim 截止年度 As WinForm.Label = Forms("岗位统计分析窗体").Controls("截止年度框")

Dim 截止月份 As WinForm.Label = Forms("岗位统计分析窗体").Controls("截止月份框")

Dim 列名称 As String

If 截止月份.text <= 9 Then

列名称 = “聘任岗位” & "0" & 截止月份.text

else

列名称 = “聘任岗位” & 截止月份.text

End If

Dim Filter1 As String = " 年度 = "& dr("年度") &" and 数据类型 = '期初数' " '设置条件

Filter1 = Filter1 & " and 列名称 is not null " '设置条件

Tables("弹窗窗体_岗位聘任年初年底名册").Filter = Filter1

请问其中倒数第2句中，列名称这样表示对吗？

zhangchi96

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

等级：二尾狐帖子：555 积分：5037 威望：0 精华：0 注册：2012/2/11 13:27:00

Post By：2024/4/16 19:06:00 [只看该作者]

想起来了，可能是这样，不知道对不对？（用&来连接）

Filter1 = Filter1 & " and “ & 列名称 ” & “ is not null " '设置条件

有点蓝

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

等级：超级版主帖子：110544 积分：562604 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2024/4/16 20:26:00 [只看该作者]

Filter1 = Filter1 & " and " & 列名称 & " is not null "

主题：如何在筛选时，随机变动列名