Right Click not working? (1 Viewer)

sondriven

Registered User.
Local time
Today, 10:53
Joined
Jun 13, 2002
Messages
158
I have Access 2000 and sometimes the right click feature turns off of me. Is there a setting for this or an icon not selected. Its really wierd.

Thanks.
 

sondriven

Registered User.
Local time
Today, 10:53
Joined
Jun 13, 2002
Messages
158
Thanks for the reply. I checked what you said and its set to Yes.
And its still not letting me right click on anything.

Could it be something else?
 
M

mission2java_78

Guest
WWhats not working? Right click isnt supposed to do anything on a text box if thats what youre looking for. Right clicking on the form with that property set to yes will display design view..etc.

Jon
 
R

Rich

Guest
Is this one of the "improvements" made to A2k then Jon? Right click certainly works on text boxes in 97.
Are you sure you mouse isn't faulty?
 

Alexandre

Registered User.
Local time
Today, 21:53
Joined
Feb 22, 2001
Messages
794
right-click does work on most controls that I know, including textboxes, in A2k. If this is an erratic behaviour it is likely to be your mouse. If this is constant, the DB property allowing contextual menus may have been set to 'False'.
 

sondriven

Registered User.
Local time
Today, 10:53
Joined
Jun 13, 2002
Messages
158
It only stops working in Access. Now whenever I go into the DB, I cant right click combo boxes or text boxes. I do this to usually select color or size the box to grid. That kind of stuff.

Ill check the contextual control and see if that will do the trick.

Thanks

john
 

sondriven

Registered User.
Local time
Today, 10:53
Joined
Jun 13, 2002
Messages
158
Okay I doubled checked something. I opened two DB's. One the right clicked worked and the other it did not. So I know its not the mouse.

I cant seem to find the contextual property to tell if its false or not.

Thanks.

John
 
R

Rich

Guest
Have you tried compiling and saving all modules, compacting or importing everything into a new blank db?
 

Alexandre

Registered User.
Local time
Today, 21:53
Joined
Feb 22, 2001
Messages
794
Rich is right. If the property allowing contextual menus were set to false you would never get the right-click menu in your DB. So maybe it is that your DB got corrupted somehow (or may one or a few forms). Give a try to Rich's proposal.
 

pkstormy

Registered User.
Local time
Today, 09:53
Joined
Feb 11, 2008
Messages
64
Note: I use the module below to make MSAccess work like a true popup (without any background type form or any upper menus). I call the function fSetAccessWindow in the onOpen event of my initial form.

Example in OnOpen event of my initial popup form...
Call Module2.fSetAccessWindow(2)
or
Call Module2.fSetAccessWindow(0)

To make the right-click work again, on a specific popup form (or report) in the onOpen event of that form simply add the below code. This turns the right-click back on while maintaining the 'true' popup style of the MSAccess project.

Call Module2.fSetAccessWindow(1)

to turn off right-clicking and keeping the popup style, make sure to
Call Module2.fSetAccessWindow(2) in the onclose event of the popup form.
or
Call Module2.fSetAccessWindow(0)

Note that when calling the function to show the menus 'normalized' (ie. 1) will temporarily show the MSAccess background menus/navigation when the form is opened. If you set the modal property of the popup form to yes, the user will only be able to work with the popup form and not be able to set the focus to the msaccess background form.


Option Compare Database
Option Explicit
Global Const SW_HIDE = 0
Global Const SW_SHOWNORMAL = 1
Global Const SW_SHOWMINIMIZED = 2
Global Const SW_SHOWMAXIMIZED = 3
Private Declare Function apiShowWindow Lib "User32" _
Alias "ShowWindow" (ByVal hwnd As Long, _
ByVal nCmdShow As Long) As Long
Function fSetAccessWindow(nCmdShow As Long)
'This api is used to remove the MSAccess information and only show the form.
'Code gotten from the web. Paul Kohn 7/23/07.
Dim loX As Long
Dim loForm As Form
On Error Resume Next
Set loForm = Screen.ActiveForm
If Err <> 0 Then
loX = apiShowWindow(hWndAccessApp, nCmdShow)
Err.Clear
End If
If nCmdShow = SW_SHOWMINIMIZED And loForm.Modal = True Then
MsgBox "Cannot minimize Access with " _
& (loForm.Caption + " ") _
& "form on screen"
ElseIf nCmdShow = SW_HIDE And loForm.PopUp <> True Then
MsgBox "Cannot hide Access with " _
& (loForm.Caption + " ") _
& "form on screen"
Else
loX = apiShowWindow(hWndAccessApp, nCmdShow)
End If
fSetAccessWindow = (loX <> 0)
End Function
 
Last edited:

CJ_London

Super Moderator
Staff member
Local time
Today, 15:53
Joined
Feb 19, 2013
Messages
16,634
@pkstormy. You are responding to a 14 year old thread;)
 

pkstormy

Registered User.
Local time
Today, 09:53
Joined
Feb 11, 2008
Messages
64
@pkstormy. You are responding to a 14 year old thread;)

Yes. I know. It still applies though and the module I described is still the main way and best way I've found to hide the MSAccess menu system and make the MSAccess file work in true popup fashion without any MSAccess menus.

I searched throughout the web for a solution to the right-clicking problem since it started to not work in all my MSAccess 2010 and later files. I also haven't posted on this site for a while so I thought I would post my solution here versus other websites.
 

vss

Registered User.
Local time
Today, 07:53
Joined
Nov 27, 2008
Messages
11
Lol, 15 years topic. Now I get stuck with it. It's so funny!
 

Users who are viewing this thread

Top Bottom