>すいませんできません（泣

いやできるはずです。
VB2010でプロジェクトを新規に作成し，まるごとコピー貼り付けします。
「Application.StartupPath & "\Test.wav"」の部分を再生したいファイル名に変えます。
これで実行できるはずです。

>この部分にエラーみたいなのが出ます

エラー「みたいなの」ってどんなものが出るのですか？

>全部コード貼りますのでコードを作ってもらえませんか？

ですから，コード全部作ったのですが...
ファイルを開くところだけ，自分で付け足してみてください。

申し訳ありませんが，kaneさんのコードは突っ込みどころが多すぎて指摘しきれません。
VB6のコードのサンプルコードをそのまま使おうとしているのではありませんか？

コードを全部作ってさしあげるのは，さしたる苦労はないのですが，それを改造していくためには
一行一行のコードを理解する必要があります。私が返信したコードを理解せずにコピー貼り付け
しようとしても問題の解決にはなりません。理解できないところがあれば解説いたしますので，
「ここの意味がわからない」とピンポイントで質問していただけるとありがたいです。

推測ですが，すでにButton1をデザインビューで貼り付けた状態で私のコードを貼り付けたのでは
ありませんか？　コードでButton1を作成していますので，「Button1」という名前がダブってしまい
ます。すでにあるButton1か私のコードのButton1の名前を変える必要があると思います。