Foxtable(狐表)用户栏目专家坐堂 → [求助] 加载条件


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

主题:[求助] 加载条件

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


加好友 发短信
等级:七尾狐 帖子:1634 积分:14432 威望:0 精华:0 注册:2014/6/6 8:42:00
  发帖心情 Post By:2018/7/2 17:02:00 [只看该作者]

老师,把 不是科室主任也不是分管领导 请假天数 小于 3 的行 还是加载进来了。辛苦了,老师,再看看吧。谢谢!

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


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

执行下面代码,弹出什么?

 

DataTables("结构设置").LoadFilter = "科室主任 is not null"
DataTables("结构设置").Load()
Dim str As String = "1=2"
For Each dr As DataRow In DataTables("结构设置").Select("科室主任 is not null or 分管领导 is not null ")
    str &= " or 确认审核 = 0 And (姓名 Like '%" & dr("科室主任") & "%' Or 姓名 like '%" & dr("分管领导") & "%')"
Next
str &= " Or 确认审核 = 0 And 请假天数 >= 3 "
msgbox(str)
DataTables("请销假登记").LoadFilter = str
DataTables("请销假登记").Load


 回到顶部
总数 12 上一页 1 2