Discussion :

[bubu92]

Bonjour à tous,

j'aurais besoin d'un peu d'aide pour la création d'un UserControl.
J'y connais rien. J'ai donc essayé de m'y mettre progressivement
en démarrant un nouveau projet avec une feuille (Form1) et un
UserControl "UserControl1" que j'ai ajouté au projet en choisissant
"ajouter un control utilisateur".
J'ai ajouté une TextBox sur le UserControl, et j'ai ajouté le UserControl
sur "Form1". Jusque là c'était plutôt facile :-)
ca s'est compliqué quand j'ai ajouté une TextBox sur le UserControl.
J'aurais bien aimé avoir un événement "TextChanged" sur le UserControl
m'indiquant un changement de texte dans la TextBox. J'ai donc cherché
un tuto :-) J'en ai trouvé un qui m'a semblé plutôt simple, et qui
proposait d'ajouter cette instruction dans l'évènement "Textbox1_TextChanged" :

Code :

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

Me.OnTextChanged(e)

Sauf que sur Form1, je ne trouve ni l'évènement "TextChanged", ni l'évènement "OnTextChanged"
dans la liste des événements du UserControl.

Que faire ?!

J'ai cru comprendre à la lecture du tuto que pour chaque évènements de la classe control,
existait un événement du même nom préfixé de "On". Car vb.net ne permet pas de déclencher
un événement situé dans la classe de base à partir de la classe dérivée.
Est-ce que j'ai bien compris et si oui pourquoi ça ne fonctionne pas ?

Merci pour votre aide.

[MABROUKI]

bonjour

Bogus du designer VS probablement .
Il n'est pas listé ni dans la combo de l'editeur de code ni dans la propertygrid du usercontrol.
Quand il est droppé sur le form ,il n'et as pas également listé dans la propertygrid.

Néanmoins ,quand on tape à la mano du code il et bien là cet Event.

code exemle .vb:

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
 
Public Class UserControl1
 
    Private Sub TextBox1_TextChanged(sender As System.Object, e As System.EventArgs) Handles TextBox1.TextChanged
        Me.OnTextChanged(e)
 
    End Sub
 
 
    Public Sub New()
 
        ' Cet appel est requis par le concepteur.
        InitializeComponent()
 
        ' Ajoutez une initialisation quelconque après l'appel InitializeComponent().
    End Sub
 
 
 
End Class

code du form user:

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
 
Public Class Form2
 
    Public Sub New()
 
        ' Cet appel est requis par le concepteur.
        InitializeComponent()
 
        ' Ajoutez une initialisation quelconque après l'appel InitializeComponent().
        AddHandler Me.UserControl11.TextChanged, AddressOf ctlchanged
    End Sub
 
    Private Sub ctlchanged(sender As Object, e As EventArgs)
        MessageBox.Show("textbox1")
    End Sub
 
End Class

bon code...

[bubu92]

Merci MABROUKI,

je me doutais que c'étais ça mais je n'voulais pas y croire.
J'utilise vb.net 2010 (pour ne pas m'obliger à enregistrer
chaque projet…)
Je vais tenté une réinstallation dans l'espoir de résoudre
le problème.

Merci pour ton aide