Foxtable(狐表)用户栏目专家坐堂 → 筛选结果


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

主题:筛选结果

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


加好友 发短信
等级:九尾狐 帖子:2159 积分:14971 威望:0 精华:0 注册:2017/10/12 13:00:00
筛选结果  发帖心情 Post By:2018/4/11 20:44:00 [只看该作者]

用户已被锁定

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/4/11 21:17:00 [只看该作者]

Dim Filter As string = "分配状态='待分配' and 负责人='" & _UserName & "'"

 

With e.Form.Controls("项目代号1")
    If .Value IsNot Nothing Then
        If Filter >"" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "项目代号= '"     & .Value & "'"
    End If
End With
With e.Form.Controls("项目名称1")
    If .Value IsNot Nothing Then
        If Filter >"" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "项目名称= '" & .Value & "'"
    End If
End With


e.Form.controls("拆分节点").Table.DataTable.LoadPage = 0
e.Form.controls("拆分节点").Table.DataTable.LoadFilter = Filter
e.Form.controls("拆分节点").Table.DataTable.Load


 回到顶部