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


  共有1750人关注过本帖树形打印复制链接

主题:如何在筛选时,随机变动列名

帅哥哟,离线,有人找我吗?
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


加好友 发短信
等级:超级版主 帖子:111381 积分:566969 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/4/16 20:26:00 [只看该作者]

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

 回到顶部