SetLocale 関数

SetLocale(lcid)

グローバルなロケール設定を行い、直前のロケール設定値を返します。

引数

lcid
ロケール情報を識別するための 32 ビットの値、または一意の言語コードを指定します。指定可能な値については、ロケール ID の一覧を参照してください。

解説

lcid がゼロ ("0") の場合は、現在のシステムのロケール設定が適用されます。

ロケールには、言語、国/地域、および文化的な慣習に関連するユーザーごとの各種設定が含まれています。キーボード レイアウト、文字の並び順、および日付、時間、数値、通貨の書式は、このロケールによって決定されます。

使用例

次次のコードは SetLocale 関数の使用例です。このコードを使用するには、コード例全体をコピーしてから、標準的な HTML ファイルの <BODY> タグと </BODY> タグの間にコードを貼り付けてください。

英語 (U.K.) の書式で日付を入力してください:
 <input type="text" id="UKDate" size="20"><br>
対応する英語 (U.S.) の日付:
 <input type="text" id="USdate" size="20"><br>
 <input type="button" value="Convert" id="button1"><br>
ドイツ語の書式で、通貨の値を入力してください:
   <input type="text" id="GermanNumber" size="20"><br>
対応する英語 (U.K.) の通貨:
 <input type="text" id="USNumber" size="20"><br>
 <input type="button" value="Convert" id="button2"><br>

<script language="vbscript">
Dim currentLocale
' 現在のロケールを取得します。
currentLocale = GetLocale

Sub Button1_onclick
  Dim original
  original = SetLocale("en-gb")
  mydate = CDate(UKDate.value)
  ' IE では通常、ロケールは英語 (U.S.) に設定されているので、
  ' 変数 currentLocale を使用してロケールを英語 (U.S.) に設定します。
  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> 
              

関連

GetLocale 関数 | ロケール ID (LCID) の一覧

  • 最速攻略VBScriptサンプル大全集

    好評の「最速攻略 VBScript サンプル大全集」の改訂版です。これまでのWindows2000/XPに加え、Windows Vista、最新のWindows 7環境にも対応しています。Windows上での処理の自動化や一括処理(バッチ処理)をテーマとしたVBScriptのサンプルスクリプト集です。付属 CD-ROMには、すぐに使うことができる100以上のサンプルスクリプトを用意しています。

  • VBScriptポケットリファレンス改訂版

    WebでもWindowsでも使えるVBScriptだから手元においてさっと引けるこの一冊!VBScript5.6に対応!待望の改訂版!目的別リファレンスでやりたいことから調べられます。すべての項目にサンプルコード掲載!WSH、ASP、IEすべての環境でお役に立ちます。

  • Excel VBAポケットリファレンス改訂第3版

    好評のExcel VBAポケットリファレンスが改訂第3版としてリニューアルしました。知りたいコマンドがすぐ調べられる機能引きリファレンスはそのままに、最新の Excel 2010に完全対応。もちろん、これまでのExcel 97、2000、2002、2003、2007のすべてのバージョンに対応しています。「こんなときどうするの?」「どう書けばいいの?」という疑問がすぐ解決する、全てのExcel VBAユーザー必携の、最強のリファレンスブックです!

  • Access VBA逆引きハンドブック

    本書はAccess VBAの各機能を、豊富なプログラミング例を使って、初心者にもわかりやすく、かつ網羅的に解説しています。また、やりたいことを目的別に簡単に探せる「逆引き」の構成になっています。

このページの先頭へ