偶数奇数で分岐させたいです (ID:84622)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 dim a as integer なのでIf文でのFix(a)は意味無いのでは。 計算結果の代入時にFixなりIntなりしなと。