Thanks. How did you find 23? In your sample it works, but with my combo class the drop down portion is bigger. I'll try another number, like 30.

>>
>>It works in VFP9. In VFP8 it remains the same width as the first time you Drop Down the combo.
>
>

>PUBLIC oform1
>
>oform1=NEWOBJECT("form1")
>oform1.Show
>RETURN
>
>DEFINE CLASS form1 AS form
>
>
>	Height = 250
>	Width = 136
>	DoCreate = .T.
>	Caption = "Form1"
>	Name = "Form1"
>
>
>	ADD OBJECT combo1 AS combobox WITH ;
>		ColumnCount = 2, ;
>		RowSourceType = 1, ;
>		RowSource = "aaaaaaaaaaaaaa1,,bbbbbbbbbb2,,cc3", ;
>		ColumnLines = .F., ;
>		Left = 12, ;
>		Top = 28, ;
>		Width = 100, ;
>		Name = "Combo1"
>
>	PROCEDURE combo1.DropDown
>	#IF VERSION(2)<900
>		this.ColumnCount = 2 && this.ColumnCount
>	#ENDIF
>		this.ColumnWidths = LTRIM(STR(this.Width-23))+',0'
>	ENDPROC
>
>	PROCEDURE resize
>		this.combo1.width=MAX(0, this.width-24)
>ENDDEFINE
>