[VB5] Selezionare tutti gli elementi di un controllo List

[vr-claudio]

Ciao ragazzi
come da oggetto, come faccio a selezionare tutti gli elementi in una List1 tramite un Command1?

Grazie mille
vr-claudio

[vr-claudio]

[814(k m49!(]

Private Sub Command1_Click()
    Dim i As Integer
    For i = 0 To List1.ListCount - 1
        List1.Selected(i) = True
    Next i
End Sub

devi impostare la proprieta' (della listbox) multiselect a 2.

[vr-claudio]

Grazie mille
e scusa per la banalità ma sono solamente un appassionato!
Ti chiedo la gentilezza di aiutarmi ancora se puoi.
Tempo fa chiesi al forum di aiutarmi in merito alla selezione di elementi di una List1
tramite il tasto destro del mouse e con l'evento KeyDown, gentilmente un collega del forum mi rispose cosi':

Dim n As Integer, h As Single
If Button = 2 Then
h = List1.Font.Size
n = Int(Y / h )
If n <= (List1.ListCount - 1) Then List1.ListIndex = n
End If

ma purtroppo non funziona, come posso fare?

Grazie mille
Claudio

[oregon]

Forse e' meglio che apri un altro thread apposito, con un titolo adeguato e spieghi meglio qual e' il problema (dato che non lo hai detto ...) ...

[814(k m49!(]

Originariamente inviato da vr-claudio
Grazie mille
e scusa per la banalità ma sono solamente un appassionato!

Prego

Ti chiedo la gentilezza di aiutarmi ancora se puoi.
Tempo fa chiesi al forum di aiutarmi in merito alla selezione di elementi di una List1
tramite il tasto destro del mouse e con l'evento KeyDown, gentilmente un collega del forum mi rispose cosi':

Dim n As Integer, h As Single
If Button = 2 Then
h = List1.Font.Size
n = Int(Y / h )
If n <= (List1.ListCount - 1) Then List1.ListIndex = n
End If

ma purtroppo non funziona, come posso fare?

Grazie mille
Claudio

andiamo avanti di >>QUA<<