Comment déclencher un sub d'évènement depuis un autre sub ?
2 réponses
Yan
Bonjour à tous,
Je cherche à déclencher un sub d'évènement depuis un autre sub.
Au déclenchement de l'évènement activated d'un form, je récupère des
informations contenu dans une base de données, et je les affiche dans un
datagrid. jusque là, tout va bien.
Ensuite, j'insert des valeurs dans ma base à partir d'un bouton et
j'aimerais que mon datagrid ce recharge pour ce réactualiser en appelant le
sub activated.
J'ai pensé faire un truc dans ce genre là, mais ça ne marche pas :
Private Sub frm_ajout_profil_Activated(ByVal sender As Object, ByVal e As
System.EventArgs) Handles MyBase.Activated
' Affichage des mes données
end sub
Private Sub btn_ajouter_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles btn_ajouter.Click
call frm_ajout_profil_Activated()
End sub
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
nesserb
Bonjour ,
Private Sub btn_ajouter_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_ajouter.Click call frm_ajout_profil_Activated() End sub
call frm_ajout_profil_Activated() Tu n'est pas obligé d'utiliser Call
frm_ajout_profil_Activated(me,nothing)
Devrais fonctionner car dans ta Sub tu attend 2 arguments !
Je cherche à déclencher un sub d'évènement depuis un autre sub.
Au déclenchement de l'évènement activated d'un form, je récupère des informations contenu dans une base de données, et je les affiche dans un datagrid. jusque là, tout va bien.
Ensuite, j'insert des valeurs dans ma base à partir d'un bouton et j'aimerais que mon datagrid ce recharge pour ce réactualiser en appelant
le
sub activated.
J'ai pensé faire un truc dans ce genre là, mais ça ne marche pas :
Private Sub frm_ajout_profil_Activated(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Activated ' Affichage des mes données end sub
Private Sub btn_ajouter_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_ajouter.Click call frm_ajout_profil_Activated() End sub
Merci d'avance pour votre aide, Yan
Bonjour ,
Private Sub btn_ajouter_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles btn_ajouter.Click
call frm_ajout_profil_Activated()
End sub
call frm_ajout_profil_Activated()
Tu n'est pas obligé d'utiliser Call
frm_ajout_profil_Activated(me,nothing)
Devrais fonctionner car dans ta Sub tu attend 2 arguments !
Je cherche à déclencher un sub d'évènement depuis un autre sub.
Au déclenchement de l'évènement activated d'un form, je récupère des
informations contenu dans une base de données, et je les affiche dans un
datagrid. jusque là, tout va bien.
Ensuite, j'insert des valeurs dans ma base à partir d'un bouton et
j'aimerais que mon datagrid ce recharge pour ce réactualiser en appelant
le
sub activated.
J'ai pensé faire un truc dans ce genre là, mais ça ne marche pas :
Private Sub frm_ajout_profil_Activated(ByVal sender As Object, ByVal e As
System.EventArgs) Handles MyBase.Activated
' Affichage des mes données
end sub
Private Sub btn_ajouter_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles btn_ajouter.Click
call frm_ajout_profil_Activated()
End sub
Private Sub btn_ajouter_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_ajouter.Click call frm_ajout_profil_Activated() End sub
call frm_ajout_profil_Activated() Tu n'est pas obligé d'utiliser Call
frm_ajout_profil_Activated(me,nothing)
Devrais fonctionner car dans ta Sub tu attend 2 arguments !
Je cherche à déclencher un sub d'évènement depuis un autre sub.
Au déclenchement de l'évènement activated d'un form, je récupère des informations contenu dans une base de données, et je les affiche dans un datagrid. jusque là, tout va bien.
Ensuite, j'insert des valeurs dans ma base à partir d'un bouton et j'aimerais que mon datagrid ce recharge pour ce réactualiser en appelant
le
sub activated.
J'ai pensé faire un truc dans ce genre là, mais ça ne marche pas :
Private Sub frm_ajout_profil_Activated(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Activated ' Affichage des mes données end sub
Private Sub btn_ajouter_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_ajouter.Click call frm_ajout_profil_Activated() End sub
Merci d'avance pour votre aide, Yan
Yan
Ha ! super !
J'avais pensé à "Me" pour le premier argument, mais pas à nothing, je ne savais pas quoi mettre justement.
Merci ! Yan
"nesserb" a écrit dans le message de news:
Bonjour ,
Private Sub btn_ajouter_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_ajouter.Click call frm_ajout_profil_Activated() End sub
call frm_ajout_profil_Activated() Tu n'est pas obligé d'utiliser Call
frm_ajout_profil_Activated(me,nothing)
Devrais fonctionner car dans ta Sub tu attend 2 arguments !
En esperant t'avoir aider. Bon Courage !
Ha ! super !
J'avais pensé à "Me" pour le premier argument, mais pas à nothing, je ne
savais pas quoi mettre justement.
Merci !
Yan
"nesserb" <nesserb@nospam.de> a écrit dans le message de news:
ukPDRKaeGHA.1436@TK2MSFTNGP05.phx.gbl...
Bonjour ,
Private Sub btn_ajouter_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles btn_ajouter.Click
call frm_ajout_profil_Activated()
End sub
call frm_ajout_profil_Activated()
Tu n'est pas obligé d'utiliser Call
frm_ajout_profil_Activated(me,nothing)
Devrais fonctionner car dans ta Sub tu attend 2 arguments !
J'avais pensé à "Me" pour le premier argument, mais pas à nothing, je ne savais pas quoi mettre justement.
Merci ! Yan
"nesserb" a écrit dans le message de news:
Bonjour ,
Private Sub btn_ajouter_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_ajouter.Click call frm_ajout_profil_Activated() End sub
call frm_ajout_profil_Activated() Tu n'est pas obligé d'utiliser Call
frm_ajout_profil_Activated(me,nothing)
Devrais fonctionner car dans ta Sub tu attend 2 arguments !