負の場合どうなるのかな? (C言語の % だと処理系定義です) basic は伝統的に a mod b = a - a div b * b だったような気がします。