ACC: Sample Function to Determine Language Version

ID: Q109392

The information in this article applies to:

Microsoft Access versions 1.0, 1.1, 2.0, 7.0, 97

SUMMARY

Moderate: Requires basic macro, coding, and interoperability skills.

Microsoft Access ships in several languages, including English, Spanish, Portuguese, French, and German. However, there is no built-in command in Microsoft Access to determine which language version of Microsoft Access your application is running. This article shows you how to create a sample function that you can use to determine which language version of Microsoft Access is running.

This article assumes that you are familiar with Visual Basic for Applications and with creating Microsoft Access applications using the programming tools provided with Microsoft Access. For more information about Visual Basic for Applications, please refer to your version of the "Building Applications with Microsoft Access" manual.

NOTE: Visual Basic for Applications is called Access Basic in Microsoft Access versions 1.x and 2.0. For more information about Access Basic, please refer to the "Introduction to Programming" manual in Microsoft Access version 1.x or the "Building Applications" manual in Microsoft Access version 2.0

MORE INFORMATION

The error messages in Microsoft Access are localized to the specific language version. You can determine which language version of Microsoft Access is running by looking at the error strings. For example, the following strings are returned by the various language versions if you type "?Error$(3)" (without the quotation marks) in the Debug window (or the Immediate window in versions 1.x and 2.0):

   English: Return without GoSub
   French: Return sans GoSub
   German: 'Return' ohne 'GoSub'
   Portuguese: Return sem GoSub
   Spanish: Return sin GoSub

You can run the following sample function to determine which language version of Microsoft Access is running. To create this function, type the following line in the Declarations section of your module if it is not already there:

   Option Explicit

Then, type the following code:

   Function Language ()
      Select Case Error$(3)
         Case "Return without GoSub":
            Language = "English"
         Case "Return sans GoSub":
            Language = "French"
         Case "'Return' ohne 'GoSub'":
            Language = "German"
         Case "Return sem GoSub":
            Language = "Portuguese"
         Case "Return sin GoSub":
            Language = "Spanish"
      End Select
   End Function

REFERENCES

For a list of localized versions of Microsoft Access, please see the following article in the Microsoft Knowledge Base:

   ARTICLE-ID: Q142699
   TITLE     : ACC: List of Microsoft Access and ADT Localized Versions

Additional query words: globalization international int'l localization localisation

Keywords          : kbprg
Version           : 1.0 1.1 2.0 7.0 97
Platform          : WINDOWS
Hardware          : x86
Issue type        : kbinfo

Last Reviewed: November 20, 1998