ListView + ImageList

[VictorWentz]

Olá!

Eu estou com um grande problema com um ListView e uma ImageList.

O Problema é o seguinte:

Eu estou preenchendo o ListView via código, pois preciso deixar uma identificação de registro do Banco de dados (Codigo do registro) dentro de uma Tag para usar posteriormente.

E é ai que vem a complicação, pois eu não consigo setar a imagelist no item.

Estou tentando usar o seguinte código:

Dim item As New ListViewItem
                        With item
                            .Text = dr.Item("Titulo")
                            .Tag = dr.Item("Codigo")
                            .ListView.LargeImageList = ImageList1
                            .ImageKey = 1
                        End With
                        ListView1.Items.AddRange(New ListViewItem() {item})

Bem, POG's a parte, o código não funciona. Realmente não sei o que é.

Se eu tento anexar a imagelist, obtenho o erro "Object reference not set to an instance of an object.", se eu não anexo, eu não consigo visualizar o ícone.

Agradeço desde já.

Victor