主题：[求助]表达式错误

Dim r As Row = Tables("分院文件.文件登记").Current
If r IsNot Nothing AndAlso r("登录人") = User.name Then
    r.Delete
Else
    e.Cancel = True
End If