Foxtable(狐表)用户栏目专家坐堂 → filter 和 LoadFilter 怎么用?


  共有4514人关注过本帖平板打印复制链接

主题:filter 和 LoadFilter 怎么用?

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107807 积分:548386 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/7/1 16:48:00 [只看该作者]

If User.Group = "经理" Then
        Dim filter As String
        Dim pro As WinForm.ComboBox = e.Form.Controls("项目编号")
        If pro.Text > "" Then
            filter = "项目编号 like '%" & pro.text & "%'"
            if DataTables("项目总表").Find(filter ) is nothing then
DataTables("项目总表").appendload(filter ) 
end if
        End If
Tables("项目总表").Filter = filter    
End If 

 回到顶部