数値から小数点を除いた数値(Int型)に変換します
ec Fix(-0.1)
'[2008/10/09 11:11:56]0
ec Fix(-0.5)
'[2008/10/09 11:11:56]0
ec Fix(-0.6)
'[2008/10/09 11:11:56]0
ec Fix(0)
'[2008/10/09 11:11:56]0
ec Fix(0.1)
'[2008/10/09 11:11:56]0
ec Fix(0.5)
'[2008/10/09 11:11:56]0
ec Fix(0.6)
'[2008/10/09 11:11:56]0
ec Fix(1)
'[2008/10/09 11:11:56]1
'メッセージ表示用
Sub ec(strmsg)
Wscript.Echo "[" & Date & " " & time & "]" & strmsg
end Sub
