Solved Open a form as dialog with no borders. Is it possible ? (1 Viewer)

[MajP]

Thanks a lot
This seems to be too complex.
I'll try to find a simpler solution, in Access

Maybe I am missing something, but I think at least two working solutions were proposed to open it not acdialog but likely achieve your needs.

 

[smig]

I assume you just need to capture the close event of the pop up form and then do something with those two values in the textbox. I would not use a timer. This is assumes without ACDIALOG you can achieve the aesthetics you want.

Private WithEvents PopUpForm As Access.Form

Private Sub Command0_Click()
  DoCmd.OpenForm "form2"
  Set PopUpForm = Forms("form2")
  PopUpForm.OnClose = "[Event Procedure]"
End Sub

Private Sub PopUpForm_Close()
'capture the closing of the pop up form.
  MsgBox PopUpForm.txt1 & " " & PopUpForm.txt2
End Sub

Thank you
This one do the job

I'm sure other suggestions like loop the DoEvents until form is closed, as suggested by @CJ_London will work too