请问一下；我想给不同的登录人不同的输入值许可范围，但是一直弄不好？

这个是我写的代码：

If e.Col.name="填写确认"  Then 

    If User.Name = "张三" Then 
        If e.Row("填写确认") = "重新填写" Then 
            e.Cancel = True 
        ElseIf  e.Row("填写确认") = "确认复核" Then 
            e.Cancel = True 
        End If
    End If
    If e.Cancel Then 
        Messagebox.show("你输入的折扣超出授权范围!", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information)
    End If
End If

 其中，”填写确认“、”确认复核“、”重新填写“ 是一列（r1）的三个值；想实现的是，如果r1的值为”重新填写“、”确认复核“的时候，会有一个弹窗显示"你输入的折扣超出授权范围!"

根据表数据控制，还是直接写？

If e.Col.name="填写确认"  Then
    If e.Row("填写确认") = "重新填写"  Then
        If User.Name = "张三" Then
            e.Cancel = True
        ElseIf user.name = "李四" Then
           
        End If
    ElseIf  e.Row("填写确认") = "确认复核" Then
        If User.Name = "张三" Then
            e.Cancel = True
        ElseIf user.name = "李四" Then

        End If        
    End If
    If e.Cancel Then
        Messagebox.show("你输入的折扣超出授权范围!", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information)
    End If
End If

弄一个权限表，设置各种权限。

http://www.foxtable.com/webhelp/scr/2405.htm

最后用类似代码判断是否拥有权限

If Functions.Execute("ShouQuan","填写","重新填写") Then
    \'代码
End If