主题：可以在导航设置用户权限吗?

Dim Bar As WinForm.NavBar
Bar = e.Form.Controls("NavBar1")
if Bar.SelectedIndex = 0 Then
Tables("导航_Table1").DataSource = DataTables("客户信息")
Tables("导航_Table1").OpenView("a")
Dim Lbl1 As WinForm.Label = Forms("导航").Controls("Label1") 
Lbl1.Text = "客户信息"
ElseIf Bar.SelectedIndex = 1 Then
Tables("导航_Table1").DataSource = DataTables("产品目录")
Tables("导航_Table1").OpenView("a")
Dim Lbl1 As WinForm.Label = Forms("导航").Controls("Label1") 
Lbl1.Text = "产品目录"

希望用户A只能打开客户信息表,如打开产品目录表会提示没有权限
(在导航窗口中的表都是副本的)