ComboBox dynamique et style en lecture seuleRésolu

Question

Bonjour à tous. 

Je suis assez débutant en VB donc la réponse pourrait être facile mais je ne vois pas comment faire... 

Mon problème :
Je créé une comboBox toutefois je voudrai que le style de cette combobox soit égale à 2 (par défaut il est à 0)

Mon bout de code 

Dim cboTmpPdt As ComboBox
Dim CboNameCouloir As String: CboNameCouloir = "cboCouloir" & i
Set cboTmpCouloir = Controls.Add("VB.combobox", "" & CboNameCouloir & "", frmRemote)

cboTmpCouloir = cboCouloir
cboTmpCouloir.Locked = False
'Set cboTmpCouloir.Style = 2

With cboTmpCouloir
.Visible = True
.Top = Top
.Style = 2

End With


J'ai pas mis tout le code mais mon problème c'est juste que je ne peut pas lui mettre le style à dropdownlist (2).

Erreur de compilation :
Impossible d'affecter à une propriété en lecture seule

Si quelqu'un peut m'aider je vous en remercie d'avance.

Cdt...

Claiyah · Accepted Answer

bonjour

voila une autre solution rapide et efficace :

créer un combobox et nome le "moncombo", met son index à "0", et son style "2"

quand tu veut ajouter un autre combo dynamiquement tu fait comme sa:


Dim i As Long 'ou i est le meme i que tu utilise dans ton code precedent, sa va etre affecté à lma proprieté index)
    Load moncombo(i)
 moncombo(i).visible = true
... son emplacement et le reste des proprieté à toi de les choisir 


à plus

Claiyah · Answer

re j'ai oublié un truc
pour supprimé le combo tu n'a qu'à faire : unload moncombo(i)

kargoles · Answer

cool ca fonctionne merci :) faut juste que je trouve comment mettre le sujet a résolu :)

ComboBox dynamique et style en lecture seule

3 réponses

Votre réponse

Discussions similaires