Access限制文本框的输入长度

之前，我们发过文本框禁止输入某个字符。现在我们来限制文本框的字节数，比如：想规定文本框为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

发布人:Henry D. Sy-office中国

分享到：

点击次数：更新时间：2013-10-12 16:26:59 【打印此页】【关闭】