OPTION STRICT DIMとVAR メインプログラム DEF サブルーチン