CIMTranslations.RemoveTranslation (method)

Removes the CIMTranslation with the provided language.

Syntax:

object.RemoveTranslation Language

Parameters:

Language As String -

Description:

Removes the CIMTranslation with the provided language.

Example:

Sub RemoveTranslation_Example()

    Dim oLangMap As
CIMLangMapper.CIMLangMap

    Dim oTranslationGroup As
CIMLangMapper.CIMTranslationGroup

    Dim oTranslations As
CIMLangMapper.CIMTranslations

    Dim oTranslation As
CIMLangMapper.CIMTranslation

    Dim oLanguage As
CIMLangMapper.CIMLanguage

    Set oLangMap =
CreateObject("CIMLangMapper.CIMLangMap")

    oLangMap.Load
"c:\trans.clm"

    Set oLanguage =
oLangMap.AddLanguage("SPA", 1034)

    Set oTranslationGroup =
oLangMap.LookupTranslationGroup("Hello")

    if Not oTranslationGroup Is Nothing
Then

      Set oTranslations =
oTranslationGroup.Translations

      Set oTranslation =
oTranslations.AddTranslation("Hola", "SPA")

      oTranslations.RemoveTranslation
"SPA"

End If
End Sub