Ciao a tutti,
ho fatto questo codice:
codice:
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
PlayBackgroundSoundFile() ' play sound
'' /// bisogna fare il codice per nascondere il video!
videoFile.Owner = Me
videoFile.Play()
'' Non risponde ai comandi...
If Timer1.Interval = 0 Then
videoFile.Stop()
End If
End Sub
codice del timer:
codice:
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
If videoFile.Playing Then
Enabled = True
End If
End Sub
Non c'è nessun errore nel codice ma quando avvio il debug parte il video e dopo i secondi settati dal timer (3) non succede nulla.Ho provato anche a dirgli di creare un MsgBox ma non fa nulla... qualcuno sa quale puo' essere il motivo per cui l'unica cosa che fa è avviare il video? non riesco a controllarlo in nessun modo...aggiungo anche che una volta terminato il video vorrei far si che il videoplayer si elimini.