主题：Messagebox不显示是哪里出问题了呢？

我的表有一个列，名为“Name”，字符型，长度30
要求输入长度超过30个字符的时候，弹出提示框。
我在DataColChanging中设置代码如下：

Select Case e.DataCol.Name
    Case "Name"
        Dim nm As String = e.NewValue
        If e.NewValue IsNot Nothing Then
            If nm.Length > 30 Then
                MessageBox.Show("Shop name should be less than 30 characters.")
                e.Cancel = True
            End If
        End If
End Select

但是我输入超过30个字符的名字的时候，弹出的却不是我定义的MessageBox，而是系统提示：“我输入的字符串”的长度超出了[Name]列允许的最大长度30，将被自动截短！
请问老师，我这是哪里出了问题呢？

原来是这样啊，谢谢老师，知道了。