VBS中的SetLocale函数到底有什么用？

2012年11月30日

VBS文档中对SetLocale函数的描述：

设置全球区域设置，并返回以前的区域设置。
一个 locale 是用户参考信息集合，与用户的语言、国家/地区和文化传统有关。该 locale 决定键盘布局、字母排序顺序和日期、时间、数字与货币格式。
简单的说，就是VBS中的一些函数的返回值与当前的locale相关，比如说MonthName函数：

 
Dim a(12), b(12) 
'By Demon 
SetLocale "zh-cn" 
For i = 1 To 12 
a(i) = MonthName(i) 
Next 

SetLocale "en-us" 
For i = 1 To 12 
b(i) = MonthName(i) 
Next 

For i = 1 To 12 
WScript.Echo a(i), b(i) 
Next

再比如日期和时间的格式：

 
'By Demon 
SetLocale "zh-cn" 
WScript.Echo CStr(Now) 

SetLocale "en-us" 
WScript.Echo CStr(Now) 

SetLocale "de-de" 
WScript.Echo CStr(Now)

当然还有其他的函数，我没时间去整理，欢迎留言补充。

作者: Demon
链接: http://demon.tw/programming/vbs-setlocale-function.html