如何在VBS中使用GetLocale 函數

如何在VBS中使用GetLocale 函數？針對這個問題，這篇文章詳細介紹了相對應的分析和解答，希望可以幫助更多想解決這個問題的小伙伴找到更簡單易行的方法。

GetLocale 函數

返回當前區域設置 ID 值。

GetLocale()

說明

locale 是用戶參考信息集合，與用戶的語言、國家和文化傳統有關。locale 決定鍵盤布局、字母排序順序和日期、時間、數字與貨幣格式。

返回值可以是任意一個 32-位 的值，如 區域設置 ID所示：

下面舉例說明 GetLocale 函數的用法。要使用該代碼，請復制標準HTML 文件中 <BODY&gtl 標志之間的所有內容。

Enter Date in UK format: <input type="text" id="UKDate" size="20"><p>Here's the US equivalent: <input type="text" id="USdate" size="20"><p><input type="button" value="Convert" id="button1"><p>Enter a price in German: &nbsp; <input type="text" id="GermanNumber" size="20"><p>Here's the UK equivalent: <input type="text" id="USNumber" size="20"><p><input type="button" value="Convert" id="button2"><p><script language="vbscript">Dim currentLocale' Get the current localecurrentLocale = GetLocaleSub Button1_&#111nclick  Dim original  original = SetLocale("en-gb")  mydate = CDate(UKDate.value)  ' IE always sets the locale to US English so use the  ' currentLocale variable to set the locale to US English  original = SetLocale(currentLocale)  USDate.value = FormatDateTime(mydate,vbShortDate)End SubSub button2_&#111nclick  Dim original  original = SetLocale("de")  myvalue = CCur(GermanNumber.value)  original = SetLocale("en-gb")  USNumber.value = FormatCurrency(myvalue)End Sub</script>

關于如何在VBS中使用GetLocale 函數問題的解答就分享到這里了，希望以上內容可以對大家有一定的幫助，如果你還有很多疑惑沒有解開，可以關注億速云行業資訊頻道了解更多相關知識。