bonjour a tous,
1) Comment faire dans un formulaire , pour avoir un événement qui se produit
si je clic avec le bouton droit de la souris ?
2) quelle est en vba, l'instruction qui me ferai une pause dans une boucle,
l'équivalent de "pause" en GFA basic ?
merci
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
Eric
Bonjour Roger
bonjour a tous, 1) Comment faire dans un formulaire , pour avoir un événement qui se produit si je clic avec le bouton droit de la souris ?
En mettant la propriété Menu Contextuel du formulaire à Non et en utilisant l'évènement Sur Souris appuyée.
Exemple pour un clic droit sur la zone détail: Private Sub Détail_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then MsgBox "Bouton droit" End If End Sub
2) quelle est en vba, l'instruction qui me ferai une pause dans une boucle, l'équivalent de "pause" en GFA basic ? merci
En utilisant L'API Sleep : Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) dans la partie déclaration du module de formulaire
Sur clic d'un bouton, la légende du formulaire est definie puis une pause de 5 secondes et redéfinition de la légende.
Private Sub Commande0_Click() Me.Caption = "On hiberne ;-)" Sleep 5000 ' attente de 5 secondes Me.Caption = "On sort de sa léthargie" End Sub -- A+ Eric http://www.mpfa.info/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Bonjour Roger
bonjour a tous,
1) Comment faire dans un formulaire , pour avoir un événement qui se produit
si je clic avec le bouton droit de la souris ?
En mettant la propriété Menu Contextuel du formulaire à Non et
en utilisant l'évènement Sur Souris appuyée.
Exemple pour un clic droit sur la zone détail:
Private Sub Détail_MouseDown(Button As Integer, Shift As Integer, X As
Single, Y As Single)
If Button = 2 Then
MsgBox "Bouton droit"
End If
End Sub
2) quelle est en vba, l'instruction qui me ferai une pause dans une boucle,
l'équivalent de "pause" en GFA basic ?
merci
En utilisant L'API Sleep :
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
dans la partie déclaration du module de formulaire
Sur clic d'un bouton, la légende du formulaire est definie puis une
pause de 5 secondes et redéfinition de la légende.
Private Sub Commande0_Click()
Me.Caption = "On hiberne ;-)"
Sleep 5000 ' attente de 5 secondes
Me.Caption = "On sort de sa léthargie"
End Sub
--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
bonjour a tous, 1) Comment faire dans un formulaire , pour avoir un événement qui se produit si je clic avec le bouton droit de la souris ?
En mettant la propriété Menu Contextuel du formulaire à Non et en utilisant l'évènement Sur Souris appuyée.
Exemple pour un clic droit sur la zone détail: Private Sub Détail_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then MsgBox "Bouton droit" End If End Sub
2) quelle est en vba, l'instruction qui me ferai une pause dans une boucle, l'équivalent de "pause" en GFA basic ? merci
En utilisant L'API Sleep : Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) dans la partie déclaration du module de formulaire
Sur clic d'un bouton, la légende du formulaire est definie puis une pause de 5 secondes et redéfinition de la légende.
Private Sub Commande0_Click() Me.Caption = "On hiberne ;-)" Sleep 5000 ' attente de 5 secondes Me.Caption = "On sort de sa léthargie" End Sub -- A+ Eric http://www.mpfa.info/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
roger
Merci Eric, et bon week end !
"Eric" a écrit dans le message de news:
Bonjour Roger
bonjour a tous, 1) Comment faire dans un formulaire , pour avoir un événement qui se produit si je clic avec le bouton droit de la souris ?
En mettant la propriété Menu Contextuel du formulaire à Non et en utilisant l'évènement Sur Souris appuyée.
Exemple pour un clic droit sur la zone détail: Private Sub Détail_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then MsgBox "Bouton droit" End If End Sub
2) quelle est en vba, l'instruction qui me ferai une pause dans une boucle, l'équivalent de "pause" en GFA basic ? merci
En utilisant L'API Sleep : Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) dans la partie déclaration du module de formulaire
Sur clic d'un bouton, la légende du formulaire est definie puis une pause de 5 secondes et redéfinition de la légende.
Private Sub Commande0_Click() Me.Caption = "On hiberne ;-)" Sleep 5000 ' attente de 5 secondes Me.Caption = "On sort de sa léthargie" End Sub -- A+ Eric http://www.mpfa.info/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Merci Eric, et bon week end !
"Eric" <f_framZZ@hotmail.com> a écrit dans le message de news:
OAgELZ4iGHA.5036@TK2MSFTNGP04.phx.gbl...
Bonjour Roger
bonjour a tous,
1) Comment faire dans un formulaire , pour avoir un événement qui se
produit si je clic avec le bouton droit de la souris ?
En mettant la propriété Menu Contextuel du formulaire à Non et
en utilisant l'évènement Sur Souris appuyée.
Exemple pour un clic droit sur la zone détail:
Private Sub Détail_MouseDown(Button As Integer, Shift As Integer, X As
Single, Y As Single)
If Button = 2 Then
MsgBox "Bouton droit"
End If
End Sub
2) quelle est en vba, l'instruction qui me ferai une pause dans une
boucle, l'équivalent de "pause" en GFA basic ?
merci
En utilisant L'API Sleep :
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
dans la partie déclaration du module de formulaire
Sur clic d'un bouton, la légende du formulaire est definie puis une pause
de 5 secondes et redéfinition de la légende.
Private Sub Commande0_Click()
Me.Caption = "On hiberne ;-)"
Sleep 5000 ' attente de 5 secondes
Me.Caption = "On sort de sa léthargie"
End Sub
--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
bonjour a tous, 1) Comment faire dans un formulaire , pour avoir un événement qui se produit si je clic avec le bouton droit de la souris ?
En mettant la propriété Menu Contextuel du formulaire à Non et en utilisant l'évènement Sur Souris appuyée.
Exemple pour un clic droit sur la zone détail: Private Sub Détail_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then MsgBox "Bouton droit" End If End Sub
2) quelle est en vba, l'instruction qui me ferai une pause dans une boucle, l'équivalent de "pause" en GFA basic ? merci
En utilisant L'API Sleep : Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) dans la partie déclaration du module de formulaire
Sur clic d'un bouton, la légende du formulaire est definie puis une pause de 5 secondes et redéfinition de la légende.
Private Sub Commande0_Click() Me.Caption = "On hiberne ;-)" Sleep 5000 ' attente de 5 secondes Me.Caption = "On sort de sa léthargie" End Sub -- A+ Eric http://www.mpfa.info/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
