>>453
何のExceptionが出たの？
うちでは、451,452の定義で動いてるけど。
他の関数の宣言はLongをIntegerに変えただけ。
コンパイルオプションはなし。(vbc MP3.vb)
属性を使ってるので、ファイルの先頭には以下の行をつけてね。
Imports System.Runtime.Interopservices

'実際のmp3演奏の処理
Public Shared Sub Main()
  Dim ii As InputInfo

  vbmp3_init()
  vbmp3_open("mp3のパス", ii)
  vbmp3_play()
  Console.ReadLine() ' 入力待ちにしてフローと止めて、演奏を鑑賞
  vbmp3_stop()
  vbmp3_close()
  vbmp3_free()
End Sub