WITH This .AddItem( [Apples] ) .AddItem( [Oranges] ) .AddItem( [Pears] ) ENDWITH
WITH This IF NOT EMPTY( .DisplayValue ) AND .ListIndex = 0 .AddItem( .DisplayValue ) .Requery() ENDIF ENDWITH