Open Form

[DS]

I want to open a form and once the form is opened run code. I tried the on
open and on olad events but the form opens but doesn't completely paint
until the code is run, so is there a way to open the form, then run the code
without me manuelly having to hit a command button to do it?
Thnaks
DS

 

[Allen Browne]

Try setting the Visible property of the form if you need it to show up
before the next action.

 

[DS]

Thanks Allen,
I tried that but the form still doesn't completely paint before the code
runs.
DS

 

[Allen Browne]

"Doesn't completely Paint" means what?

If you are expecting it to load all its records, run its other events (such
as Load, Current, Activate, and the Got Focus events of the controls), and
evaluate all expressions in calculated controls before this event completes,
that's probably not practical.

Whatever you are doing here, it might need a different approach.

 

[DS]

Its an unbound form with one command button to close it. It has one label
on it. It should paint (I mean see the whole form not just the outline)
This shouldn'r be slow!
Thanks
DS

 

[Allen Browne]

In Form_Load, try:

Me.Visible = True
DoEvents
Me.Repaint
DoEvents

 

[DS]

That works! The only downside is that the first time I do it the form takes
awhile to load, after that it's instantanous!
Thanks
Allen

DS