Foxtable(狐表)用户栏目专家坐堂 → 根定指定列名进行查询内容


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

主题:根定指定列名进行查询内容

帅哥哟,离线,有人找我吗?
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111427 积分:567211 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/9/19 9:49:00 [显示全部帖子]

Dim Filter As String
With e.Form.Controls("查询条件")
    If .Value IsNot Nothing Then
if e.Form.Controls("内容").Value is nothing then
msgbox("没有选择列名")
return
end if
        Filter = Filter & e.Form.Controls("内容").Value & " = '" & .Value & "'"
    End If
End With
With e.Form.Controls("预计开始日期1")
    If .Value IsNot Nothing Then
        If Filter >"" Then
            Filter = Filter & " And "
……

 回到顶部