Hola ¿alquien sabe como reproducir un sonido midi en visual basic net osea que suene al cargarse el formulario? he intentado varios codigos pero no me funcionan. Gracias
Bueno logre conseguir como reproducir el sonido midi al cargarse el form: Utilizando este codigo:
Public Class Form1
Dim music As String
Private Declare Function mciExecute Lib
"winmm.dll" (ByVal
lpstrCommand As String) As Long
Private Sub Form1
_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
music = Chr(34) + "C:\Users\NombredeUsuario\documents\visual studio
2010\Projects\PROBANDOSONIDOMIDI\PROBANDOSONIDOMIDI\Resources\exorcista.mid" +
Chr(34)
mciExecute("open " & music)
mciExecute("play " & music)
End Sub
Private Sub Form_Unload(ByVal Cancel As Integer)
mciExecute("close all")
End SubPero Hay un problema el cual es que el archivo midi no se compila junto con el ejecutable, lo coloco como Recurso incrustado pero tampoco lo reproduce y en esta linea
music = Chr(34) + "C:\Users\NombredeUsuario\documents\visual studio
2010\Projects\PROBANDOSONIDOMIDI\PROBANDOSONIDOMIDI\Resources\exorcista.mid" +
Chr(34) no se como hacerle para agregarle la direccion del recurso midi. Se que hay un codigo que seria:
My.Computer.Audio.Play(My.Resources.Aquivaelnombredelsonidowav,
AudioPlayMode.Backgroundloop)y este lo reproduce perfectamente pero si agrego ese codigo de esta forma:
music = Chr(34) + "My.Computer.Audio.Play(My.Resources.exorcista.mid,
AudioPlayMode.Backgroundloop)" + Chr(34) no me funciona.
Espero que me hayan logrado entender lo que trato de explicar. Gracias.
Quimbox
[Editado: Quimbox, 17/05/2011 17:19:09]
[Quimbox, 19/05/2011 23:35:39]
