Foxtable(狐表)用户栏目专家坐堂 → [求助]有个加载条件不知如何写,请老师看下


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

主题:[求助]有个加载条件不知如何写,请老师看下

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


加好友 发短信
等级:五尾狐 帖子:1104 积分:8956 威望:0 精华:0 注册:2014/10/25 11:24:00
[求助]有个加载条件不知如何写,请老师看下  发帖心情 Post By:2018/3/13 10:22:00 [显示全部帖子]

这是“我的日历”例子中的一段代码,我想改下,事务类型为2代表私人事务,我要实现的加载要求是不显示非本人的私人事务
Dim Filter1 As String
Filter1 = Forms("win_日历窗口").controls("cmb_记录人").Text
Filter1 ="记录人 In ('" & Filter1.replace(",", "','") & "') And " & filter & " And ( 事务类型 <> 2 And  记录人 <> '" & User.Name & "')"
事务主表_dt.LoadFilter = Filter1

 回到顶部