Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Visual Basic 6 - controllo multimediale
Forum - Visual Basic 6 - controllo multimediale

Avatar
etarf (Normal User)
Newbie


Messaggi: 5
Iscritto: 06/02/2007

Segnala al moderatore
Postato alle 16:47
Martedė, 13/02/2007

Visual Basic 6 CONTROLLO MULTIMEDIALE
Riformulo la domanda, Vorrei sapere se č possibile avere un messaggio o una
segnalazione alla fine dell'esecuzione di un file Wave allego il codice.
Grazie a tutti


Private Sub Form_Load()

Dim File(10)
File(1) = "Brano_01": File(2) = "Brano_02"


   MMControl1.Notify = False
   MMControl1.Wait = True
   MMControl1.Shareable = False
   MMControl1.DeviceType = "WaveAudio"

   MMControl1.FileName = File(1)

   ' Apre la periferica WaveAudio MCI.
   MMControl1.Command = "Open"
   MMControl1.Command = "Play"
End Sub


Private Sub Form_Unload(Cancel As Integer)
   MMControl1.Command = "Close"
End Sub
:-o

PM Quote