24行目のIFが判定用のB3でなくBG3という変数名になってますよ〜。 ちなみにこのようなミスがわかりやすくなるようにするには、1行目にOPTION STRICTとつけて以降の変数は必ず初めて使うときは宣言(VARやDIM)をするようにするといいです。 これはある意味、中級者以上だとある程度の長さならほとんどの人がつけてるオプションじゃないかなぁ?って思いますー。 OPTIONをつけると宣言が必須になるぶん、多少面倒に感じますが、経験者ほどこういうスペルミスが痛い(意外と見落としやすくて、見落とすと厄介なバグになる)とわかってるから、使用しているオプションになるんじゃないかなって思いますね。