methode me.controls.find non reconnue

Version imprimable

Bonjour,

je cherche à cocher plusieurs cases à cocher si la case à cocher chkM1 est cochée.
J'ai le code suivant et il ne reconnait pas Me;controls.find

Code:

1
2
3
4
5
6
7
            If chkM1.Checked = True Then
                For i As Integer = 2 To 5
                    Dim chkCourant As CheckBox
                    chkCourant = Me.Controls.Find("chkM" & i)(0)
                    chkCourant.Checked = True
                Next
            End If

Merci pour votre aide

Bonjour,

Si tu connais déjà le nom de tes checkboxes (et au vue de ta portion de code je dirais que oui) alors c'est assez simple en utilisant le gestionnaire d’événement "CheckedChanged" :
Code:

1 2 3 4 5 6 7 8 9 10 11 Public Class Form1 Private Sub CheckBox1_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBox1.CheckedChanged CheckBox2.Checked = CheckBox1.Checked CheckBox3.Checked = CheckBox1.Checked CheckBox4.Checked = CheckBox1.Checked CheckBox5.Checked = CheckBox1.Checked End Sub End Class
A+

12/06/2015, 23h26
clementmarcotte
Bonjour,

Citation:

Envoyé par geredonis

Bonjour,

je cherche à cocher plusieurs cases à cocher si la case à cocher chkM1 est cochée.
J'ai le code suivant et il ne reconnait pas Me;controls.find

Merci pour votre aide

On dirait que plus VB (ou, est-ce le Framework) progresse(nt), plus il devien(nen)t strict ou capricieux avec certains objets. À force de me battre avec les Forms (dans VB 2012 et VB2013), (contrôles non reconnus et autres chinoiseries du genre), j'ai "solutionné" le problème de la façon suivante:

en supposant que ce soit le textBox1 de la "Form1"

Code:

My.forms.Form1.Textbox1.text = "Ici"

ou
Code:

1 2 Dim letextbox as TextBox = My.forms.Form1.Textbox1 letextbox.text = "Ici"
C'est énervant au début, mais, c'est bon pour la discipline. ;)
13/06/2015, 08h05
geredonis

Merci pour ta réponse
J'ai essayé le code suivant mais My.forms.frmMenu n'est pas reconnu.

Code:

chkCourant = My.Forms.frmMenu.Controls("chkM" & i)
13/06/2015, 21h37
clementmarcotte

Bonjour,

Est-ce le même problème que celui-ci:

http://www.developpez.net/forums/d15...e/#post8285103

Si c'est oui, en principe, c'est résolu. ;)
14/06/2015, 01h46
Pol63

https://msdn.microsoft.com/fr-fr/lib...vs.110%29.aspx

il ne faut improviser

https://msdn.microsoft.com/fr-fr/lib...vs.110%29.aspx
14/06/2015, 22h00
geredonis

Merci pour votre aide.
Dans mon problème, j'ai cherché sur 2 pistes différentes
J'ai résolu mon problème dans la discussion

c'est donc résolu
Merci beaucoup