30行目のDIMですが、最後に「,」が付いてるのですが。 こういうのは試した事が無いのでこれが原因かどうか分かりませんが、一度消してからもう一度実行させてはいかがでしょう