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

写了这么多VBS，从来都没有使用过SetLocale函数，似乎也没有见过谁的代码使用过，这个SetLocale函数到底有什么用呢？

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

设置全球区域设置，并返回以前的区域设置。

一个 locale 是用户参考信息集合，与用户的语言、国家/地区和文化传统有关。该 locale 决定键盘布局、字母排序顺序和日期、时间、数字与货币格式。

简单的说，就是VBS中的一些函数的返回值与当前的locale相关，比如说MonthName函数：

Dim a(12), b(12)

'By Demon
'https://demon.tw

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
'https://demon.tw

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

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

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

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

随机文章:

1. VBS转EXE工具：Vbs2Exe
2. 使用Windows Script Encoder加密VBS
3. VBS普通青年 vs 文艺青年 vs 2B青年
4. 利用WMI打造完美“三无”后门-消灭一切假网卡
5. VBScript实现ZIP文件的压缩或解压(ZipCompressor)

这篇文章发布于 2013年04月19日，星期五，23:39，归类于 程序设计。 您可以跟踪这篇文章的评论通过 RSS 2.0 feed。 您可以留下评论，或者从您的站点trackback。