If ListBox.ListCount = 1 then .......

[Andre175]

Goedemiddag

ik heb een listboxA die gevuld wordt met waarden/text uit een tabel.
Afhankelijk van door de gebruiker gemaakte keuze in een andere listbox, worden de waarden in listboxA gefilterd.

indien ListCount > 1 kan de gebruiker een keuze maken waardoor de textboxen van waarden/text wordt voorzien

nu wil ik graag dat wanneer listboxA.ListCount = 1, deze automatisch wordt geselecteerd, en dus de textboxen automatisch van de juiste waarden/text worden voorzien.
Dus bij wijze van, wanneer listcount=1 er automatsch op deze regel geklikt wordt, om het simpel te zeggen.

If ListBoxA.ListCount = 1 then ListBoxA.....??????...

de codes voor en na deze regel is geen probleem.... maar wat moet erachter? Hoe selecteer ik die ene regel?



André

 

[Andre175]

Opgelost...... :d

If ListBoxA.ListCount = 1 then ListBoxA.Listindex = 0

for j = 1 to 4
      me("TextBox" & j) = ListboxA.Column (j)
next
end if

Het was wees simpeler dan ik zat te denken....