listView in VB6

[albebigio]

Salve, ho un problema in un software che sto realizzando in vb6. Ho creato una listView, e ha un evento onClick. Il problema è che se non c'è selezionato niente mi viene restituito un errore anche se io nel codice dell'evento ho messo:

if listView1.selectedItems.text <> "" then 
   codice 
end if 

L'errore è: "Variabile oggetto o variabile del blocco With non impostata".

Qualcuno mi potrebbe aiutare a capire dove è l'errore?

Grazie mille in anticipo