GetLocale

Returns the decimal value of the local computers LocaleID.

Syntax 
      getLocale()

Example

Dim myLocale

'Get current location
myLocale = GetLocale()

“Who looks outside, dreams; who looks inside, awakes” ~ Carl Gustav Jung

Related:

LCase - Return String in lower case