RC-WinTrans Object Model Help |
LanguageTool.GetCodePage |
Returns the codepage to the given language code.
Syntax: |
GetCodePage(LanguageCode As String) As Long |
Return: | Long |
Parameters: |
LanguageCode Language code for which to get the code page.
|
Example: | Dim Tool As LanguageTool Dim LangCode As String Dim CodePage As Long Set Tool = Application.Tools.LanguageTool LangCode = "en-us" If (Tool.IsKnownLanguageCode(LangCode)) Then CodePage = Tool.GetCodePage(LangCode) MsgBox Tool.GetPrintableLanguageString(LangCode) & ": " _ & Tool.GetPrintableCodePageString(LangCode) End If |
See also: