zichtbaar maken van labels adhv waarde combobox

[willemlinden]

hallo,

Ik ben niet echt ervaren met visual basic, waarschijnlijk is dit voor jullie een eitje.

ik heb een combobox waar de gebruiker een getal van 2 tot 30 kan kiezen.
aan de hand van deze keuze wil ik labels/objects laten zien.

bv: de gebruiker kiest 10, dan moeten er 10 labels zichtbaar worden.

nu kan ik dit maken door labels visible te maken door "Visible" op true te zetten. maar dan krijg ik dus een superlange code wat volgens mij niet nodig hoeft te zijn.

ik ben bezig geweest met een for loop. en geprobeerd mijn labels een index nr te geven.
label(i)

Dim showfield As Object

index = CMB_Fields.SelectedItem
i = 2
For i = 2 To index
showfield = "label" & i
showfield.Visible = True
Next i

nu pikt hij showfield.visible = true niet omdat hij deze ziet als een string??

kan iemand mij helpen.

mvg willem v.d. Linden

 

[Jabber]

Dim showfield As Object

index = CMB_Fields.SelectedItem
i = 2
For i = 2 To index
showfield = "label" & i
showfield.Visible = True
Next

VB cast showfield automatisch naar een string. => showfield = "label" & i
Dan doe je een visible hierop, wat niet mogelijk is.

Je moet door alle controls loopen van je control waar de labels op staan.
[CPP]foreach c as Control in Form1.Controls[/CPP]
Per c c check je of de control een label is
Zoja, dan check je of de naam gelijk is aan showfield.
Zoja, set dan dan de visible property.

Ik weet niet of dit kan:
[CPP]l as Label = CType(Form1.Controls("label1"), Label)
l.Visible = true[/CPP]
o.i.d
[CPP]Form1.Controls.Search("Label1")[/CPP]

Uit mijn hoofd gedaan, ik hoop dat ik je een duwtje in de rug heb gegeven.

 

[willemlinden]

thnx!! ik ga het een en ander proberen.