文本框输入位数 html [求助]请问如何在文本框中限制输入数字的位数（已解决）...

请教一下各位老师：

我设计了一个用于批量打印统计表的小程序，想在文本框中限制输入的业务编号只能是13位，多了少了都不行。自己试了很多次，就是没能在光标移开这个文本框时才执行判断语句，请各位老师指点一下，谢谢！

谢谢版主大人帮我解决了问题，代码如下，大家一起学习！

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)'文本框字数不超过13

If Len(TextBox1.Value) > 12 Then KeyAscii = 0

End Sub

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)'文本框字数不小于13

If Len(TextBox1.Value) < 13 Then Cancel = True

End Sub

版主大人写了个更简单的代码：

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)

If Len(TextBox1.Value) <> 13 Then Cancel = True

End Sub

谢谢版主大人，我把答案都放到一楼，方便大家学习

PS：我刚刚从baidu上知道了单独限制文本框的最大字数可以用文本框的MaxLength属性解决。

[此贴子已经被作者于-12-21 0:16:26编辑过]