Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ''' Plays WAV files in background
- ''' Start a new Console Application
- Module Module1
- Sub Main()
- Dim CommandLineArgs As System.Collections.ObjectModel.ReadOnlyCollection(Of String) = My.Application.CommandLineArgs
- For Each sound As String In CommandLineArgs
- On Error Resume Next
- My.Computer.Audio.Play(sound, AudioPlayMode.WaitToComplete)
- Next
- End Sub
- End Module
- ''' NOTE: to make the application not display an interface go to PROJECT>X Properties(all the way at bottom)>Application>Application Type. Change it to Windows Forms Application, then build the project.
Advertisement
Add Comment
Please, Sign In to add comment