主题：[求助]

 你这样写代码

If User.Name = "张经理" Then '如果是张经理
   
ElseIf e.Row("业务员") <> User.Name Then '如果是其他用户,且业务员和登录用户名不同
    e.Cancel = True '则取消编辑
End If

If e.Row("结账") = True Then '此订单已经结账
    Dim tv As Date = e.Row("日期"),
    Dim tp As TimeSpan = Date.Today - tv
    If tp.TotalDays >= 10 Then '如果订单已经超过10天
        e.Cancel = True '则取消编辑
    End If
End If