欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

GetLocale 函數(shù)

返回當(dāng)前區(qū)域設(shè)置 ID 值。

GetLocale()

說明

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

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

下面舉例說明 GetLocale 函數(shù)的用法。要使用該代碼，請復(fù)制標(biāo)準(zhǔn)HTML 文件中 <BODY&gtl 標(biāo)志之間的所有內(nèi)容。

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 locale
currentLocale = GetLocale

Sub Button1_onclick
  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 Sub

Sub button2_onclick
  Dim original
  original = SetLocale("de")
  myvalue = CCur(GermanNumber.value)
  original = SetLocale("en-gb")
  USNumber.value = FormatCurrency(myvalue)
End Sub

</script> 

請參閱

SetLocale 函數(shù) | 區(qū)域設(shè)置 ID (LCID) 表