Button_Click [Résolu]

Messages postés
44
Date d'inscription
lundi 1 avril 2002
Statut
Membre
Dernière intervention
16 août 2009
- - Dernière réponse : cs_cybercorp
Messages postés
44
Date d'inscription
lundi 1 avril 2002
Statut
Membre
Dernière intervention
16 août 2009
- 29 oct. 2007 à 18:42
Bonjour
Comment sous VB 2005 appeler l'évènement:
PrivateSub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Je veux faire l'appel lorsque l'utilisateur appui sur le touche "Entrée" dans une zone de texte.
Je ne peux pas définir un boutton par défaut, puisque en fonction de la zone de texte utilisée je fais appel à un boutton correspondant.

Message d'erreur:
Argument non spécifié pour le paramètre 'e' de private sub Button1_click 'sender As Object, e As .EventArgs

Merci

Celui qui ajoute de nouvelles connaissances aux anciennes est le véritable professeur.(Confucius)
Afficher la suite 

4 réponses

Meilleure réponse
Messages postés
7741
Date d'inscription
mercredi 1 septembre 2004
Statut
Membre
Dernière intervention
24 septembre 2014
31
3
Merci
Essaye peut-etre ça :

call Button1_Click(Button1, New System.EventArgs)

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #    http://aide-office-vba.monforum.com/index.php

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 217 internautes nous ont dit merci ce mois-ci

Commenter la réponse de cs_casy
Messages postés
863
Date d'inscription
samedi 11 juin 2005
Statut
Membre
Dernière intervention
21 août 2015
0
Merci
Salut

Private Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii 13 Then ' 13 KeyAscii du bouton "Entrer"
Button1_Click
End If
End Sub

J'espère que je ne me suis pas trompé sur ta question :)

La poule et l'oeuf... c'est un peu ça la prog sans analyse je crois :p
Commenter la réponse de Sinsitrus
Messages postés
863
Date d'inscription
samedi 11 juin 2005
Statut
Membre
Dernière intervention
21 août 2015
0
Merci
Salut

Private Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii 13 Then ' 13 KeyAscii du bouton "Entrer"
Button1_Click
End If
End Sub

J'espère que je ne me suis pas trompé sur ta question :)

La poule et l'oeuf... c'est un peu ça la prog sans analyse je crois :p
Commenter la réponse de Sinsitrus
Messages postés
44
Date d'inscription
lundi 1 avril 2002
Statut
Membre
Dernière intervention
16 août 2009
0
Merci
Voici le résultat

PrivateSub TxtSearch_KeyPress(ByVal sender AsObject, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TxtSearch.KeyPress
If e.KeyChar = Microsoft.VisualBasic.ChrW(Keys.Return) Then
  Call Button2_Click(Button2, New System.EventArgs)
EndIf
EndSub

Celui qui ajoute de nouvelles connaissances aux anciennes est le véritable professeur.(Confucius)
Commenter la réponse de cs_cybercorp