DoubleClick Event Query hides behind my Form 1

[cimoli]

On a form, I have a form field name txtWaitSeats with a Control Source of WaitSeats.
I have a doubleclick event on this form field.

When on the form, I doubleclick on the field. Nothing seemed to occur.
But when I minimized the form, the little query had run and was sitting BEHIND the form.

What am I doing wrong to make the query behind the form?

Here is the event in the form field txtWaitSeats :

Private Sub txtWaitSeats_DblClick(Cancel As Integer)

On Error GoTo Err_txtWaitSeats_DblClick

Dim stDocName As String

stDocName = "QryWaitSeatsTripID"
DoCmd.OpenQuery stDocName, acNormal, acEdit

Exit_txtWaitSeats_DblClick:
Exit Sub

Err_txtWaitSeats_DblClick:
MsgBox Err.Description
Resume Exit_txtWaitSeats_DblClick

End Sub

Thanks you for your help.

 

[cimoli]

I want to add ..... The form uses continuous form default view.

 

[dhookom]

Why are you opening a query and not a form? You could open the form in dialog mode.

Duane
Hook'D on Access
MS Access MVP

 

[cimoli]

yes, you are right. thanks alot.

 

[cimoli]

Hello again. I am stuck.
When I hit a Form1 button, the Form2 is hides behind.
I've been reading about the acDialog.

Below is my On Click Event. I think the problem is my

DoCmd.OpenForm stDocName, WindowMode:=acDialog

Thanks


The button has an ON Click event procedure of:

Private Sub cmdWaitSeatsList_Click()

On Error GoTo Err_cmdWaitSeatsList_Click

Dim stDocName As String

stDocName = "frmWaitSeatsList"

DoCmd.OpenForm stDocName, WindowMode:=acDialog

Exit_cmdWaitSeatsList_Click:
Exit Sub

Err_cmdWaitSeatsList_Click:
MsgBox Err.Description
Resume Exit_cmdWaitSeatsList_Click

End Sub

 

[cimoli]

I should have shifted this to the Forms Forum. sorry

 

[cimoli]

PS the form2 is my frmWaitSeatsList.
I also put popup Yes in this form.
I am not sure yet if i want a full screen or popup of form2.
i guess popup.

 

[PHV]

What about this ?
...
Me.Visible = False
DoCmd.OpenForm stDocName, WindowMode:=acDialog
Me.Visible = True
...

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[cimoli]

PHV: your method is getting me closer. I should elaborate.

I have a form called frmMain. i click on button 4512 and up comes maximized
a form called frmSeatsInPlane. So far so good. Various data.

On frmSeatsInPlane, I click on a button 4520 which brings me to the difficult
frmWaitSeatsList.

You last post was used. Now the frmWaitSeatsList shows up in popUp form.
(i could go for full screen actually. that would be better).

The screen behind is the frmMain and not frmSeatsInPlane.
Strange. I thought frm SeatsInPlane would stay and the popup frmwaitSeatsList would be layered
on top.

Here is what i now have on the 4520 button. thanks.

Private Sub cmdWaitSeatsList_Click()

On Error GoTo Err_cmdWaitSeatsList_Click

Dim stDocName As String

stDocName = "frmWaitSeatsList"

Me.Visible = False

DoCmd.OpenForm stDocName, WindowMode:=acDialog

Me.Visible = True

Exit_cmdWaitSeatsList_Click:
Exit Sub

Err_cmdWaitSeatsList_Click:
MsgBox Err.Description
Resume Exit_cmdWaitSeatsList_Click

End Sub

 

[cimoli]

oooohhH!! I found the following doCmd on the internet and it seems to work for me.
Can you look at it below? I would prefer to be FULL screen. How? my popup is NO.


Here is the On Click that I now have in the 4520 button that is on the frmSeatsInPlane.
How can I make it FULL size? thanks.

Private Sub cmdWaitSeatsList_Click()

On Error GoTo Err_cmdWaitSeatsList_Click

Dim stDocName As String

stDocName = "frmWaitSeatsList"

DoCmd.OpenForm stDocName, acFormDS, , , , acDialog

Exit_cmdWaitSeatsList_Click:
Exit Sub

Err_cmdWaitSeatsList_Click:
MsgBox Err.Description
Resume Exit_cmdWaitSeatsList_Click

End Sub