Open Form and wait for Selection Before Contuning with Code

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Hello,

As the subject stated. I have bit of code which open a form, populates the
listbox contain within it (not working yet). I need the code to wait until
the user make a selection (or presses a button) before going on to finish my
code. how can this be done?

My code is:
Set rst = db.OpenRecordset(strSQLNew)
DoCmd.OpenForm "Duplicate Clients", , , , , acDialog

rst.MoveFirst
Do While Not rst.EOF
Forms![Duplicate Clients].Form.List0.AddItem Item:=rst![ClientID]
rst.MoveNext
Loop
'I would need it to pause here until the user make a choice, right after
populating the listbox
....

Thank you for your help,

Daniel P
 
In
Daniel said:
Hello,

As the subject stated. I have bit of code which open a form,
populates the listbox contain within it (not working yet). I need
the code to wait until the user make a selection (or presses a
button) before going on to finish my code. how can this be done?

My code is:
Set rst = db.OpenRecordset(strSQLNew)
DoCmd.OpenForm "Duplicate Clients", , , , , acDialog

rst.MoveFirst
Do While Not rst.EOF
Forms![Duplicate Clients].Form.List0.AddItem
Item:=rst![ClientID] rst.MoveNext
Loop
'I would need it to pause here until the user make a choice, right
after populating the listbox
...

Thank you for your help,

Daniel P
Click to expand...

Your code to load the list box via AddItem won't be executed until after
the form "Duplicate Clients" is closed or hidden, because that form is
opened in dialog mode. I suggest you use code in the dialog form itself
to load its list box. If doing so needs information from your current
form -- the SQL of the query, maybe -- you can pass it to the form via
the OpenArgs argument of the OpenForm method.

Then, after the user has made his selection on the dialog form, you can
hide the form instead of closing it, to allow your code to continue and
pick up the selection from the list box. After that, the code can close
the form.
 
Thank you Dirk! I can't count the times you've enlighten me with simple
solutions to my problems!!!!

Daniel P





Dirk Goldgar said:
In
Daniel said:
Hello,

As the subject stated. I have bit of code which open a form,
populates the listbox contain within it (not working yet). I need
the code to wait until the user make a selection (or presses a
button) before going on to finish my code. how can this be done?

My code is:
Set rst = db.OpenRecordset(strSQLNew)
DoCmd.OpenForm "Duplicate Clients", , , , , acDialog

rst.MoveFirst
Do While Not rst.EOF
Forms![Duplicate Clients].Form.List0.AddItem
Item:=rst![ClientID] rst.MoveNext
Loop
'I would need it to pause here until the user make a choice, right
after populating the listbox
...

Thank you for your help,

Daniel P
Click to expand...

Your code to load the list box via AddItem won't be executed until after
the form "Duplicate Clients" is closed or hidden, because that form is
opened in dialog mode. I suggest you use code in the dialog form itself
to load its list box. If doing so needs information from your current
form -- the SQL of the query, maybe -- you can pass it to the form via
the OpenArgs argument of the OpenForm method.

Then, after the user has made his selection on the dialog form, you can
hide the form instead of closing it, to allow your code to continue and
pick up the selection from the list box. After that, the code can close
the form.

--
Dirk Goldgar, MS Access MVP
www.datagnostics.com

(please reply to the newsgroup)
Click to expand...
 
In
Daniel said:
Thank you Dirk! I can't count the times you've enlighten me with
simple solutions to my problems!!!!
Click to expand...

You're welcome, Daniel. I'm always glad to help.
 
Back
Top