主题：检查错误

我想在成绩表中检查一个基本错误，“姓名”为空或为 1个汉字，或为4个汉字以上的单元格一键标为红色，以方便用户改正，请问如何写代码，谢谢

If e.Col.Name = "姓名" Then

    If e.Text = "" OrElse e.Text.Length = 1 OrElse e.Text >= 4 Then

        e.Style = "样式一"

    End If

End If

 

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