OVH Cloud OVH Cloud

Deriver un évenement

3 réponses
Avatar
EH
bonjour
J'essaie de dériver un evenement dans une page WEB mais cela ne marche pas .
Pourquoi ?
Voci mon code

Dim CheckBox As New CheckBox
CheckBox.ID = "CheckBox1"
CheckBox.Visible = True
CheckBox.Text = "ESSAI"
AddHandler CheckBox.CheckedChanged, AddressOf MonSubEvenement
Me.MonPanel.Controls.Add(CheckBox)

Public Sub MonSubEvenement(ByVal sender As Object, ByVal e As EventArgs)
'le code que je dois faire
end sub

Quand je clique sur la checkbox créée je ne part pas dans le code
MonSubEvenement .Je ne comprend pas pourquoi!

3 réponses

Avatar
White Water
EH a écrit :
bonjour
J'essaie de dériver un evenement dans une page WEB mais cela ne marche pas .
Pourquoi ?
Voci mon code

Dim CheckBox As New CheckBox
CheckBox.ID = "CheckBox1"
CheckBox.Visible = True
CheckBox.Text = "ESSAI"
AddHandler CheckBox.CheckedChanged, AddressOf MonSubEvenement
Me.MonPanel.Controls.Add(CheckBox)

Public Sub MonSubEvenement(ByVal sender As Object, ByVal e As EventArgs)
'le code que je dois faire
end sub

Quand je clique sur la checkbox créée je ne part pas dans le code
MonSubEvenement .Je ne comprend pas pourquoi!




==========================================================================
Salut, Chez ceci marche :

Public Class Form1

Dim CheckBox As New CheckBox

Private Sub Form1_Load(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Me.Load

CheckBox.Name = "CheckBox1"
CheckBox.Visible = True
CheckBox.Text = "ESSAI"
AddHandler CheckBox.CheckedChanged, AddressOf MonSubEvenement
Me.Controls.Add(CheckBox)

End Sub

Private Sub MonSubEvenement(ByVal Sender As Object, ByVal e As
System.EventArgs)

Beep()

End Sub

End Class

Qu'est ce que ça donne chez toi ?
Avatar
EH
bonjour,

Quand j'essai de faire me.controls.add(checkbox),je me retrouve avec
l'erreur suivante:
System.Web.HttpException: Le contrôle 'C1' de type 'CheckBox' doit être
placé dans une balise form avec runat=server.


"White Water" <"Pure"AntiSpam"Coinciden" a écrit :

EH a écrit :
> bonjour
> J'essaie de dériver un evenement dans une page WEB mais cela ne marche pas .
> Pourquoi ?
> Voci mon code
>
> Dim CheckBox As New CheckBox
> CheckBox.ID = "CheckBox1"
> CheckBox.Visible = True
> CheckBox.Text = "ESSAI"
> AddHandler CheckBox.CheckedChanged, AddressOf MonSubEvenement
> Me.MonPanel.Controls.Add(CheckBox)
>
> Public Sub MonSubEvenement(ByVal sender As Object, ByVal e As EventArgs)
> 'le code que je dois faire
> end sub
>
> Quand je clique sur la checkbox créée je ne part pas dans le code
> MonSubEvenement .Je ne comprend pas pourquoi!
>
>
========================================================================== >
Salut, Chez ceci marche :

Public Class Form1

Dim CheckBox As New CheckBox

Private Sub Form1_Load(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Me.Load

CheckBox.Name = "CheckBox1"
CheckBox.Visible = True
CheckBox.Text = "ESSAI"
AddHandler CheckBox.CheckedChanged, AddressOf MonSubEvenement
Me.Controls.Add(CheckBox)

End Sub

Private Sub MonSubEvenement(ByVal Sender As Object, ByVal e As
System.EventArgs)

Beep()

End Sub

End Class

Qu'est ce que ça donne chez toi ?



Avatar
Patrice
Sur une page web, les contrôles doivent être effectivement placé dans une
balise form avec runat=server comme indiqué par le message d'erreur...

Voir par exemple :
http://fr.gotdotnet.com/quickstart/util/srcview.aspx?path=/quickstart/aspplus/samples/webforms/intro/intro4.src

La syntaxe Handles permet également de déclarer le gestionnaire sans le lier
explicitement à son contrôle.


--
Patrice

"EH" a écrit dans le message de news:

bonjour,

Quand j'essai de faire me.controls.add(checkbox),je me retrouve avec
l'erreur suivante:
System.Web.HttpException: Le contrôle 'C1' de type 'CheckBox' doit être
placé dans une balise form avec runat=server.


"White Water" <"Pure"AntiSpam"Coinciden" a écrit :

EH a écrit :
> bonjour
> J'essaie de dériver un evenement dans une page WEB mais cela ne marche
> pas .
> Pourquoi ?
> Voci mon code
>
> Dim CheckBox As New CheckBox
> CheckBox.ID = "CheckBox1"
> CheckBox.Visible = True
> CheckBox.Text = "ESSAI"
> AddHandler CheckBox.CheckedChanged, AddressOf
> MonSubEvenement
> Me.MonPanel.Controls.Add(CheckBox)
>
> Public Sub MonSubEvenement(ByVal sender As Object, ByVal e As
> EventArgs)
> 'le code que je dois faire
> end sub
>
> Quand je clique sur la checkbox créée je ne part pas dans le code
> MonSubEvenement .Je ne comprend pas pourquoi!
>
>
========================================================================== >>
Salut, Chez ceci marche :

Public Class Form1

Dim CheckBox As New CheckBox

Private Sub Form1_Load(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Me.Load

CheckBox.Name = "CheckBox1"
CheckBox.Visible = True
CheckBox.Text = "ESSAI"
AddHandler CheckBox.CheckedChanged, AddressOf MonSubEvenement
Me.Controls.Add(CheckBox)

End Sub

Private Sub MonSubEvenement(ByVal Sender As Object, ByVal e As
System.EventArgs)

Beep()

End Sub

End Class

Qu'est ce que ça donne chez toi ?