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


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

主题:filter 和 LoadFilter 怎么用?

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


加好友 发短信
等级:超级版主 帖子:107751 积分:548094 威望: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 

 回到顶部