主题：请教一个问题

项目采用帮助中的自定义用户管理系统中,设计了一个用户可以看到某个表,可以编辑某个表,以开发者身份进入后无法操作,删除相关代码后还是无法打开对应的表进行操作,代码如下:

Select Case e.Node.Name
    Case "用户管理"
        If _UserName ="用户名" Then
            MainTable=Tables("用户管理")
        Else
            MessageBox.show("你没有权限")
        End If

End select

If _UserName = "用户名" Then
    Tables("用户管理"). AllowEdit = True
  Else