文本框长度的控制问题

xinchen327

在窗口画面，我可以控制文本框输入的最大长度吗？比如maxlen或者离开文本框的时候check长度？谢谢。

Henry D. Sy

try
掩码

红尘如烟

方法1:有效性规则: Len(Nz([Text1]))<=10
         有效性文本:最大文本长度10个字符.
方法2:
Private Sub Text1_BeforUpdate(Cancel As Integer)
    If Len(Nz(Text1.Text))>10 Then
        Msgbox "最大文本长度10个字符"
        Cancel=True
    End If
End Sub
方法3:
Private Sub Text0_KeyPress(KeyAscii As Integer)
    If Len(Nz(Text0.Text)) = 10 Then
        KeyAscii = 0
    End If
End Sub
方法很多,就不一一列举了