CIMTranslationGroup.CurrentTranslationValue (read-only property)

Gets the translation value that corresponds to the CIMLanguage assigned to CIMLangMap.CurrentLanguage.

Syntax:

String = object.CurrentTranslationValue

Description:

Gets the CIMTranslation.Value that corresponds to the CIMLanguage assigned to CIMLangMap.CurrentLanguage.

Example:

Sub CurrentTranslationValue_Example()

    Dim oLangMap As
CIMLangMapper.CIMLangMap

    Dim oLang As
CIMLangMapper.CIMLanguage

    Dim oTranslationGroup As
CIMLangMapper.CIMTranslationGroup

    Set oLangMap =
CreateObject("CIMLangMapper.CIMLangMap")

    oLangMap.Load
"c:\trans.clm"

    Set oTranslationGroup =
oLangMap.LookupTranslationGroup("Wheel bearing")

oLangMap.CurrentLanguage ="JPN"

    if Not oTranslationGroup Is Nothing
Then

      MsgBox
oTranslationGroup.CurrentTranslationValue

End If
End Sub