ListView problem

I got a Listview, an Imagelist.

How can I set the icon in the ImageList to the first column in the Listview at run time?

Thanks.

To display icons in listview do the following:-

ListView1.View = lvwIcon
Set ListView1.Icons = ImageList1

I have tried this for icon view only, i think it doesn't work for report view.

VB Code:

With ListView1
    Set .ColumnHeaderIcons = ImageList1
    .View = lvwReport
    .ColumnHeaders.Add , , "1st Col", 2000, , 1
    .ListItems.Add , , "Woof"
    .ListItems.Add , , "Badger"
End With

You mean like that???