VBScriptで下記のようなコードを書きました。
MsgBox 1.5 Mod 1
しかし、表示されるのは 0 です。
本来なら、0.5 とならないといけないですが。。。
Mod 演算子を見たら驚愕の事実が。。
結果が浮動小数点数の時は整数に丸められるようですorz
整数かどうか判断するのに使いたかったのですが、ダメですね。
どうやらVB6でも同様のようです。
結局下記のように値を増やして対応するしかないですかね。。
MsgBox 1.5*1000 Mod 1000
これでも、小数第四位より深い桁以降は判定できなくなりますが。。。