主题：请高手帮忙看看写的代码对不对

If e.Col.Name = "车号"

    if e.datarow.isnull("车号") = false
        Dim s As String = e.Row("车号")
        If s.Length <> 7 'OrElse IsNumeric(s) = False Then(当前车号规则不是纯数值型，后面这段不要）
            messagebox.show("无效的车号!")
            e.datarow("车号") = nothing
        End If
    End If
End If

下面这段自己看着改！