Bonjour le Forum,

je souhaite changer le texte de Combobox avec des données qui sont stockées dans des variables.

En gros je souhaite un peu faire comme Excel," je change de page en cliquant sur un RadioButton", en mettant les données de chaque Combobox dans des variables.
Le code fonctionne mais que pour une seule des combobox à la fois, il faut qu'une des combobox reste avec sa première entrée, c'est vraiment étrange.

Voici mon code.
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
    If RadioButtonG1.Checked = True Then 'Page 1
            S1COMBOG1 = S1COMBO.Text
            S1COMBOG1 = S2COMBO.Text
        End If
                If RadioButtonG2.Checked = True Then 'Page 2
                      S1COMBOG2 = S1COMBO.Text
            S2COMBOG2 = S2COMBO.Text      
        End If 
 
 Private Sub RadioButtonG1_CheckedChanged(sender As Object, e As EventArgs) Handles RadioButtonG1.CheckedChanged
                If RadioButtonG1.Checked = True And RadioButtonG2.Checked = False Then
            S1COMBO.Text = S1COMBOG1
            S2COMBO.Text = S2COMBOG1
        End If
 
        If RadioButtonG2.Checked = True And RadioButtonG1.Checked = False Then
                S1COMBO.Text = S1COMBOG2
                S2COMBO.Text = S2COMBOG2
            End If
 
    End Sub
 
    Private Sub RadioButtonG2_CheckedChanged(sender As Object, e As EventArgs) Handles RadioButtonG2.CheckedChanged
            If RadioButtonG1.Checked = True Then
            S1COMBO.Text = S1COMBOG1
            S2COMBO.Text = S2COMBOG1
        End If
 
        If RadioButtonG2.Checked = True  Then
                S1COMBO.Text = S1COMBOG2
                S2COMBO.Text = S2COMBOG2
        End If
 
    End Sub
Merci pour votre aide.