主题：[求助]帮忙修改一下这段小代吗

If e.Col.Name <> "日期" Then

    Dim dr As Row = e.Row

    If dr IsNot Nothing Then

        If dr("营销人员") <> User.Name Then

            MessageBox.Show("老表,这不是你的记录,你无权修改哦")

            e.Cancel = True

        End If

    Else

        If dr Is Nothing Then

            e.Table.AllowEdit = True

        End If

    End If

End If