Re bonjour à tous,
J'ai résolu mon probleme précédent mais maintenant je pense vraiment avoir besoin de votre aide.
Je fais un programme pour un ecran tactile et qui lancera des films.
Voici mon code :
Mon problème maintenant est que si une personne veut regarder un autre film vlc ne se refermera PAS tant que le film n'est pas fini donc il y aura les deux sons des films lancés pas tres bon pour les oreilles...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34 Public Class Choix_films Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim ID As Object ID = Shell("""C:\Program Files\VideoLAN\VLC\vlc.exe"" ""C:\Videos relief\Dassault\Dassault_OeilDroit_Cannes.wmv""") End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Dim ID As Object ID = Shell("""C:\Program Files\VideoLAN\VLC\vlc.exe"" ""C:\Videos relief\Mayor ECCLESIA II\DROITE_1920x1080@30fps.wmv""") End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click Dim ID As Object ID = Shell("""C:\Program Files\VideoLAN\VLC\vlc.exe"" ""C:\Videos relief\OCEAN\ocean-d-800x600.wmv""") End Sub Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click Dim ID As Object ID = Shell("""C:\Program Files\VideoLAN\VLC\vlc.exe"" ""C:\Videos relief\VULCANIA\vulcania_D_800x600_25-11-2004.wmv""") End Sub Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click Choix.Hide() Choix.Show() Me.Close() End Sub Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click Dim vol As Object vol = Shell("sndvol /t", 1) End Sub End Class
J'aurais voulu savoir qu'elle etait le code permettant de dire que si la personne choisi un autre film cela fermerai le film qui est déja lancé?
J'espere mettre bien exprimé.
Je vous remercie d'avance
Funky
Partager