＜記述形式＞
Variant(Currency) = CCur(Expression)
＜説明＞
通貨型(Currency)へ変換します。
通貨型はシステムのロケールの設定に従い、その国で使われている小数点記号や桁区切り記号が正しく処理されます。つまり日本語では円記号を対象としています。
＜ソース＞
ec CCur(1000.000)
'[2008/11/02 19:48:02]1000
ec CCur(1000.490)
'[2008/11/02 19:48:02]1000.49
ec CCur(1000.500)
'[2008/11/02 19:48:02]1000.5
ec CCur(1000.501)
'[2008/11/02 19:48:02]1000.501
ec CCur("\1000.00")
'[2008/11/02 19:48:02]1000
'メッセージ表示用
Sub ec(msg)
Wscript.Echo "[" & Date & " " & time & "]" & msg
End Sub
