Visual Basic - ListView1

Dim lista As ListItem
ListView1.ColumnHeaders.Clear
ListView1.ListItems.Clear

With prodlist.ColumnHeaders.Add(, , nombre, 3000)
End With
With prodlist.ColumnHeaders.Add(, , ape, 2000)
End With
With prodlist.ColumnHeaders.Add(, , izena, 1500)
End With
With prodlist.ColumnHeaders.Add(, , admin, 1500)
End With
With prodlist.ColumnHeaders.Add(, , Blocked, 2000)
End With

esto lo ago en preparar ListView1 pero las columnas me aparecen sin el titulo
alguien me puede ayudar?¿

He probado tu código y he cambiado la propiedad View del ListView asignandole el valor lvwReport, y las cadenas de texto de las cabeceras salvo que no sean variables entre comillas, aunque me imagino que seran variables que tu utilizas.

Saludos