为了限定combobox的长度,我是这样做的
Select Case KeyAscii
Case 13
Case 8
Case Else
If Len(cmbJyouken1.Text) >= 2 Then
KeyAscii = 0
End If
End Select
可这样一做的话,当光标选中combobox中的内容的话,那么我只能用backspace或delete去除先前我输的内容,而不能通过打其它的内容,然后覆盖,怎么才能覆盖呵
Select Case KeyAscii
Case 13
Case 8
Case Else
If Len(cmbJyouken1.Text) >= 2 Then
KeyAscii = 0
End If
End Select
可这样一做的话,当光标选中combobox中的内容的话,那么我只能用backspace或delete去除先前我输的内容,而不能通过打其它的内容,然后覆盖,怎么才能覆盖呵
我的combobox是可以写数据的,但此数据只有2位呵!
我要限制combobox位数为两位
可这段程序运行后,出现这个问题,当我把输入的数据全部选中后,就不能再输数据了。
怎么恢复呵!
Select Case KeyAscii
Case 13
Case 8
Case Else
If Len(cmbJyouken1.Text) >= 2 And cmbJyouken1.SelLength = 0 Then
KeyAscii = 0
End If
End Select