Question

VB 限制控件数组的TEXTBOX的输入内容

代码如下：
Private Sub Text2_KeyPress(keyascii As Integer, index As Integer)
If (Chr(keyascii) < "a" Or Chr(keyascii) > "z") And Chr(keyascii) <> Chr("8") Then keyascii = 0 '限制TEXT2只能输入小写英文字母
End Sub

其中TEXT2是个控件数组

可是这段代码没用，TEXT2还是能输入不是小写字母的字符。我哪出了问题？

Answer 1

你上面的代码有问题，如果TEXT2是个控件数组，那么它的事件过程必核明定有“Index As Integer”这一个参数，从戚纤你的代码看，更像是一般的控件。

你先看看TEXT2的Index属性是不是0，改仔告然后把你那的代码改成下面的：

Private Sub Text2_KeyPress(Index As Integer, KeyAscii As Integer)
If (Chr(KeyAscii) < "a" Or Chr(KeyAscii) > "z") And Chr(KeyAscii) <> Chr("8") Then
KeyAscii = 0
End If
End Sub

Answer 2

keypreview要设成true的