限制用户的输入长度怎么做

Question

文本框有一个有效性规则的属性，但不知道如何设置，比如想让用户只能输入8个以下的字符，怎么做呢？

Answer 1

a=len(text1.text)
if a>=8
then msgbox "错误"
end if

Answer 2

我也来试试：
If Len(Trim(Text1.Text)) >=8  Then
  MsgBox "输入内容超出长度！（8个字符）"
  Text1.SetFocus
  Text1.Text = ""
  Label5.Caption = "提示：输入内容超出长度！（8个字符）"
End If

Answer 3

Private Sub Text1_KeyPress(KeyAscii As Integer)
    If Len(Text1.Text) > 8 Then
        KeyAscii = 0
    End If
End Sub

Answer 4

to wwqna(york)
KEYPRESS是这样用的吗？用你的KEYPRESS不行，因为我的控件是绑定数据源的，在没有发生UPDATE时间的时候，文本框的值是NULL，

Answer 5

可以了，用了TEXT属性就行了， KeyAscii = 0
这句话是什么意思啊？

Answer 6

因为keyascii保存的你所按键的asc值,第二0就不会显示出来了。

Answer 7

使用 MaxLength  属性

Answer 8

使用 MaxLength  属性加上语句检测应该可以

Answer 9

不能光用maxlength去判断，因为如果输入中文则只能输入长度的一半。明天给你一份吧