playing music

Wave?
Asynchronously?

For NET 2.0:
VB.NET:
[SIZE=2][COLOR=#0000ff]Private [/COLOR][/SIZE][SIZE=2][COLOR=#0000ff]Sub[/COLOR][/SIZE][SIZE=2] playSweetMusic()
[/SIZE][SIZE=2][COLOR=#0000ff]    Dim[/COLOR][/SIZE][SIZE=2] player [/SIZE][SIZE=2][COLOR=#0000ff]As [/COLOR][/SIZE][SIZE=2][COLOR=#0000ff]New[/COLOR][/SIZE][SIZE=2] Media.SoundPlayer([/SIZE][SIZE=2][COLOR=#800000]"sweetmusic.wav"[/COLOR][/SIZE][SIZE=2])
    player.Play()
[/SIZE][SIZE=2][COLOR=#0000ff]End [/COLOR][/SIZE][SIZE=2][COLOR=#0000ff]Sub
[/COLOR][/SIZE]

For .NET 1.1 use PInvoke:
VB.NET:
[COLOR=black][FONT=Courier New]<DllImport([COLOR=maroon]"winmm.dll"[/COLOR], CharSet:=CharSet.Auto)> _
[COLOR=blue]Private[/COLOR] [COLOR=blue]Shared[/COLOR] [COLOR=blue]Function[/COLOR] PlaySound(<MarshalAs(UnmanagedType.LPWStr)> _
[COLOR=blue]ByVal[/COLOR] soundName [COLOR=blue]As[/COLOR] [COLOR=blue]String[/COLOR], [COLOR=blue]ByVal[/COLOR] hmod [COLOR=blue]As[/COLOR] IntPtr, [COLOR=blue]ByVal[/COLOR] soundFlags [COLOR=blue]As[/COLOR] [COLOR=blue]Integer[/COLOR]) [COLOR=blue]As[/COLOR] [COLOR=blue]Boolean[/COLOR]
[COLOR=blue]End[/COLOR] [COLOR=blue]Function[/COLOR]
 
[COLOR=blue]Private[/COLOR] [COLOR=blue]Sub[/COLOR] playSweetMusicNative()
    PlaySound([COLOR=maroon]"sweetmusic.wav"[/COLOR], IntPtr.Zero, 1)
[COLOR=blue]End[/COLOR] [COLOR=blue]Sub[/COLOR]
[/FONT][/COLOR]
 
Back
Top