| Pregunta: | 55419 - COMO REPRODUCIR SONIDOS EN VISUAL STUDIO.NET |
| Autor: | Leopoldo González |
| Hola compañeros. Alguien sabe como reproducir sonidos (wav, mp3, etc) en visual studio.NET utilizando algun control. De antemano les agradezco su atencio y su ayuda Gracias. | |
| Respuesta: | Julio chang |
| ahi ta tio
Saludos Imports System.Media Imports System.ComponentModel Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Me.Visible = False 'My.Computer.Audio.PlaySystemSound(System.Media.SystemSounds.Exclamation) My.Computer.Audio.Play() Me.Close() End Sub End Class | |
| Respuesta: | Juan Carlos Martínez López |
| Hola brother yo he podido reproducir video la cosa es q solo videos en formato swf, bueno si quieres asi podes convertir cualquier video que tengas ya sea en mpeg o avi con un programa que se llama Amadis Video Convert, lo pasas a swf y en el Visual, yo lo hice usando la version 2002, no se si ya lo quitaron en las versiones posteriores, te vas a modo diseño y le das personalizar Cuadro de herramientas y te buscas el control que se llama: Shockwave Flash Object, este esta en la ficha Componentes COM, el icono es un cuadrillo rayado, cuando lo tengas en el Cuadro de Herramientas lo buscas en Windows Form y de seguro esta de ultimo, lo arrastras a tu form y colocas en el boton para reproducir tu archivo esto:
/* flash es el nombre que le puse al objeto, no se como le queres poner vos */ flash.Movie = ("Aca va la ruta donde tenes tu archivo swf, ejemplo: CmiVideo.swf") /* el .swf lo debes de poner para que reconozca q es un archivo swf*/ flash.Play() /* y luego lo reproducis Por si las moscas, si quieres usar un dialogo para abrir tu video que convertiste y no estar reemplazando el nombre del archivo a cada momento, vos sabes hacerlo dinámico este es el codigo: Primero arrastras un objeto OpenFileDialog a tu form, yo aca le llame ofdswf Dim FileName As String /* Esta variable me va a contener el nombre del archivo que seleccione */ Try With ofdswf .CheckFileExists = False .DefaultExt = "swf" .InitialDirectory = "C:VideoclubTrailers" /*Este es el directorio (carpeta) que va a cargar primero cuando aparezca el dialogo, puede ser donde tienes tus videos */ .Filter = _ "Text files (*.swf)|*.swf|" & _ "All files|*.*" .Title = "Seleccione un archivo flash" If .ShowDialog() = DialogResult.OK Then FileName = .FileName flash.Movie = ("C:Videos" & FileName.Remove(0, 22)) flash.Play() /* y luego se reproduce el archivo End If End With Catch Exc As Exception End Try Si quieres pausarlo o terminar de reproducir usa este codigo: /* para pausar, recorda que flash es mi objeto q coloque para ver el archivo de video flash.Stop() /* para deterner la reproduccion del video flash.StopPlay() /* para reaunudar la reproduccion flash.Play() Espero te sirva esto hermano, cualquier duda solo escribi al correo, lo del archivo mp3 o de sonido tambien ya lo hice pero ese te lo posteo la proxima. Suerte! | |