Visual Basic - abrir un archivo de audio .wav

Life is soft - evento anual de software empresarial
 
Vista:

abrir un archivo de audio .wav

Publicado por Nofu (17 intervenciones) el 18/05/2004 23:20:22
Hola, necesito saber como debo abrir y reproducir un archivo de audio en vb. Si m podeis djar algún código os lo agradeceré.

Gracias por todo

un saludo, Jose Luis
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:abrir un archivo de audio .wav

Publicado por Perico (18 intervenciones) el 19/05/2004 03:26:49
'En un modulo

Declare Function sndPlaySound Lib "winmm.dll"Alias "sndPlaySoundA"_ (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long

Public Const SND_ALIAS = &H10000
Public Const SND_ASYNC = &H1
Public Const SND_LOOP = &H8
Public Const SND_NOWAIT = &H2000
Public Const SND_SYNC = &H0

'En el click de un boton

Private Sub Command1_Click()
Dim ret As Long
ret = sndPlaySound("C:\TuArchivo.wav", SND_SYNC)
End Sub

Un saludo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:abrir un archivo de audio .wav

Publicado por srz (4 intervenciones) el 23/05/2004 12:20:32
Hola, te paso una forma similar a la anterior pero en menos lineas:

(en un modulo)

declare function mciexecute lib "winmm.dll" ( By Val lpstrCommand As String) As Long

(en el formulario)

Private Sub Command1_click()
iresult= mciexecute( "Play C:\carpeta\archivo.wav")
End Sub

Además, si queres, podes poner en la instruccion de otro Commandbutton "Pause" en lugar de "Play" para colocar una pausa o "Stop" para detenerlo.

Tambien reproduce sonidos *.mp3 y *.mid

espero que te sirva de ayuda
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar