For each array e label

martedì 11 aprile 2006 - 18.51

kiwi Profilo | Newbie

Salve .....sempre io volevo chiedervi info sul for each per il mio array di label

se io ho il mio array

Dim LabelArray(4) as label

SetControlArray() (nel Load della Form)

Sub SetControlArray()
LabelArray(1) = L1 (il nome della Label)
LabelArray(2) = L2
LabelArray(3) = L3
LabelArray(4) = L4
End Sub

come posso creare un For Each per gli elementi
io ho fatto così ma ovviamente non funziona:

For each Lab (variabile) as label in LabelArray (la collezione)
Lab.text = "ciao"
Next

In teoria dovrebbe scrivere in ogni Label della collezione la stringa "ciao"
Invece mi da errore e la variabile Lab resta vuota (valore Nothing)

Dove sbaglio?


Grazie

Brainkiller Profilo | Guru

Ciao Kiwi,
prima devi inizializzare i vari elementi dell'array con una new qui il codice:

Dim LabelArray(4) As Label Dim i As Integer For i = 0 To LabelArray.Length - 1 LabelArray(i) = New Label Next For Each Lab As Label In LabelArray Lab.Text = "CIAO" Next For Each Lab As Label In LabelArray Console.WriteLine(lab.Text) Next

ciao
David De Giacomi
Microsoft MVP
http://blogs.dotnethell.it/david/

kiwi Profilo | Newbie

Ok ho risolto........
ti ringrazio ancora per aver risposto David.....
non ho usato il tuo metodo perchè non mi funziona (neanche in un nuovo progetto) però vista la semplicità dell'array che mi serviva ho risolto con un select case e l'utilizzo di un modulo per non uscirene completamente pazza!
comunque sta cosa del for each me la devo vedere bene se un giorno ho troppi controlli e mi serve come faccio??
vabbè se per voi va bene potrei lasciare il codice scritto per i posteri ed inserire la cartella di vb.net zippata fatemi sapere Grazie ciao

Brainkiller Profilo | Guru

>comunque sta cosa del for each me la devo vedere bene se un giorno
>ho troppi controlli e mi serve come faccio??

Beh,
il codice che ti ho postato funziona perfettamente perchè l'ho scritto nell'ambiente e l'ho testato. Non so che problemi hai sul tuo fronte.
Ciao

David De Giacomi
Microsoft MVP
http://blogs.dotnethell.it/david/

kiwi Profilo | Newbie

Sì sì non intendevo dire che era sbagliato, mi stavo rimbambendo troppo su quell'applicazion(cina) e come mi è venuta l'altra soluzione ho risolto direttamente in quel modo, sicuramente la tua funziona devo rivederla con la mente un pò più libera quindi.....sicuramente ti romperò ancora!
Grazie ancora David
ciao
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-2024
Running on Windows Server 2008 R2 Standard, SQL Server 2012 & ASP.NET 3.5