Je souhaiterais fermer un formulaire sur l'appui de la=20
touche Echap, et ce quelque soit le controle sur lequel je=20
suis positionn=E9 (je l'avais d=E9j=E0 demand=E9 mais j'ai oubli=E9=20
et je ne le retrouve plus sur le forum)
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
Christian Hugoud - Xtrem7
Tu peux mettre un bouton avec du code dedans, et sa propriété Cancel à True
"Nicolas" a écrit dans le message de news:1c0c01c37391$82d47640$ Bonjour,
Je souhaiterais fermer un formulaire sur l'appui de la touche Echap, et ce quelque soit le controle sur lequel je suis positionné (je l'avais déjà demandé mais j'ai oublié et je ne le retrouve plus sur le forum)
Merci d'avance
Nicolas
Tu peux mettre un bouton avec du code dedans, et sa propriété Cancel à
True
"Nicolas" <nicolasheurtevin@wanadoo.fr> a écrit dans le message de
news:1c0c01c37391$82d47640$a301280a@phx.gbl...
Bonjour,
Je souhaiterais fermer un formulaire sur l'appui de la
touche Echap, et ce quelque soit le controle sur lequel je
suis positionné (je l'avais déjà demandé mais j'ai oublié
et je ne le retrouve plus sur le forum)
Tu peux mettre un bouton avec du code dedans, et sa propriété Cancel à True
"Nicolas" a écrit dans le message de news:1c0c01c37391$82d47640$ Bonjour,
Je souhaiterais fermer un formulaire sur l'appui de la touche Echap, et ce quelque soit le controle sur lequel je suis positionné (je l'avais déjà demandé mais j'ai oublié et je ne le retrouve plus sur le forum)
Merci d'avance
Nicolas
Zoury
Salut Nicolas! :O)
'*** ' Form1, KeyPreview = True Option Explicit
Private Sub Form_KeyPress(KeyAscii As Integer) If KeyAscii = vbKeyEscape Then Call Unload(Me) End Sub '***
Merci de poster les réponses au groupe afin d'en faire profiter à tous "Nicolas" wrote in message news:1c0c01c37391$82d47640$ Bonjour,
Je souhaiterais fermer un formulaire sur l'appui de la touche Echap, et ce quelque soit le controle sur lequel je suis positionné (je l'avais déjà demandé mais j'ai oublié et je ne le retrouve plus sur le forum)
Merci d'avance
Nicolas
Salut Nicolas! :O)
'***
' Form1, KeyPreview = True
Option Explicit
Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = vbKeyEscape Then Call Unload(Me)
End Sub
'***
Merci de poster les réponses au groupe afin d'en faire profiter à tous
"Nicolas" <nicolasheurtevin@wanadoo.fr> wrote in message
news:1c0c01c37391$82d47640$a301280a@phx.gbl...
Bonjour,
Je souhaiterais fermer un formulaire sur l'appui de la
touche Echap, et ce quelque soit le controle sur lequel je
suis positionné (je l'avais déjà demandé mais j'ai oublié
et je ne le retrouve plus sur le forum)
Merci de poster les réponses au groupe afin d'en faire profiter à tous "Nicolas" wrote in message news:1c0c01c37391$82d47640$ Bonjour,
Je souhaiterais fermer un formulaire sur l'appui de la touche Echap, et ce quelque soit le controle sur lequel je suis positionné (je l'avais déjà demandé mais j'ai oublié et je ne le retrouve plus sur le forum)
Merci d'avance
Nicolas
Gilles RONSIN
"Zoury" , le ven. 05 sept. 2003 16:34:46, écrivait ceci:
Salut,
Call Unload(Me)
Tiens, je ne connais pas cette syntaxe. C'est équivalent à unload.me ?
-- Embryon de site : http://gilles.ronsin.free.fr Nouveau: un JukeBox pour DaemonTool Mon utilitaire de BDR V1.1.0 : http://gilles.ronsin.free.fr/aregtool.htm Les gens qui ne rient jamais, ne sont pas des gens sérieux.
"Zoury" <yanick_lefebvre@hotmail.com>, le ven. 05 sept. 2003 16:34:46,
écrivait ceci:
Salut,
Call Unload(Me)
Tiens, je ne connais pas cette syntaxe. C'est équivalent à unload.me ?
--
Embryon de site : http://gilles.ronsin.free.fr Nouveau: un JukeBox pour
DaemonTool
Mon utilitaire de BDR V1.1.0 : http://gilles.ronsin.free.fr/aregtool.htm
Les gens qui ne rient jamais, ne sont pas des gens sérieux.
"Zoury" , le ven. 05 sept. 2003 16:34:46, écrivait ceci:
Salut,
Call Unload(Me)
Tiens, je ne connais pas cette syntaxe. C'est équivalent à unload.me ?
-- Embryon de site : http://gilles.ronsin.free.fr Nouveau: un JukeBox pour DaemonTool Mon utilitaire de BDR V1.1.0 : http://gilles.ronsin.free.fr/aregtool.htm Les gens qui ne rient jamais, ne sont pas des gens sérieux.
Ledev
Bonjour,
Gilles RONSIN wrote:
"Zoury" , le ven. 05 sept. 2003 16:34:46, écrivait ceci:
Salut,
> Call Unload(Me) Tiens, je ne connais pas cette syntaxe. C'est équivalent à unload.me ?
C'est équivalent a unload me(sans le point).
Petite exemple: MaFonctionOuSub MesArgs Est équivalent de Call MaFonctionOuSub(MesArgs)
La différence est que avec Call, une function ne peut plus renvoyée de résultat(le résultat est simplement ignorer).
a+
Bonjour,
Gilles RONSIN wrote:
"Zoury" <yanick_lefebvre@hotmail.com>, le ven. 05 sept. 2003 16:34:46,
écrivait ceci:
Salut,
> Call Unload(Me)
Tiens, je ne connais pas cette syntaxe. C'est équivalent à unload.me ?
C'est équivalent a unload me(sans le point).
Petite exemple:
MaFonctionOuSub MesArgs
Est équivalent de
Call MaFonctionOuSub(MesArgs)
La différence est que avec Call, une function ne peut plus renvoyée de
résultat(le résultat est simplement ignorer).
"Zoury" , le ven. 05 sept. 2003 16:34:46, écrivait ceci:
Salut,
> Call Unload(Me) Tiens, je ne connais pas cette syntaxe. C'est équivalent à unload.me ?
C'est équivalent a unload me(sans le point).
Petite exemple: MaFonctionOuSub MesArgs Est équivalent de Call MaFonctionOuSub(MesArgs)
La différence est que avec Call, une function ne peut plus renvoyée de résultat(le résultat est simplement ignorer).
a+
Gilles RONSIN
"Ledev" , le dim. 07 sept. 2003 00:01:09, écrivait ceci:
Salut Ledev,
> Call Unload(Me) Tiens, je ne connais pas cette syntaxe. C'est équivalent à unload.me ?
C'est équivalent a unload me(sans le point).
Oui! où avais-je la tête :-)
Voilà ce que c'est de ne plus pratiquer..... Merci pour tes précisions.
-- Embryon de site : http://gilles.ronsin.free.fr Nouveau: un JukeBox pour DaemonTool Mon utilitaire de BDR V1.1.0 : http://gilles.ronsin.free.fr/aregtool.htm Les gens qui ne rient jamais, ne sont pas des gens sérieux.
"Ledev" <ledev@freesurf.fr>, le dim. 07 sept. 2003 00:01:09, écrivait ceci:
Salut Ledev,
> Call Unload(Me)
Tiens, je ne connais pas cette syntaxe. C'est équivalent à unload.me ?
C'est équivalent a unload me(sans le point).
Oui! où avais-je la tête :-)
Voilà ce que c'est de ne plus pratiquer.....
Merci pour tes précisions.
--
Embryon de site : http://gilles.ronsin.free.fr Nouveau: un JukeBox pour
DaemonTool
Mon utilitaire de BDR V1.1.0 : http://gilles.ronsin.free.fr/aregtool.htm
Les gens qui ne rient jamais, ne sont pas des gens sérieux.
"Ledev" , le dim. 07 sept. 2003 00:01:09, écrivait ceci:
Salut Ledev,
> Call Unload(Me) Tiens, je ne connais pas cette syntaxe. C'est équivalent à unload.me ?
C'est équivalent a unload me(sans le point).
Oui! où avais-je la tête :-)
Voilà ce que c'est de ne plus pratiquer..... Merci pour tes précisions.
-- Embryon de site : http://gilles.ronsin.free.fr Nouveau: un JukeBox pour DaemonTool Mon utilitaire de BDR V1.1.0 : http://gilles.ronsin.free.fr/aregtool.htm Les gens qui ne rient jamais, ne sont pas des gens sérieux.
Jérôme Prioux
Ça ne sert pas à grand chose, ce Call...
"Ledev" a écrit dans le message de news:
Bonjour,
Gilles RONSIN wrote: > "Zoury" , le ven. 05 sept. 2003 16:34:46, > écrivait ceci: > > Salut, > > > Call Unload(Me) > Tiens, je ne connais pas cette syntaxe. C'est équivalent à unload.me ?
C'est équivalent a unload me(sans le point).
Petite exemple: MaFonctionOuSub MesArgs Est équivalent de Call MaFonctionOuSub(MesArgs)
La différence est que avec Call, une function ne peut plus renvoyée de résultat(le résultat est simplement ignorer).
a+
Ça ne sert pas à grand chose, ce Call...
"Ledev" <ledev@freesurf.fr> a écrit dans le message de news:
etFzDNSdDHA.2508@tk2msftngp13.phx.gbl...
Bonjour,
Gilles RONSIN wrote:
> "Zoury" <yanick_lefebvre@hotmail.com>, le ven. 05 sept. 2003 16:34:46,
> écrivait ceci:
>
> Salut,
>
> > Call Unload(Me)
> Tiens, je ne connais pas cette syntaxe. C'est équivalent à unload.me ?
C'est équivalent a unload me(sans le point).
Petite exemple:
MaFonctionOuSub MesArgs
Est équivalent de
Call MaFonctionOuSub(MesArgs)
La différence est que avec Call, une function ne peut plus renvoyée de
résultat(le résultat est simplement ignorer).
Gilles RONSIN wrote: > "Zoury" , le ven. 05 sept. 2003 16:34:46, > écrivait ceci: > > Salut, > > > Call Unload(Me) > Tiens, je ne connais pas cette syntaxe. C'est équivalent à unload.me ?
C'est équivalent a unload me(sans le point).
Petite exemple: MaFonctionOuSub MesArgs Est équivalent de Call MaFonctionOuSub(MesArgs)
La différence est que avec Call, une function ne peut plus renvoyée de résultat(le résultat est simplement ignorer).
a+
François Picalausa
Bonjour/soir,
Call est optionnel mais certains le préfèrent pour une question de lisibilité du code. Voici ce que l'aide dit à ce propos: You are not required to use the Call keyword when calling a procedure. However, if you use the Call keyword to call a procedure that requires arguments, argumentlist must be enclosed in parentheses. If you omit the Call keyword, you also must omit the parentheses around argumentlist. If you use either Call syntax to call any intrinsic or user-defined function, the function's return value is discarded.
De même, on pourrait tout aussi bien faire: Dim a As Long Let a = 1 Pour bien différencier Let (optionnel) et Set (pas optionnel du tout).
"Jérôme Prioux" a écrit dans le message de news:3f5b2df9$0$28898$
Ça ne sert pas à grand chose, ce Call...
Bonjour/soir,
Call est optionnel mais certains le préfèrent pour une question de
lisibilité du code.
Voici ce que l'aide dit à ce propos:
You are not required to use the Call keyword when calling a procedure.
However, if you use the Call keyword to call a procedure that requires
arguments, argumentlist must be enclosed in parentheses. If you omit the
Call keyword, you also must omit the parentheses around argumentlist. If you
use either Call syntax to call any intrinsic or user-defined function, the
function's return value is discarded.
De même, on pourrait tout aussi bien faire:
Dim a As Long
Let a = 1
Pour bien différencier Let (optionnel) et Set (pas optionnel du tout).
Call est optionnel mais certains le préfèrent pour une question de lisibilité du code. Voici ce que l'aide dit à ce propos: You are not required to use the Call keyword when calling a procedure. However, if you use the Call keyword to call a procedure that requires arguments, argumentlist must be enclosed in parentheses. If you omit the Call keyword, you also must omit the parentheses around argumentlist. If you use either Call syntax to call any intrinsic or user-defined function, the function's return value is discarded.
De même, on pourrait tout aussi bien faire: Dim a As Long Let a = 1 Pour bien différencier Let (optionnel) et Set (pas optionnel du tout).
