Discussion :

[balabonov]

Bonjour j'ai un petit problème

Actuellement je créée une série de label + une textbox associé sur un formulaire B pour chaque checkbox qui se trouve sur un formulaire A.

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
   Sub Afficher_Justification_Checkbox_Non_Cochées()
 
        Dim i As Integer
 
        For Each cb As Control In Me.Controls
 
            Box_Justification = New TextBox
            If cb.GetType Is GetType(CheckBox) Then
                i = i + 1
                Me.Box_Justification.Font = New System.Drawing.Font("Tahoma", 7.0!, System.Drawing.FontStyle.Regular)
                If lastbox Is Nothing Then
                    Me.Box_Justification.Top = i * 70
                Else
                    Me.Box_Justification.Top = lastbox.Top + 40
                End If
                Me.Box_Justification.Name = cb.Name
                Me.Box_Justification.Size = New System.Drawing.Size(157, 18)
                Me.Box_Justification.TabIndex = i
                Complément.Controls.Add(Box_Justification)
                lastbox = Box_Justification
                afficher_Button_Retour_Complément()
                afficher_Button_Suite_Complément()
            End If
        Next
 
    End Sub

Mais en fait je voudrais "affiner" le resultat car mon but n'est pas de créer toutes les textbox mais seulement celle dont la checkbox associée n'est pas cochée.

Comment modifier ma procédure en ce sens?

Je voulais faire qq chose du genre : if cb.checked = true then 'ma procédure

Mais bien sur cela ne marche pas puisque cb correspond a un control et non pas a une checkbox...

[19cmos83]

Comment est faite l'association ?

Tu as une propriété commune a tous les composants, qui est le TAG,
tu fais en sorte que l associaion se fait au travers de celle ci.

si (Tag de checkbutton = 1 and cb.Tag = 1) and (checkbutton.checked)
alors
' faire traitement
fin si

[balabonov]

Comment est faite l'association ?

C'est pas vraiment une association au sens propre du terme en fait..
j'aurais plutôt du dire "pour chaque checkbox présente sur le form A je crée une textbox + un label sur le form B)
==> une checkbox = un label + un textbox
Je fais un sytème de bouclage

Je comrprends pas comment je pourrais faire avec le tag...

parcque la checkbox n'existe que si je la crée...

[19cmos83]

Si j ai bien saisi, tu as deja des checkbox sur ta form, qui peuvent etre cochées ou non, et ensuite tu créer dynamiquement des labels et textbox seulement si la checkBox est a true

Bun :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
 For Each cb As Object In Me.Controls
 
  if Typeof cb is CheckBox and cb.Checked
 
    '
    ' Création de label et textbox
    '
 
 Next

[EDIT]

parcque la checkbox n'existe que si je la crée...

??? attends ... t'as quoi sur la Form A et tu parcours quoi afin de créer tes composants ?

[balabonov]

J'essaye tout de suite ca...

For Each cb As Object In Me.Controls

if Typeof cb is CheckBox and cb.Checked

'
' Création de label et textbox
'

Next

Edit :J'obtiens le message d'erreur que la version ciblée du frameword n'accepte pas les liaisons tardives...

??? attends ... t'as quoi sur la Form A et tu parcours quoi pour quoi afin de créer des coposants ?

Oui c'est vrai que j'en ai pas parlé (ca ne concernait pas directement mon pb et j'ai pas pensé que ca pouvait poser un problème de compréhension...)

Les checkbox sont elle même créée en fonction de 2 listes deroulantes...


En fait c'est très simple..

Par defaut sur ma form A j'ai seulement 2 combobox (liste deroulantes)
Ainsi suivant les "items" séléctionnées dans ces 2 listes je crée des checkbox.
(en fait il s'agit d'une méthode de prélèvement car mon appli est destinée a des preleveurs)
donc suivant le type de prélèvement a effectuer je crée des checkbox... (cela varie suivant le prelevement)

Maintenant il arrive que pour une raison ou pour une autre certains points de cette méthodes ne soit pas effectuées... (donc si la checkbox n'est pas cochée)

C'est pourquoi j'ai crée un formulaire qui affiche des textbox suivant les checkbox non cochées afin de justifier pourquoi ce point la de la méthode n'a pas été réalisé..

Mon problème était donc que les checkbox n'était pas encore crée...

[19cmos83]

ar defaut sur ma form A j'ai seulement 2 combobox (liste deroulantes)
Ainsi suivant les "items" séléctionnées dans ces 2 listes je crée des checkbox.

ok.


Ensuite , la création des Textbox et Labels dans la FormB se fait en fonction de la valeur attribuée aux CheckBox ?


Si j'ai bien compris :

Actuellement je créée une série de label + une textbox associé sur un formulaire B

Et bien, dans le Load de la FormB, tu vas parcourir les CheckBoxs de la FormA !

et c'est à partir de cette Methode(LoadFormB) que tu créeras tes Composants.

effectivement, si tu essayais de faire cela à partir de la formA, ca ne pouvait pas marcher.