Visual basic 2005 sound midi mp3 or wav files?

Question

How would I incorporate sound into a program? For instance a starting form then within the body of the program? Would I need to use a timer or is a midi file usable as it is? 

Answer 1

Hallo

bin gerade selbst auf der Suche, hab dabei diese Seite gefunden:

 http://msdn.microsoft.com/de-de/library/bb978298.aspx


Mal sehen, ob ich die Beispiele (auf den Nachbarseiten) anwenden kann.

Gruß
Bingo_hb

Answer 2

Hi ALL,

Here is a rough translation of the above using  http://www.freetranslation.com/ >>>>

___________________________________________________

Hello Am just even on the search, found at the same time this side: http://msdn.microsoft.com/de-de/library/bb978298.aspx

See time whether I can use the examples (on the neighbor sides). Greeting Bingo_hb

___________________________________________________

Regards,

John

Answer 3

Hi Microsoft staff,

Can we have this article in ENGLISH please?

I've tried.>>

http://msdn.microsoft.com/en-us/library/bb978298.aspx

and

http://msdn.microsoft.com/en-gb/library/bb978298.aspx

and

http://msdn.microsoft.com/en-au/library/bb978298.aspx

Regards,

John

Answer 4

Hi,

This is how to play WAVE *.wav files.

Choose between;

My.Computer.Audio.Play(ofd.FileName, AudioPlayMode.Background)

or

My.Computer.Audio.Play(ofd.FileName, AudioPlayMode.BackgroundLoop)

or

My.Computer.Audio.Play(ofd.FileName, AudioPlayMode.WaitToComplete)

This works with Windows XP. :-) ;-)

I'm not sure if VISTA still has a media folder containing WAVE files.

Add 1 button to a FORM to try this code please.

ofd.FileName here is the full path and filename returned from the OpenFileDialog.

Option Strict On

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim ofd As New OpenFileDialog

ofd.InitialDirectory = "C:\Windows\media"

ofd.Filter = "Wave files only|*.wav"

Try

ofd.ShowDialog()

My.Computer.Audio.Play(ofd.FileName, AudioPlayMode.Background)

Catch ex As Exception

MessageBox.Show(ex.ToString)

End Try

End Sub

End Class

Regards,

John

Answer 5

danke shein

I only know how to spaek a few words in German.  Thankyou for your help but I wasn't able to view the library yet.  Thanks anyway I appreciate all the help I can get!!!


~turkey~

Answer 6

Thankyou John I appreciate your help.  I'm really interested in midi files right now.  I will look at the url you gave but it has to be in English!!! Thankyou so much for your help.


~turkey~