Mon programme commence par un listBox (lb1)dans lequel je selectionne des vertices à afficher. Pour la premiere selection tout fonctionne bien , le device s'affiche impeccable dans un panel (pann01)sur ma form... Le problème commence quand je veux reprendre la main et que je sélectionne un autre item à afficher dans mon panel. Je n'arrive pas à supprimer (arreter) le device précedent...et afficher le suivant, si quelqu'un peut m'aider çà fait une semaine que je suis bloqué par ce problème...

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
    Private Sub lb1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lb1.SelectedIndexChanged
        Dim ldep As Integer
        ldep = CType(lb1.SelectedItem, Integer)
 
 
 
        Dim frm As New vue
 
        frm.tab(ldep, mon_fichier)
 
        frm.BorderStyle = Me.pann01.BorderStyle
        frm.Location = Me.pann01.Location
        frm.ClientSize = Me.pann01.ClientSize
        frm.BackColor = Me.pann01.BackColor
        Me.Controls.Remove(pann01)
        Me.Controls.Add(frm)
 
 
        Try
 
            frm.Show()
 
            While frm.Created
 
                frm.InitializeGraphics()
                Application.DoEvents()
            End While
        Finally
            frm.Dispose()
        End Try
 
 
 
    End Sub