le principe d'ajout au panier

[ben_osty]

Bonjour le forum,

je souhaite remplir des labels nommés plant1.caption, plant2.caption etc... dès lors que ceux ci sont <> "" via un système d'ajout au panier. En effet, l'info serai inscrit dans mes labels de la façon suivante :

Dans une ComboBox_GEV je choisi une plante.
Lorsque je click sur Ajout_plant_button j'aimerais que la valeur de ComboBox_GEV soit envoyée vers
le premier "plant"&i <> "".

voici une ébauche un peu bancale à améliorer. Can you help me?

Private Sub Ajout_plante_button_Click()


Dim i As Integer
Dim Test As Boolean

  If "plant" & i.Caption <> "" Then Test = True
        If Test = True Then
        i = i + 1
        Me.Controls("plant" & i).Caption = ComboBox_GEV.Value
  End If

End Sub

A+
benjamin

 

[ben_osty]

Re : le principe d'ajout au panier

Je rame.. quelqu'un pour m'aider? j'ai tenté quelques modifs mais ça ne marche toujours pas...