This is something that is a thorn in my side that I can't figure out. It's
probably not worth the time I have put into it, but that is programming I
guess.

I have a combobox that contains a list of 2 columns. Column 1 is displayed
in the textbox portion of the combobox and it contains two letter intials
that represent what is in Column 2, which is the description. For example,

' Product Code Description
Column 1 Column 2
PF Plastic Face
CC Custom Cabinet
PT Parts

Column 1 is the Product Code and shows in the textbox portion. Column 2
shows in the drop down list. The combobox needs to have an original width =
53, but I need to expand it to 120 if the user wants to change the product
code so they can see the full description.

This is what I have but the combobox doesn't go back to the origianl size of
53 after the combobox has been changed. Anyone have any ideas? This what I
have:

Private Sub cboProductCode_Change()
' put combobox to it original width
cboProductCode.Width = 53
End Sub

Private Sub cboProductCode_DropButtonClick()
' expand combobox to view list
cboProductCode.Width = 120
End Sub
--
Cheers,
Ryan