主题：字符长度要求

这些是我的错，理解为你们都是万能的。
现简单说明：
作业员随意性大，为防止字符多输或漏输，所以想在表格上输入时卡住字符长度.（不多不少）
现新建一个项目，用手工输3个字符长度管控.如附件，输数据超出位数或少于位数时无任何提示.
你们亦可试下.
谢谢！

If e.keycode = keys.enter AndAlso e.Table.Current IsNot Nothing AndAlso e.Table.Current.isnull("第一列") = False Then
If e.Table.Current("第一列").length <> 3 Then
msgbox("必须是19位")
e.Table.Current("第一列") = Nothing
End If
End If

此主题相关图片如下：7.png

如果是手工输的到keydownedit事件处理，如果是扫码录入的到keydown事件处理。如果2种用法都有，那么2个事件都要写代码。keydownedit事件用法可能稍微有点不一样。但是这2个事件都有一个共同点就是，每输入一个字符就会触发一次事件，所以必须要最后加入一个特殊的键进行判断是否输入完毕，一般使用enter键。