sonido

En VBA puedes usar el siguiente código para ejecutar un WAV:


Private Declare Function EjecutarSonido Lib "winmm.dll" Alias
"sndPlaySoundA" (ByVal sWavFilePath As String, ByVal lngEspera As Long) As
Long

Sub PlayWavFile()
Dim sFilePath As String

sFilePath = "C:\WINDOWS\Media\chimes.wav"
Call EjecutarSonido(sFilePath, 0)

End Sub


Saludos,

Marco Escobar.


"web" wrote in message
news:

como inserto un archivo .wav en un ejecutable de VB y que se ejecute solo?

gracias.

gracias , pero yo quiero incluir el archivo de sonido dentro del .exe. como
hago?


"Marco Escobar" escribió en el mensaje
news:
En VBA puedes usar el siguiente código para ejecutar un WAV:


Private Declare Function EjecutarSonido Lib "winmm.dll" Alias
"sndPlaySoundA" (ByVal sWavFilePath As String, ByVal lngEspera As Long) As
Long

Sub PlayWavFile()
Dim sFilePath As String

sFilePath = "C:\WINDOWS\Media\chimes.wav"
Call EjecutarSonido(sFilePath, 0)

End Sub


Saludos,

Marco Escobar.


"web" wrote in message
news:

como inserto un archivo .wav en un ejecutable de VB y que se ejecute solo?

gracias.

Tenes muchas formas una es en un archivo de recurso, fijate el ejemplo que
viene con vb que es un atm, o cualquier otro ejemplo en google.

saludos

escreveu na mensagem
news:

gracias , pero yo quiero incluir el archivo de sonido dentro del .exe.

como

hago?


"Marco Escobar" escribió en el mensaje
news:
En VBA puedes usar el siguiente código para ejecutar un WAV:


Private Declare Function EjecutarSonido Lib "winmm.dll" Alias
"sndPlaySoundA" (ByVal sWavFilePath As String, ByVal lngEspera As Long) As
Long

Sub PlayWavFile()
Dim sFilePath As String

sFilePath = "C:\WINDOWS\Media\chimes.wav"
Call EjecutarSonido(sFilePath, 0)

End Sub


Saludos,

Marco Escobar.


"web" wrote in message
news:
> como inserto un archivo .wav en un ejecutable de VB y que se ejecute

solo?

>
> gracias.
>
>