2005と2008は、仕様が少し違う。
おおかた使えますが。
例えば
2005
Function mmm()
mmm="www"
End Function

2008ではエラーになります。

Function mmm() as String
mmm="www"
End Function

実は、ルキオさんの音楽コードも少し手直しが必要でした。
ぼくのが無料版だからかな？
一応、Tryを入れました。
暴走警告がでましたので。
option strict offで音がなりましたが。
とゆう事で、皆さんもプログラムを走らせる時は、要所要所にTRYを入れてね。
安全度が向上します。
ＭｉＤＩファイル演奏は問題なしでした。

では。