Visual Basic - Hacer sonar un archivo de sonido desde un boton
Códigos Visual Basic
Las siguientes consiguen que un archivo de sonido en formato wav se ejecute y suene a partir de un boton.
Tutores.org
Mostrando Codigo - Visual Basic
EXPLICACION
Debemos crear un modulo donde ingresaremos la siguiente linea
Declare Function mciExecute Lib "winmm.dll" (ByVal lpstrCommand As String) As Long
Posterior mente en el formulario ingresaremos el codigo siguiente, el cual ejecutaremos desde un boton llamado
command1
ademas de modificar el path o ruta hacia el archivo de sonido c: u_archivo.wav
CODIGO
// Codigo ofrecido por Tutores.org
- Private Sub Command1_Click()
- iResult = mciExecute("Play c: u_archivo.wav")
- End Sub
ENLACE AL CODIGO
Si quieres enlazar desde tu pagina a este codigo<!-- Inicio enlace Tutores.org -->
<a title="Tutores.org - Hacer sonar un archivo de sonido desde un boton" href="http://www.tutores.org/codigo/1413/" target="_blank">Hacer sonar un archivo de sonido desde un boton</a>
<!-- Final enlace Tutores.org -->
<a title="Tutores.org - Hacer sonar un archivo de sonido desde un boton" href="http://www.tutores.org/codigo/1413/" target="_blank">Hacer sonar un archivo de sonido desde un boton</a>
<!-- Final enlace Tutores.org -->
COMENTARIOS
Comentario usuario
daniel
23/10/2003 10.47.59
3
5
hola..sabes este codigo loejecuto pero me sale error ,no se si podrias verificarlo pues no me funciona muy bien..please a ver si me respiondes o me das otros codigos para intentar..gracias
Comentario usuario
Nickos
28-04-2009 08:38:09
2
5
hola...una vez que ejecutas la musica como haces que pare o que se repita nuevamente. gracias
Comentario usuario
Yeison PadillaYeison Padilla
3
5
Hola, Sabes fue de mucha ayuda tu codigo. Gracias
Comentario usuario
yatewyatew
3
5
hola, oie esa funcion se declara, poniendo una API no, el problema es que yo no encuentro esa API me podria alguien explicar mejor como hacerlo.
Comentario usuario
yatewyatew
3
5
ya vi que no es una API lo que pasa es que se abre un modulo =) pero ahora el problema es que pongo la ruta del archivo y todo corecto en el modulo y en el form pero al darle clik sobre el boton me tira un cartel que dice lo siguiente:
el dispositivo especificado no esta abierto o MCI no lo reconoce
Espero me puedan ayudar.
el dispositivo especificado no esta abierto o MCI no lo reconoce
Espero me puedan ayudar.
Comentario usuario
enrique
11-06-2008 15:02:35
1
5
Hermanos el codigo sirve perfecto lo unico que no se puede compilar hasta que no se declare
dim iResult as string
y pueden poner el codgi asi para que no les de error en cuanto abran su programa en otra pc
guardan el archivo de la cancion donde este tu proyecto ya lo probe asi y tambien puede ser mp3
Private Sub Command1_Click()
dim iResult as string
iResult = mciExecute("Play tu_archivo.wav")
End Sub
dim iResult as string
y pueden poner el codgi asi para que no les de error en cuanto abran su programa en otra pc
guardan el archivo de la cancion donde este tu proyecto ya lo probe asi y tambien puede ser mp3
Private Sub Command1_Click()
dim iResult as string
iResult = mciExecute("Play tu_archivo.wav")
End Sub
Comentario usuario
mike
18-07-2007 14:42:42
4
5
hi. y si yo no kiero meter un punto WAV si no un mp que codigo me recomiendas
Comentario usuario
FievelFievel
3
5
Muchisimas gracias!!
me habian dicho que era muy dificil :S
pero su codigo esta muy sencillo y ya funciona :D
Una pregunta, se puede vincular visual basic a alguna pagina de internet???
me habian dicho que era muy dificil :S
pero su codigo esta muy sencillo y ya funciona :D
Una pregunta, se puede vincular visual basic a alguna pagina de internet???
Comentario usuario
marcy
17-04-2010 15:31:08
5
5
no!!!!...no me sale el programa ...ayuda por favor!!....
Comentario usuario
Juan
23/03/2004 14.09.13
1
5
gracias se compila bien pero me tira un erro en esta parte DialogResult = mciExecute("Play C:UsersjuanMusicguardar.wav") no c q pasa????????
INSERTAR COMENTARIO