Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Dim Clicknum As Integer
Private Sub Combo1_Click()
  Clicknum = Clicknum + 1
  Select Case Clicknum
    Case 1
    Text1= Combo1.Text
    Case 2
    Text2 = Combo1.Text
    Case 3
    Text3 = Combo1.Text
    Case 4
    Text4 = Combo1.Text
    End Select
    End Sub
Avec ce code, le premier remplissage des textboxes se fait trés bien mais si je voudrai faire un deuxième remplissage le code ne marche pas comme il le faut.

c-à-d, si je remplis text1 et text2 puis je quitte la forme. Ensuite, je reviens au mème forme pour faire un nouveau remplissage, je clique sur combo1; le remplissage commence par text3 meme si text1 et text2 sont vides. Alors que mois je voudrais que le remplissage commence par text1.

merci