>FOR iItem = 1 to this.ListCount
>cExtension = UPPER(RIGHT(THIS.List(iItem),3))
>DO CASE
>CASE cExtension = "DBF"
>This.Picture(iItem) = "tables.bmp"
>CASE cExtension = "BMP"
>This.Picture(iItem) = "other.bmp"
>*and so on
>ENDCASE
>ENDFOR

My listbox contains 6 fields and I want to 7th one to have the country flag.

I can add the picture to the list but how do I tell the listbox to put the picture in a specific column.