在DataColchanging 中设置以下代码：事件在表中设置

If e.DataCol.Name = "本箱数量" Then
    If cint(e.NewValue) > cint(e.DataRow("数量")) Then
        MessageBox.show("包装数量大于该成品包装最大允许数量了")
        e.Cancel = True
    End If
End If

操作在窗口中进行的

运行时，提示框出来两次，且两次确定后，焦点自动移动到下一控件框了

现需要只提示一次，且焦点还要在“本箱数量”控件中