可 以 有 很 多 辦 法 來 確 定 Win 95的 語 種 ， 采 用 何 種 方 法 要 看 你 的 目 的 。 如 果 你 想 知 道 貨 幣 、 時 間 格 式 等 語 種 信 息 ， 可 以 訪 問 WIN.INI的 [Intl]節 ， 其 中 iCountry表 示 國 家 代 碼 ， sCountry表 示 國 家 名 稱 。 如 果 你 想 獲 得 當 前 Win 95的 語 言 版 本 ， 可 以 使 用 Win32 API的 GetOEMCP函 數 獲 得 當 前 系 統 的 國 家 代 碼 。 也 可 以 使 用 Windows API函 數 GetSystemDefaultLCID()。 
    LCID這 里 稱 之 為 “ 地 方 ” ， 是 個 32位 的 位 的 值 ， 用 于 為 現 成 或 系 統 標 識 語 言 和 平 臺 。 其 中 0～ 15位 指 出 語 言 。 0～ 15位 又 分 為 兩 個 部 分 。 其 中 0～ 9標 識 主 語 言 。 10～ 15標 識 語 言 的 一 個 子 集 。 所 以 我 們 的 思 路 是 先 得 出 系 統 的 地 方 值 ， 然 后 取 出 第 10位 值 即 可 。 
    '語 言 常 數 
    Public Const LANG_CHINESE& = &H4 
    Public Const LANG_BULGARIAN& = &H2 
    Public Const LANG_CROATIAN& = &H1A 
    Public Const LANG_CZECH& = &H5 
    Public Const LANG_DANISH& = &H6 
    Public Const LANG_DUTCH& = &H13 
    Public Const LANG_ENGLISH& = &H9 
    Public Const LANG_FINNISH& = &HB 
    Public Const LANG_FRENCH& = &HC 
    Public Const LANG_GERMAN& = &H7 
    Public Const LANG_GREEK& = &H8 
    Public Const LANG_HUNGARIAN& = &HE 
    Public Const LANG_ICELANDIC& = &HF 
    Public Const LANG_ITALIAN& = &H10 
    Public Const LANG_JAPANESE& = &H11 
    Public Const LANG_KOREAN& = &H12 
    Public Const LANG_NEUTRAL& = &H0 
    Public Const LANG_NORWEGIAN& = &H14 
    Public Const LANG_POLISH& = &H15 
    Public Const LANG_PORTUGUESE& = &H16 
    Public Const LANG_ROMANIAN& = &H18 
    Public Const LANG_RUSSIAN& = &H19 
    Public Const LANG_SLOVAK& = &H1B 
    Public Const LANG_SLOVENIAN& = &H24 
    Public Const LANG_SPANISH& = &HA 
    Public Const LANG_SWEDISH& = &H1D 
    Public Const LANG_TURKISH& = &H1F 
    '函 數 聲 明 
    Public Declare Function GetSystemDefaultLCID Lib "kernel32" () As Long 
     
    '例 子 代 碼 
     Dim lngLCID As Long 
     Dim lngLangID As Long 
     
     lngLCID = GetSystemDefaultLCID 
     '取 低 10位 
     lngLangID = (lngLCID And (Not &HFC00)) 
     
     Select Case lngLangID 
     Case LANG_CHINESE 
     MsgBox "您 使 用 的 是 中 文 Windows", vbInformation, "信 息 " 
     case LANG_ENGLISH 
     MsgBox "您 使 用 的 英 文 Windows",vbInformation,"信 息 " 
     End Select 
    但 要 注 意 ： 如 果 你 的 程 序 依 賴 于 某 個 特 定 的 DLL， 它 支 持 的 語 種 可 能 與 當 前 系 統 的 語 種 不 同 ， 因 為 某 些 軟 件 (特 別 是 微 軟 的 軟 件 )可 能 會 安 裝 一 些 版 本 比 較 新 的 DLL到 用 戶 的 系 統 中 ， 通 常 這 些 DLL是 英 文 版 的 ， 而 用 戶 使 用 的 系 統 可 能 是 中 文 版 的 ， 所 以 檢 測 某 個 DLL的 語 言 版 本 可 以 使 用 WIndows API的 GetFileVersionInfo函 數 。 如 果 你 只 是 想 知 道 Win 95是 否 支 持 雙 字 節 ， 可 以 使 用 WIndows API的 GetSystemMetrics(SM_DBCSENABLED)。 
<END>