虚位以待(AD)
虚位以待(AD)
首页 > 脚本专栏 > vbs > VBS中的SetLocale函数到底有什么用?

VBS中的SetLocale函数到底有什么用?
类别:vbs   作者:码皇   来源:互联网   点击:

写了这么多VBS,从来都没有使用过SetLocale函数,似乎也没有见过谁的代码使用过,这个SetLocale函数到底有什么用呢
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
相关热词搜索: VBS SetLocale