数値から小数点を除いた数値(Long型)に変換します
※Long型の有効範囲は-2147483648 ～ 2147483647までです
ec Clng(-0.1)
'[2008/10/09 11:14:41]0
ec Clng(-0.5)
'[2008/10/09 11:14:41]0
ec Clng(-0.6)
'[2008/10/09 11:14:41]-1
ec Clng(0)
'[2008/10/09 11:14:41]0
ec Clng(0.1)
'[2008/10/09 11:14:41]0
ec Clng(0.5)
'[2008/10/09 11:14:41]0
ec Clng(0.6)
'[2008/10/09 11:14:41]1
ec Clng(1.1)
'[2008/10/09 11:14:41]1
ec Clng(-2147483649)
'[2008/10/09 11:14:41]Microsoft VBScript 実行時エラー: オーバーフローしました。: 'Clng'
ec Clng(2147483648)
'[2008/10/09 11:14:41]Microsoft VBScript 実行時エラー: オーバーフローしました。: 'Clng'
'メッセージ表示用
Sub ec(strmsg)
Wscript.Echo "[" & Date & " " & time & "]" & strmsg
end Sub
