Gets the CIMLanguage at the specified index. | |
Syntax: | Set object = object.Item ( Index ) |
Parameters: |
Index As
VARIANT* -
|
Description: | Gets the CIMLanguage at the specified index. Example: Sub LanguagesIndex_Example() Dim oLangMap As
CIMLangMapper.CIMLangMap Dim oLangs As
CIMLangMapper.CIMLanguages Dim oLang As
CIMLangMapper.CIMLanguage Dim Index As Long Set oLangMap =
CreateObject("CIMLangMapper.CIMLangMap") oLangMap.Load
"c:\trans.clm" Set oLangs =
oLangMap.Languages For Index = 0 to oLangs.Count -
1 Set oLang =
oLangs.Item(Index) MsgBox
oLang.Name Next Index End Sub |