如何控制文本框的输入字数？

Question

我想控制一下文本框的最大可以输入的字数，当输入的字数达到最大植时将不再能输入新的字符。

Answer 1

将文本框的Maxlenth属性设为你想要的数字

Answer 2

用maxlength属性text1.maxlength=8'只允许输入8个字符

Answer 3

Private Sub Text1_Change()
    If Len(Text1.Text) > 9 Then Text1.Text = Left(Text1.Text, 9)
    Text1.SelStart = Len(Text1.Text)
End Sub

Answer 4

Maxlenth，
唉，又说晚了：（

Answer 5

把Text1的MaxLength属性设置为你想要的数字。