以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [讨论] case 能不能改成包含,比如说包含物资管理员用Contains  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=172037)

--  作者:18107532666
--  发布时间:2021/9/19 7:42:00
--  [讨论] case 能不能改成包含,比如说包含物资管理员用Contains
 case 能不能改成包含,比如说包含物资管理员用Contains
Dim Filter As String 
Dim bj As String
Select Case _UserGroup 
Case "物资录入员"
        Filter = "进度 = \'1A\'" 
    Case "物资审核员"
        Filter = "进度 = \'1B\' Or 进度 = \'2A\'"
        bj = "2A"\'2A赋值给bj
    Case "物资提单员"
        Filter = "进度 = \'2B\' Or 进度 = \'3A\'" 
        bj = "3A"


--  作者:lgzhao
--  发布时间:2021/9/19 18:52:00
--  
 case 能不能改成包含,比如说包含物资管理员用Contains
Dim Filter As String 
Dim bj As String
Select Case  true
Case _UserGroup ="物资录入员"
        Filter = "进度 = \'1A\'" 
    Case _UserGroup ="物资审核员"
        Filter = "进度 = \'1B\' Or 进度 = \'2A\'"
        bj = "2A"\'2A赋值给bj
    Case _UserGroup ="物资提单员"
        Filter = "进度 = \'2B\' Or 进度 = \'3A\'" 
        bj = "3A"

case _UserGroup .contains(......)

--  作者:y2287958
--  发布时间:2021/9/21 8:11:00
--  
2楼好东东,谢谢