Tema: Sonidos
Ver Mensaje Individual
  #4 (permalink)  
Antiguo 27/06/2010, 09:30
Avatar de pkj
pkj
 
Fecha de Ingreso: julio-2006
Ubicación: Órbita sincrónica
Mensajes: 899
Antigüedad: 17 años, 9 meses
Puntos: 29
Respuesta: Sonidos

Esa dll se supone que está en tu carpeta windows\system32 y creo que viene por defecto.

Solo pega el código.

Esto es un ejemplo. Un form con un commandbutton y este código:

Código vb:
Ver original
  1. Option Explicit
  2.  
  3. Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
  4.  
  5. Const SND_ASYNC = &H1
  6. Const SND_NODEFAULT = &H2
  7.  
  8. Private Sub PlayFile(ByVal FileName As String)
  9.   sndPlaySound FileName, SND_ASYNC Or SND_NODEFAULT
  10. End Sub
  11.  
  12. Private Sub Command1_Click()
  13.   PlayFile "c:\fichero.wav"
  14. End Sub

Comenta tus dudas.
__________________
No hay preguntas tontas, solo gente estup..., ¡No!, ¿como era? No hay gente que pregunte a tontos... ¡Nooo!... ¡Vaya cabeza!