変数としてBGを指定していますが、配列変数(1行目のDIM)でも同じBGを指定していますのでエラーとなります。 2行目のBGを違う変数にしてみてはどうでしょう。