るきおさん，フォローありがとうございます。
おそらくkaneさんは，「やりたいことはわかっているが，どうやるかは全然わからない」状態なのだと
思います。そのため，いろいろなWebページからコピー・貼り付けでコードを書こうとしているので
しょう。（VB6らしきコードが混じっていることや，明らかに不要な変数などが見られることからの推測
ですが...）
わたしも子どものころ，BASICマガジンのコードを意味もよくわからず入力していましたが，そんな段階
なのだと思います。

>すいません音楽ファイルを開くことが出来なくなりました

と，いうことは「再生はできた」ということだと思います。わたしがkaneさんのコードから勝手にファイルを
開くダイアログからファイル名を取得する部分を削除したのものですから困っているのでしょう。
コードの意味を理解していれば追加するのは容易だと思いますが，それが難しいのでしょう。
ですから，コピー・貼り付けで動作する例を提示することにします。