Popolare Drop Down List in Visual Basic

lunedì 08 marzo 2010 - 12.37

Robertino1171 Profilo | Newbie

Dovrei popolare una drop down list in visual basic. I dati sono nel seguente formato stringa "12|cavallo|24|gallina|34|pecora|35|pernice". Per ciascuna riga ho un codice e una descrizione.
La chiave di lettura è la seguente:
12 cavallo
24 gallina
34 pecora
35 pernice
Nella drop down list non voglio che venga visualizzato il codice, ma solo la descrizione:
cavallo
gallina
pecora
pernice
ma se nel codice sorgente utilizzo il metodo che mi restituisce il valore selezionato nella dropdownlist, voglio che mi venga restituito il codice identificativo della bestia anzichè la descrizione (ad esempio 24 e non gallina) perchè poi lo dovrò utilizzare come parametro per un altro metodo.
Avete suggerimenti interessanti

disti Profilo | Newbie

Ciao,

in VB6 puoi utilizzare questo codice:

Private Sub Form_Load() cboAnimali.AddItem "Cane" cboAnimali.ItemData(cboAnimali.NewIndex) = "12" cboAnimali.AddItem "Gatto" cboAnimali.ItemData(cboAnimali.NewIndex) = "47" cboAnimali.AddItem "Pesce" cboAnimali.ItemData(cboAnimali.NewIndex) = "55" cboAnimali.AddItem "Cavallo" cboAnimali.ItemData(cboAnimali.NewIndex) = "72" cboAnimali.ListIndex = 0 End Sub

Private Sub Command1_Click() MsgBox cboAnimali.ItemData(cboAnimali.ListIndex) End Sub

Se non vuoi inserire le voci nel codice ma mentre disegni la form, puoi utilizzare le proprietà "list" e "itemdata", tenendo presente che se fai così alla prima voce che inserisci nell'eleco "list" corrisponde la prima voce dell'elenco "itemdata" e così via.

ciao!

disti Profilo | Newbie

Dimenticavo:

se i dati di partenza li hai in una stringa come quella che hai mostrato, un esempio di codice potrebbe essere:

Private Sub Form_Load() Dim Source As String Dim i As Integer Source = "12|Cane|47|Gatto|55|Pesce|72|Cavallo" For i = 0 To UBound(Split(Source, "|")) Step 2 cboAnimali.AddItem Split(Source, "|")(i + 1) cboAnimali.ItemData(cboAnimali.NewIndex) = Split(Source, "|")(i) Next cboAnimali.ListIndex = 0 End Sub

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-2017
Running on Windows Server 2008 R2 Standard, SQL Server 2012 & ASP.NET 3.5