VB.NET - listboxes

[tim1989]

Hi

Ik ben pas bezig in VB.NET, dus sorry voor de voor jullie wellicht domme vraag.

ik ben bezig met een klein kassasysteempje..
Ik heb een listbox waarin mijn bestellingen terrecht komen. (lbbestelling)
Deze listbox wil ik dan aan de juiste tafel toevoegen. Dit gebeurd dmv een button 'Bestel'.
Dan komt er de inputbox vragen om een tafelnummer. Als ik dan 1 ingeef, wordt dit dan opgeslaan in de variale tafel met als resultaat tafel1
Dan zou hij die lbbestelling aan de listbox van tafel1 moeten toevoegen

Dim tafel As String
tafel = "tafel" + InputBox("Geef een tafel nummer in:"1)=tafel1

For i As Int32 = 0 To lbbestelling.Items.Count - 1
tafeltafel1.Items.Add(lbbestelling.Items(i).ToString)
Next
lbbestelling.Items.Clear()

Het probleem is dat hij die "tafel" als een string ziet, en niet als listbox tafel1...
Als ik het deel met de inputbox weglaat, en er gewoon tafel1.Items.Add(lbbestelling.....) zet werkt het..

Hoe zou ik dit moeten aanpakken ?


Dankjewel alvast !

 

[Jurjen1966]

Tim,


Ik denk dat ik ongeveer wel begrijp wat je wilt doen, maar je kan niet op die manier verwijzen een control. Wat je zal moeten doen is een referentie opvragen naar de ListBox 'tafel1' waarvan ik even aanneem dat ie bestaat.

Dim GeselecteerdeTafel As ListBox
GeselecteerdeTafel = me.FindControl(tafel) ' waar tafel = "tafel1"

if Not GeselecteerdeTafel Is nothing then
For i As Int32 = 0 To lbbestelling.Items.Count - 1
GeselecteerdeTafel.Items.Add(lbbestelling.Items(i).ToString) ' ik vraag me af of ToString() hier nodig is.
Next

lbbestelling.Items.Clear()

Else
Msgbox("tafel niet gevonden.")
End

bovenstaande heb ik zo maar even ingeklopt, het zou dus kunnen dat er hier of daar een type-fout zit. Ik hoop dat je zo weer verder kunt, als je er niet uitkomt kan je me ook even een mailtje sturen met daarin je project (of deel daarvan) dan kan ik je waarschijnlijk beter helpen.

gr. Jurjen. (Jurjen punt de punt groot at hotmail punt com)

 

[tim1989]

Dankje, even verder puzzelen !