Visual Basic - SONIDO EN VISUAL BASIC

Life is soft - evento anual de software empresarial
 
Vista:

SONIDO EN VISUAL BASIC

Publicado por belen (3 intervenciones) el 15/05/2006 21:50:52
Hola!necesito que me ayuda, hice un juego en visual y kiero agregarle sonidos, pero no se como se hace, por ej si kiero hacer q un boton haga un determinado sonido cada vez q se lo ejecuta.. si alguien puedo ayudareme, desde ya muchas gracias por su atencion.

salu2.
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:SONIDO EN VISUAL BASIC

Publicado por Rodrigo (83 intervenciones) el 15/05/2006 23:47:58
Agrega un ocx que ejecute archivos wav y lo mandas a ejecutar cuando necesites emitir el sonido.
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:SONIDO EN VISUAL BASIC

Publicado por jose carlos (340 intervenciones) el 16/05/2006 12:20:52
agrega este control

MICROSOFT MULTIMEDIA CONTROL 5.0, es el archivo MCI32.OCX

y añade estas líneas, generales:

Control.Notify = True
Control.Wait = True
Control.Shareable = False
Control.DeviceType = "WaveAudio"
Control.filename = "c:\musica" + "\mus00.wav"
(aqui va el camino y el nombre del archivo de sonido)

para cargarlo y ejecutarlo

Control.Command = "open"
Control.Command = "play"

para pararlo

Control.Command = "pause"

para cerrarlo

Control.Command = "close"
a partir de aquí hay que volver a cargarlo para que se escuche

espero haberte ayudado

saludos
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:SONIDO EN VISUAL BASIC

Publicado por Jose Luis C. M. (4 intervenciones) el 16/05/2006 17:42:38
Como ya te explicaron, puedes ejecutar archivos de sonido del tipo WAV.
Y para ello no es necesario que cargues ningún componente o control especial
sino que puedes utlizar una de las APIs de Windows, para crear una función que
ejecute o reproduzca un archivo WAV:

Private Declare Function sndPlaySound Lib "winmm.dll" Alias _
"sndPlaySoundA" (ByVal lpszSoundName As String, _
ByVal uFlags As Long) As Long
Const SND_ASYNC = &H1
Const SND_NODEFAULT = &H2

Private Sub Command1_Click() ' En el botón o evento que necesites aplicarlo
' Desde luego, aquí puedes especificar el archivo WAV que quieras.
sndPlaySound "c:\archivos de programa\messenger\online.wav", _
SND_ASYNC Or SND_NODEFAULT
end sub
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