これでどうでしょうか？

このサンプルを実行するには以下の２つに参照設定します。(WPFなら初めから参照設定されているので何もする必要はありません。)
・PresentationCore
・WindowsBase

Dim player As New Windows.Media.MediaPlayer



player.Volume = 0.1

player.Open(New Uri("C:\vb\test.mp3"))

player.Play()

Volumeプロパティは0～1です。既定値は0.5です。

http://msdn.microsoft.com/ja-jp/library/system.windows.media.mediaplayer.volume(v=vs.90).aspx