主题：设置用户名加载表不成功

Select Case e.User.Name

    Case "特色"

        Select Case e.DataTableName

            Case "一览表2015至2019年", "附件1_1","附件1_2","附件1_3","一览表2016至2018年","附件2_1","附件2_2","附件2_3"

                e.Cancel = True

        End Select

    Case "基地"

        Select Case e.DataTableName

            Case "一览表2016至2018年","附件2_1","附件2_2","附件2_3","附件3_1","附件3_2","附件3_3"

                e.Cancel =True

        End Select

    Case "示范"

        Select Case e.DataTableName

            Case "一览表2015至2019年", "附件1_1","附件1_2","附件1_3","附件3_1","附件3_2","附件3_3"

                e.Cancel = True

        End Select

End Select