Access限制文本框的输入长度_access模块-access类模块-access函数-access VBA

Access限制文本框的输入长度

时间：2013-10-12 16:36 来源：office中国作者：Henry D. Sy 阅读：次

之前，我们发过文本框禁止输入某个字符。现在我们来限制文本框的字节数，比如：想规定文本框为8位，多一位都不能输入
有的时候确实是要限定字符串的长度的。太长影响外观，数据也不利于整理。

限定输入长度，主要在更改事件中判断文本框的text长度就可以
Private Sub Text0_Change()

Dim str As String

Dim i As Integer

If Not IsNull(Me.Text0.Text) Then

str = Me.Text0.Text

i = Len(str)

If i > 8 Then

MsgBox "请不要输入超过8个字符"

str = Left(str, 8)

Me.Text0 = str

End If

End Sub

(责任编辑：admin)

顶一下

(1)

100%

踩一下

(0)