Wierd For...Each behavior

[Tom]

This is very strange: I have a Windows Form with a Panel on it. In that
panel I dynamically (at run time) create some labels, as so:

for i=1 to x
dim ctlNew as New Label()
with ctlNew
.Name="Whatever" & trim(cstr(i))
.Text=.Name
.Visible=True
... etc etc etc ...
end with
MyPanel.Controls.Add(ctlNew)

This shows up fine when the form is displayed. However, I also have a reset
button on the form, which goes thru and destroys the labels, as such:

dim ctl as Control
for each ctl in MyPanel.Controls
if typeof ctl is Label then
ctl.text=""
ctl.visible=False
ctl.Dispose()
end if
next

OK, here is the WIERD thing: The For...Each loop only seems to pick up the
EVEN or ODD numbered controls! It skips some of the controls (i.e. the odd
ones).... if I rerun the loop about three times, one right after the other,
it will finally pick up all the controls and get rid of them.

I -think- the code is correct - I even added a ctl=Nothing before and/or
after the ctl.Dispose(), but it didn't help. The For...Each loop just seems
the skip some of the label controls during its run. I am baffled ... even
though it is probably something dumb that I am doing.

Anyone got any ideas on this?

Tom

[Nak]

> ;-)

Oh I see, keeping it a secret huh? :-)

Nick.

--
/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\
"No matter. Whatever the outcome, you are changed."

Fergus - September 5th 2003
/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\

[Fergus Cooney]

Hi Nick,

Lol. Sounds like Monty to me. :-)

Regards,
Fergus

[Fergus Cooney]

Hi Cor,

|| The code Tom used, showed for me that he was not a beginner

Absolutely. Your code gave the how. It's quite within Tom's capabilities to turn that into an "exactly how".

|| .. did gave me a good feeling
|| Thanks all

You're welcome. [And a good fight, er, I mean discussion, is nice from time to time.]

Cheers, :-)
Fergus

[Cor]

Fergus
You said that I thought, lets take one yes.
Proost
Cor

[Fergus Cooney]

Hi Nick,

|| That was very powerful, ...

Thank you :-)

|| ... ever thought of getting into politics?

Ah! For a minute there I thought it was a compliment. No. I <will> take it as a compliment, lol.

I think you acquitted yourself pretty well too, I might add. I did enjoy your Busta Bludvessel, and you made several good
serious points, too.

|| I believe there is actually a thread of community
|| in this newsgroup

So do I. I have an image of us as buddies walking down the High Street doing good deeds - guiding old ladies unsure of the
traffic, helping people push their out-of-petrol car to the side of the road or even to the garage, picking up dummies dropped by
little girls in lilac, that sort of thing. And 'educating' punks who discard litter on the street with no consciousness of how
community works. :-D

Cheers, buddy,
Fergus

[Fergus Cooney]

Proost!

[Herfried K. Wagner [MVP]]

Hello,

"Cor" <no*@non.com> schrieb:

You said that I thought, lets take one yes.
Proost

What does "Proost" mean?

--
Herfried K. Wagner
MVP · VB Classic, VB.NET
http://www.mvps.org/dotnet

[Herfried K. Wagner [MVP]]

Hello,

"Cor" <no*@non.com> schrieb:

Fergus and of course all others,
:-)
That is early this morning, I am suprissed.
Even Nick did support me and after a while even Herfried showed
he became angry, did gave me a good feeling.
The errors where so little and bassicly I was expecting from the supplied
code from Tom that only some hints where necassery.
The code Tom used, showed for me that he was not a beginner but just was
searching for some things he could not find.

Jack's criticism was basically correct and your code was not
"best-practice", nevertheless, I liked the discussion caused by your
posting. I saw some really interesting code snippets.

;-)

--
Herfried K. Wagner
MVP · VB Classic, VB.NET
http://www.mvps.org/dotnet

[Cor]

Proost

Salute
Cheers
Prosit
Na zdrowie
Chin Chin
Nazadarowie

[Charles Law]

Bottoms up
Cheerio
Don't tell the missus
....
"Cor" <no*@non.com> wrote in message
news:3f***********************@reader21.wxs.nl...

Proost

Salute
Cheers
Prosit
Na zdrowie
Chin Chin
Nazadarowie

[Nak]

> Lol. Sounds like Monty to me. :-)

LOL, BTW have you seen my program...

http://members.lycos.co.uk/nickpatemanpwp/soft-ffc.htm

The idea was taken from "Monty Python's Flying Circus", I know the
animations look crappy but they can be very funny too. It was an excellent
way to learn XML doing something like that.

I *did* have animations of past work "acquaintances" but unfortunately had
to remove them recently, they will be back though, in the form of a parody,
there is no better way to pi55 someone off! ;-)

Nick.

--
/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\
"No matter. Whatever the outcome, you are changed."

Fergus - September 5th 2003
/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\

[Fergus Cooney]

Proost

Bottoms up,
Down the hatch.

[Herfried K. Wagner [MVP]]

Hello,

"Cor" <no*@non.com> schrieb:

Proost

Salute
Cheers
Prosit
Na zdrowie
Chin Chin
Nazadarowie

Thanks. In German, people say "Prost" to each other when drinking beer.
"Prosit Neujahr!" is used to wish someone the best for the new year.

;-)))

--
Herfried K. Wagner
MVP · VB Classic, VB.NET
http://www.mvps.org/dotnet