combo box Max lenghth ??

[87vette]

Hi I am writing a program and I am using a combo box as one of my controls. I want to set a maxlength that a user can only enter 20 characters per entry. does anyone know how i can go about this since the combo box does not have a MaxLength property? Nail the code

 

[JFoushee]

Could you use something like this?

Private Sub Combo1_KeyPress(KeyAscii As Integer)

If Len(Combo1.Text) > 19 Then
Msgbox "Too many characters"
KeyAscii = 0
End If

End Sub

 

[87vette]

Thanks JFOUSHEE! I will try this out today when I get home from work I will let you know how it goes. I cant believe I did not think about this. I use keypress quite a bit. I am pretty sure this will work. Nail the code