Bonjour à tous,
Dans mon appli, j'ai une listbox comportant des noms de formes géométriques (cercle, rectangle,...). J'ai un groupbox correspondant à chaque forme. Tous les groupbox sont à la même position et invisibles.
Je voudrais qu'en fonction de l'item sélectionné, le group box correspondant s'affiche.

Pour l'instant j'ai fait:

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
    Private Sub objects_lb_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles objects_lb.SelectedIndexChanged
 
        If objects_lb.SelectedItem = "Cercle 1" Then
            o_disk_01_gb.Visible = True
        Else : o_disk_01_gb.Visible = False
 
        End If
        If objects_lb.SelectedItem = "Rectangle 1" Then
            o_rect_01_gb.Visible = True
        Else : o_rect_01_gb.Visible = False
 
        End If
        If objects_lb.SelectedItem = "Triangle 1" Then
            o_triangle_01_gb.Visible = True
        Else : o_triangle_01_gb.Visible = False
        End If
 
        ...
 
End Sub
Tout fonctionnait très bien jusqu'au jour où j'ai ajouté "Option Strict On".
Maintenant, il me demande de remplacer = par is mais du coup ça ne marche plus (le groupbox ne s'affiche pas).
Quelles modifications dois-je faire?
Sinon, n'y aurait-il pas une solution plus simple? avec select case par exemple?(j'ai essayé mais en vain...)

Merci d'avance pour votre aide