[AccessD] 32->64 bit

[Rocky Smolin]

I think that was the SOTA in 2000.  The syntax has changed since then.

On Thu, Nov 4, 2021 at 9:35 AM Arthur Fuller <fuller.artful at gmail.com>
wrote:

> Jim,
> I know that. I'm just a bit puzzled why Getz et.al. chose to set it up
> that
> way in all the BAS files in their book.
>
>
> On Thu, Nov 4, 2021 at 11:40 AM Jim Dettman via AccessD <
> accessd at databaseadvisors.com> wrote:
>
> >
> >  That's something that pertains to scope, not 32/64 bit.
> >
> >  Private just means that the declare can only be called from the module
> > it's
> > in.  Public would be the opposite, where it can be called from anywhere.
> >
> >  Here's a link that covers it:
> >
> >
> >
> https://docs.microsoft.com/en-us/office/vba/language/concepts/getting-starte
> > d/understanding-scope-and-visibility
> > <
> https://docs.microsoft.com/en-us/office/vba/language/concepts/getting-started/understanding-scope-and-visibility
> >
> >
> > Jim.
> >
> > -----Original Message-----
> > From: AccessD On Behalf Of Arthur Fuller
> > Sent: Thursday, November 4, 2021 10:38 AM
> > To: Access Developers discussion and problem solving
> > <accessd at databaseadvisors.com>
> > Subject: [AccessD] 32->64 bit
> >
> > This is more work than I had hoped. Also confusing. A bunch of the code
> I'm
> > trying to upgrade comes frm Access 2000 Developers Handbook (Getz, Liwin
> > et. a.) All the code I gpt from there declares the API stuff like this:
> >
> > Private Declare Function xyz
> >
> > I don't understand the use of "Private" in this context.
> >
> > the Win32API_PtrSafe.txt file doesn't use the Private word. Instead the
> >
> > declarations look like this:
> >
> >  #If VBA7 Then
> >   Declare PtrSafe Function SetTimer Lib "user32" (ByVal hWnd As LongPtr,
> > ByVal nIDEvent As LongPtr, ByVal uElapse As Long, ByVal lpTimerFunc As
> > LongPtr) As LongPtr
> > #Else
> >   Declare Function SetTimer Lib "user32" (ByVal hWnd As Long, ByVal
> > nIDEvent As Long, ByVal uElapse As Long, ByVal lpTimerFunc As Long) As
> Long
> > #End If
> >
> > --
> > Arthur
> > --
> > AccessD mailing list
> > AccessD at databaseadvisors.com
> > https://databaseadvisors.com/mailman/listinfo/accessd
> > Website: http://www.databaseadvisors.com
> >
> > --
> > AccessD mailing list
> > AccessD at databaseadvisors.com
> > https://databaseadvisors.com/mailman/listinfo/accessd
> > Website: http://www.databaseadvisors.com
> >
>
>
> --
> Arthur
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> https://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>