[VB6]: Annullare una selezione in una FileListBox

[LMondi]

Dà errore perchè File1.Selected vuole l'indice !
Esempio:

Private Sub File1_Click()
   Dim i As Integer
   For i = 0 To File1.ListCount - 1
        If File1.Selected(i) = True Then
            MsgBox "File selezionato" & Space(2) & File1.FileName
        End If
    Next i
End Sub

Fai attenzione a come usi File1.Selected(i) = False perchè la routine potrebbe entrare in una sorta di loop.