List box

mercoledì 27 settembre 2006 - 14.55

The_Rock Profilo | Junior Member

salve avrei bisogno urgentemente della soluzione per favore. ho una listbox ogni volta che seleziono un elemento e clicco il tasto elimina questo scompare dalla lista.So che devo fare un ciclo ma non ne sono capace.
Grazie per l'aiuto.


ps fino ad ora ho fatto questo ma non gira.

dim i as integer

for i = 0 to listbox1.items.count step -1

listbox1.items.removeat(listbox1.items(i))

next

bluland Profilo | Guru

quindi la collezione non e' caricata da un db?


saluti

ENzo

The_Rock Profilo | Junior Member

no la carico io dal codice
The_Rock

bluland Profilo | Guru

PROVA cosi:

Il codice sorgente non è stato renderizzato qui
perchè non c'è sufficiente spazio.
Clicca qui per visualizzarlo in una nuova finestra

saluti

ENzo

The_Rock Profilo | Junior Member

grazie mille , funziona pero' il problema c'e' ancora. E' colpa mia che non te l'ho detto prima dimenticandomi.
Devo eliminare in blocco ovvero per quanti elementi seleziono tanti ne elimino.Ecco perche mi serve il ciclo.come posso fare?
Grazie.
cosi' non mi funziona ancora.

Dim i As Integer
For i = 0 To ListBox1.SelectedIndex.ToString Step -1
'if ListBox1.SelectedItem.
Me.ListBox1.Items(i).RemoveAt(Me.ListBox1.SelectedIndex.ToString)


Next i


End Sub


The_Rock Profilo | Junior Member

Nessuno che mi dice come si fa sto benedetto ciclo? sto in crisi.
Grazie
The_Rock

bluland Profilo | Guru

>Nessuno che mi dice come si fa sto benedetto ciclo? sto in crisi.

ecco il benedetto:

Dim x As Integer For x = (ListBox1.Items.Count - 1) To 0 Step -1 If ListBox1.Items(x).Selected = True Then ListBox1.Items.RemoveAt(ListBox1.Items.IndexOf(ListBox1.Items(x))) End If Next

>Grazie

prego
>The_Rock

bluland Profilo | Guru

Chiudi il thread se la risposta ti soddisfa, cosi lasciamo un feedback per altri..


saluti

ENzo

The_Rock Profilo | Junior Member

Guarda purtroppo all' if (If ListBox1.Items(x).Selected = True) mi da errore dopo item(x) , l'unica opzione che mi da dopo il punto è Get_Type;selected non è proprio menzionata. Ho provato a fare qualche cambiamento io ma ancora niente purtroppo...
Se ti viene in mente qualcosa ti chiedo cortesemente di comunicarmela.
Grazie in anticipo per un tuo altro eventuale intervento.
The_Rock

bluland Profilo | Guru

>Guarda purtroppo all' if (If ListBox1.Items(x).Selected = True)
>mi da errore dopo item(x) , l'unica opzione che mi da dopo il
>punto è Get_Type;selected non è proprio menzionata. Ho >provato


troppo strano mi posti il tuo codice?
magari anche un stamp dei metodi che ti fornisce dopo il punto.


saluti

VP

The_Rock Profilo | Junior Member

Il problema e' che devo risolvere dal lato form.(scusa non te l'avevo detto)


Dopo il punto mi da' solo get_type.

ps non ho ancora risolto, ho sbagliato a selezionare la casella di "risposta al messaggio".
The_Rock

bluland Profilo | Guru

non ho capito niente scusa, mi mandi il tuo codice con uno stamp di quello che ti esce dopo il punto?

The_Rock Profilo | Junior Member

Ecco qua.
The_Rock

bluland Profilo | Guru

ma allora stiamo parlando di windows application non di web, hai sbagliato stanza!!!!

devo verificare come funziona sulle windows, ti conviene postare nell'altra stanza anche...

saluti

Enzo

The_Rock Profilo | Junior Member

Ops scusami tanto ... non sono pratico di questo forum e sopratutto di dotnet in generale. Stasera apriro' un post anche dall'altra parte.
Scusami ancora per il tempo che ti ho fatto perdere.
Un saluto
The_Rock

bluland Profilo | Guru

ecco come verrebbe in vb.net

Dim i As Integer For i = (Me.ListBox1.Items.Count - 1) To 0 Step -1 If Me.ListBox1.GetSelected(i) = True Then Me.ListBox1.Items.RemoveAt(Me.ListBox1.Items.IndexOf(Me.ListBox1.Items(i))) End If Next

saluti

VP

The_Rock Profilo | Junior Member

Perfetto. Grazie di tutto.
The_Rock
Partecipa anche tu! Registrati!
Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !
Copyright © dotNetHell.it 2002-2025
Running on Windows Server 2008 R2 Standard, SQL Server 2012 & ASP.NET 3.5