这里列出的是 @OSLang 可能获得的返回值(字符串)
此表的数据从此页面获得: Windows 2000 - List of Locale IDs and Language Groups
注意: 代码中如有字母则这些字母可能是大写的.
| 代码 | 意义(语言) |
|---|---|
| 0436 | 南非荷兰语 |
| 041c | 阿尔巴尼亚语 |
| 0401 | 阿拉伯语(沙特阿拉伯) |
| 0801 | 阿拉伯语(伊拉克) |
| 0c01 | 阿拉伯语(埃及) |
| 1001 | 阿拉伯语(利比亚) |
| 1401 | 阿拉伯语(阿尔及利亚) |
| 1801 | 阿拉伯语(摩洛哥) |
| 1c01 | 阿拉伯语(突尼斯) |
| 2001 | 阿拉伯语(阿曼) |
| 2401 | 阿拉伯语(也门) |
| 2801 | 阿拉伯语(叙利亚) |
| 2c01 | 阿拉伯语(约旦) |
| 3001 | 阿拉伯语(黎巴嫩) |
| 3401 | 阿拉伯语(科威特) |
| 3801 | 阿拉伯语(阿拉伯联合酋长国) |
| 3c01 | 阿拉伯语(巴林) |
| 4001 | 阿拉伯语(卡塔尔) |
| 042b | 亚美尼亚语 |
| 042c | 阿泽里语(拉丁) |
| 082c | 阿泽里语(斯拉夫) |
| 042d | 巴斯克语 |
| 0423 | 白俄罗斯 |
| 0402 | 保加利亚语 |
| 0403 | 加泰罗尼亚语 |
| 0404 | 中文(台湾) |
| 0804 | 中文(中国) |
| 0c04 | 中文(香港特别行政区) |
| 1004 | 中文(新加坡) |
| 1404 | 中文(澳门特别行政区) |
| 041a | 克罗地亚人语 |
| 0405 | 捷克语 |
| 0406 | 丹麦语 |
| 0413 | 荷兰语(标准) |
| 0813 | 荷兰语(比利时) |
| 0409 | 英语(美国) |
| 0809 | 英语(英国) |
| 0c09 | 英语(澳大利亚) |
| 1009 | 英语(加拿大) |
| 1409 | 英语(新西兰) |
| 1809 | 英语(爱尔兰) |
| 1c09 | 英语(南非) |
| 2009 | 英语(牙买加) |
| 2409 | 英语(加勒比) |
| 2809 | 英语(伯利兹) |
| 2c09 | 英语(特立尼达) |
| 3009 | 英语(津巴布韦) |
| 3409 | 英语(菲律宾) |
| 0425 | 爱沙尼亚语 |
| 0438 | 法罗语 |
| 0429 | 波斯语 |
| 040b | 芬兰语 |
| 040c | 法语(标准) |
| 080c | 法语(比利时) |
| 0c0c | 法语(加拿大) |
| 100c | 法语(瑞士) |
| 140c | 法语(卢森堡) |
| 180c | 法语(摩纳哥) |
| 0437 | 格鲁吉亚语 |
| 0407 | 德语(标准) |
| 0807 | 德语(瑞士) |
| 0c07 | 德语(奥地利) |
| 1007 | 德语(卢森堡) |
| 1407 | 德语(列支敦士登) |
| 408 | 希腊语 |
| 040d | 希伯来语 |
| 0439 | 印第语 |
| 040e | 匈牙利语 |
| 040f | 冰岛语 |
| 0421 | 印度尼西亚语 |
| 0410 | 意大利语(标准) |
| 0810 | 意大利语(瑞士) |
| 0411 | 日语 |
| 043f | 哈撒克语 |
| 0457 | 刚卡尼语 |
| 0412 | 朝鲜语/韩语 |
| 0426 | 拉脱维亚语 |
| 0427 | 立陶宛语 |
| 042f | 马其顿语 |
| 043e | 马来语(马来西亚) |
| 083e | 马来人(文莱达鲁萨兰) |
| 044e | 马拉地语 |
| 0414 | 挪威语(伯克梅尔) |
| 0814 | 挪威语(尼诺斯克) |
| 0415 | 波兰语 |
| 0416 | 葡萄牙语(巴西) |
| 0816 | 葡萄牙语(标准) |
| 0418 | 罗马尼亚语 |
| 0419 | 俄语 |
| 044f | 梵语 |
| 081a | 塞尔维亚语(拉丁) |
| 0c1a | 塞尔维亚语(西里尔文) |
| 041b | 斯洛伐克语 |
| 0424 | 斯洛文尼亚语 |
| 040a | 西班牙语(传统) |
| 080a | 西班牙语(墨西哥) |
| 0c0a | 西班牙语(国际) |
| 100a | 西班牙语(危地马拉) |
| 140a | 西班牙语(哥斯达黎加) |
| 180a | 西班牙语(巴拿马) |
| 1c0a | 西班牙语(多米尼加共和国) |
| 200a | 西班牙语(委内瑞拉) |
| 240a | 西班牙语(哥伦比亚) |
| 280a | 西班牙语(秘鲁) |
| 2c0a | 西班牙语(阿根廷) |
| 300a | 西班牙语(厄瓜多尔) |
| 340a | 西班牙语(智利) |
| 380a | 西班牙语(乌拉圭) |
| 3c0a | 西班牙语(巴拉圭) |
| 400a | 西班牙语(玻利维亚) |
| 440a | 西班牙语(萨尔瓦多) |
| 480a | 西班牙语(洪都拉斯) |
| 4c0a | 西班牙语(尼加拉瓜) |
| 500a | 西班牙语(波多黎各) |
| 0441 | 斯瓦西里语 |
| 041d | 瑞典语 |
| 081d | 瑞典语(芬兰) |
| 0449 | 泰米尔语 |
| 0444 | 塔塔尔语 |
| 041e | 泰语 |
| 041f | 土耳其语 |
| 0422 | 乌克兰语 |
| 0420 | 乌尔都语 |
| 0443 | 乌兹别克语(拉丁文) |
| 0843 | 乌兹别克语(西里尔文) |
| 042a | 越南语 |
MsgBox(0, "您的系统语言代码:", _Language())
Func _Language()
Select
Case StringInStr("0413 0813", @OSLang)
Return "Dutch"
Case StringInStr("0409 0809 0c09 1009 1409 1809 1c09 2009 2409 2809 2c09 3009 3409", @OSLang)
Return "English"
Case StringInStr("040c 080c 0c0c 100c 140c 180c", @OSLang)
Return "French"
Case StringInStr("0407 0807 0c07 1007 1407", @OSLang)
Return "German"
Case StringInStr("0410 0810", @OSLang)
Return "Italian"
Case StringInStr("0414 0814", @OSLang)
Return "Norwegian"
Case StringInStr("0415", @OSLang)
Return "Polish"
Case StringInStr("0416 0816", @OSLang)
Return "Portuguese"
Case StringInStr("040a 080a 0c0a 100a 140a 180a 1c0a 200a 240a 280a 2c0a 300a 340a 380a 3c0a 400a 440a 480a
4c0a 500a", @OSLang)
Return "Spanish"
Case StringInStr("041d 081d", @OSLang)
Return "Swedish"
Case Else
Return "Other (can't determine with @OSLang directly)"
EndSelect
EndFunc ;==>_Language