System.Windows.Forms.Cursor.Current = Cursors.Default
Dim myAudio As New WMPLib.WindowsMediaPlayer Dim pfile As String = "test.mp3" myAudio.uiMode = "none" myAudio.enableContextMenu = False myAudio.settings.setMode("autoRewind", True) myAudio.settings.enableErrorDialogs = False myAudio.URL = pfile myAudio.settings.autoStart = True System.Windows.Forms.Cursor.Current = Cursors.Default
Le temps que la lib charge la musique, le pointeur change toute même en
waiting... Mon code n'a pas la main !
Dim myAudio As New WMPLib.WindowsMediaPlayer Dim pfile As String = "test.mp3" myAudio.uiMode = "none" myAudio.enableContextMenu = False myAudio.settings.setMode("autoRewind", True) myAudio.settings.enableErrorDialogs = False myAudio.URL = pfile myAudio.settings.autoStart = True System.Windows.Forms.Cursor.Current = Cursors.Default' <= Tu met ton code après
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionInherits Microsoft.VisualBasic.Devices.Audio Dim pfile As String = "test.xm" Dim mdataxm() As Byte = IO.File.ReadAllBytes(pfile) Dim mdatawav() as Byte 'FUNCTION DECRYPT MDATAXM vers MDATAWAV 'mdatawav = AudioMapper(mdataxm, MapperEncoder.ModuleToWave) Me.Play(mdatawav, AudioPlayMode.BackgroundLoop)