CIMLangMap.CurrentLanguage (property)

Gets the current language used to translate key strings

Syntax:

String = object.CurrentLanguage
object.CurrentLanguage = String

Description:

This is the language used by the CIMLangMap.Translate, and by the CIMTranslationGroup.CurrentTranslationValue methods. This property is case insensitive so "Enu" is the same as "ENU".

Example:

Sub CurrentLanguage_Example()

    Dim oLangMap As
CIMLangMapper.CIMLangMap

    Set oLangMap =
CreateObject("CIMLangMapper.CIMLangMap")

    oLangMap.Load
"c:\trans.clm"

oLangMap.CurrentLanguage ="JPN"

    MsgBox "The translation of Hello is:
" & oLangMap.Translate("Hello")

End Sub