ACC: Sample Function to Determine Language Version (109392)


The information in this article applies to:

  • Microsoft Access 1.0
  • Microsoft Access 1.1
  • Microsoft Access 2.0
  • Microsoft Access for Windows 95 7.0
  • Microsoft Access 97
This article was previously published under Q109392
Moderate: Requires basic macro, coding, and interoperability skills.

SUMMARY

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) 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:

142699 ACC: List of Microsoft Access and ADT Localized Versions

Modification Type:MinorLast Reviewed:10/11/2006
Keywords:kbinfo kbProgramming KB109392
©2004 Microsoft Corporation. All rights reserved.