petiflamand
Messages postés675Date d'inscriptionsamedi 31 mai 2003StatutMembreDernière intervention26 mai 2013
-
8 août 2006 à 08:58
chaibat05
Messages postés1883Date d'inscriptionsamedi 1 avril 2006StatutMembreDernière intervention20 novembre 2007
-
8 août 2006 à 13:47
bonjour , j'ai un probleme ,
je suis en vb6 et j'ai plusieur form avec des nom
pour mes touche F1 ==> F12 j'utilise
Private Sub form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyF10 Then Command18_Click
If KeyCode = vbKeyF12 Then Command16_Click
If KeyCode = vbKeyF7 Then Command17_Click
If KeyCode = vbKeyF1 Then Command1_Click
If KeyCode = vbKeyF2 Then Command2_Click
KeyCode = 0
End Sub
j'ai essayer de remplacer le form par le nom mais sa marche pas non plus
quelqu'un a une idee
chaibat05
Messages postés1883Date d'inscriptionsamedi 1 avril 2006StatutMembreDernière intervention20 novembre 20072 8 août 2006 à 13:43
Bonjour,
>comment placer KeyPreview a true ? ==> dans la page Propriétés de ton Form
Pour ce qui est de ton code il faut le placer dans:
Sub Form_KeyUp (après relachement de la touche)
Private Sub form_KeyUp(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyF10 : Command18_Click
Case vbKeyF12 : Command17_Click
.....
.....
petiflamand
Messages postés675Date d'inscriptionsamedi 31 mai 2003StatutMembreDernière intervention26 mai 20131 8 août 2006 à 10:40
salut DARKSIDIOUS,
je mes ce code dans deux form
1 qui s'appelle facturation et l'autre principale
j'ai essayer en changeant
Private Sub form_KeyDown(KeyCode As Integer, Shift As Integer)
vers
Private Sub principale_KeyDown(KeyCode As Integer, Shift As Integer)
mais sa ne fonctionne pas non plus
Si tu a une idée pour moi
Merci d'avance
robert
cs_casy
Messages postés7741Date d'inscriptionmercredi 1 septembre 2004StatutMembreDernière intervention24 septembre 201440 8 août 2006 à 10:56
Pourquoi changer le nom ?
form_KeyDown est une routine que le système va venir exécuter lorsqu'il enverra l'évènement KeyDown à ta feuille. Ce nom est figé, tu ne peux absolument pas le changer, sinon le système ne retrouvera plus la routine et considèrera que l'évènement n'est pas traité.
Pour quelle raison veux-tu changer ce nom de procedure ?
Sevyc64 (alias Casy)<hr align="center" size="2" width="100%" /><stron></stron># LE PARTAGE EST NOTRE FORCE #
Vous n’avez pas trouvé la réponse que vous recherchez ?
petiflamand
Messages postés675Date d'inscriptionsamedi 31 mai 2003StatutMembreDernière intervention26 mai 20131 8 août 2006 à 11:35
merci de vos reponse
le nom je l'ai changer car je voulais tester, comme sa ne marchai pas
je suis novice ,
et comment placer KeyPreview a true
et aussi si je mes
Private Sub form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyF10 Then Command18_Click
If KeyCode = vbKeyF12 Then Command16_Click
If KeyCode = vbKeyF7 Then Command17_Click
If KeyCode = vbKeyF1 Then Command1_Click
If KeyCode = vbKeyF2 Then Command2_Click
KeyCode = 0
End Sub
elle est valable pour toute les form ou il faut que je replace ce code dans chaque form
car moi je l'ai mi dans mes deux forme ou je veu activer les touche F
Merci