hide the window in ms/access

Hi
I want to hide the MS/ACCESS Window on my app and found a routine on fms that looks doing so

it however is 32 bit and I am running 64 bit.

the statements in cause are:


Private Declare Function IsWindowVisible Lib "user32" (ByVal hwnd As Long) As Long
Dim dwReturn As Long


Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, _
     ByVal nCmdShow As Long) As Long

can anyone tell me how to move to 64 bit? or let me know a simple manner to hide the Window?
/joao
João serras-pereiraAsked:
Who is Participating?
 
Bill PrewCommented:
For 64 bit try below, and make sure your local variable that you pass as the hwnd parm is also LongPtr.

Private Declare PtrSafe Function IsWindowVisible Lib "user32" (ByVal hwnd As LongPtr) As Long
Dim dwReturn As Long
Private Declare PtrSafe Function ShowWindow Lib "user32" (ByVal hwnd As LongPtr, ByVal nCmdShow As Long) As Long

Open in new window


»bp
0
 
João serras-pereiraAuthor Commented:
Thanks!
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.