主题：用户角色与SELECT CASE语句

Select Case User.Isroles

    Case "部门负责人","总工办","集团财务","集团董事长","付款人","付款复核"

        Tables("XMXXB").Visible = False

        Tables("KSXXB").Visible = False

        Tables("单位表").Visible = False

        Tables("费用类别").Visible = False

        Tables("合同类别").Visible = False

    Case "部门负责人","总工办"

        Tables("FKB").Visible = False

End Select