VBS CSng(Expression)

＜記述形式＞

Variant(Single) = CSng(Expression)  

＜説明＞
単精度浮動小数点型(Single)へ変換します。
少数桁の計算を行う場合は色々な問題（桁落ち、情報落ち、丸め誤差など）を考慮しなければいけません。Csngは極端に小さな小数点を計算する場合に使用します。 

＜ソース＞
ec Clng(1 - 0.000001)
'[2008/11/02 22:03:42]1
ec CSng(1 - 0.000001)
'[2008/11/02 22:03:42]0.999999

'メッセージ表示用
Sub ec(msg)
    Wscript.Echo "[" & Date & " " & time & "]" & msg
End Sub