VB6 : Objet dynamique Visible ... mais 'invisible'Résolu

Question

Salut à tous !

J'ai un truc "bizarroïde", je crée un CheckBox dynamiquement, je le rends visible mais ne l'est pas. Pourtant j'ai placé des MsgBox pour vérifier, les données sont bonnes au niveau des coordonnées mais quand je demande s'il est visible, ça me dit "FAUX", malgrè l'instruction précédente :


    For z = 2 To NbChamps  '(NbChamps est égal à 2, pour l'instant)
        NomCheck = "MonCheck" & z
        Set MonCheck = frmListes.Controls.Add("vb.checkbox", NomCheck)
        With MonCheck
            .Top = TOP_CHECK
            .Left = LEFT_MINIMUM + LARGEUR_OBJET * (z - 1)
            .Height = HAUTEUR_CHECK
            .Width = LARGEUR_OBJET
            .Caption = CAPTION_CHECK
            .Visible = True     'là je lui dit de se mettre visible
            .Tag = z
            MsgBox MonCheck.Top
            MsgBox MonCheck.Left
            MsgBox MonCheck.Height
            MsgBox MonCheck.Width
            MsgBox MonCheck.Caption
            MsgBox MonCheck.Visible    ' mais il me met "FAUX"
            MsgBox MonCheck.Tag
        End With
    Next z


Quelqu'un aurait-il une idée ?
Merci à tous !

@++

  --Mortalino-- 
Le Mystérieux Chevalier "Provençal, le Gaulois"
N'oubliez pas de lire le règlement !

mortalino · Accepted Answer

Bon ben comme d'hab, je m'auto valide :

En fait il y a mille fois plus simple pour ce que je veux faire :

    For z = 1 To NbChamps - 1
        Load frmListes.chkTri1(z)
        With frmListes.chkTri1(z)
            .Top = TOP_CHECK
            .Left = LEFT_MINIMUM + LARGEUR_OBJET * (z - 1)
            .Height = HAUTEUR_CHECK
            .Width = LARGEUR_OBJET
            .Caption = CAPTION_CHECK
            .Visible = True
        End With
    Next z

chkTri1 était déjà présent (car j'ai 1 CheckBox minimum) donc je lui ai rajouté l'index "0" et voilà, pour la création, c'est plus simple !!

++

Mortalino

VB6 : Objet dynamique Visible ... mais 'invisible'

1 réponse

Votre réponse

Discussions similaires