Pb wait sur Vb [Résolu]

Signaler
Messages postés
86
Date d'inscription
vendredi 20 octobre 2006
Statut
Membre
Dernière intervention
13 mai 2010
-
Messages postés
86
Date d'inscription
vendredi 20 octobre 2006
Statut
Membre
Dernière intervention
13 mai 2010
-
Bonjour
Je voudrais connaitre l'équivalent de l'instruction wait (Vba)Sur visual basic
Victor110
A voir également:

16 réponses

Messages postés
4822
Date d'inscription
lundi 11 novembre 2002
Statut
Membre
Dernière intervention
15 novembre 2016
12
Salut et bonjour à tous,

Voici la déclaration de l'api sleep(pause) en Vb :

Public pour l'utiliser dans plusieurs Form, en Private pour l'utiliser que dans une seule Form

' API pause ************************************************
 Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
' **********************************************************

Utilisation :

Sleep (1000) ' Pause de une seconde

Si tu veux ene savoir plus sur les Api(certaines), regarde avec ta visionneuse d'api de VB...

A+
Exploreur

 Linux a un noyau, Windows un pépin

 
Messages postés
4822
Date d'inscription
lundi 11 novembre 2002
Statut
Membre
Dernière intervention
15 novembre 2016
12
Salut,

Si tu as déclaré l'api dans ta form, déclare là en "Private" et non en Public

A+
Exploreur

 Linux a un noyau, Windows un pépin

 
Messages postés
15814
Date d'inscription
jeudi 8 août 2002
Statut
Modérateur
Dernière intervention
4 mars 2013
100
Sur vb6 ? Il doit s'agir certainement de l'API Sleep (fait une toute petite recherche sur le forum, et tu trouvera).
Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
48
Salut,
Wait??? c'est en quel VBA tout ca?

Sinon je rejoints [auteurdetail.aspx?ID=13557 DARKSIDIOUS] pour Sleep.

@+: Ju£i?n
Pensez: Réponse acceptée
Messages postés
7668
Date d'inscription
samedi 5 novembre 2005
Statut
Membre
Dernière intervention
22 août 2014
23
Salut,

A moins qu'il ne veuille parler d'une attente sans toutefois tout gelet :

Du genre (rentre une foule d'autres) :

debut = timer
do while timer < debut + 1
  doevents
wend
Messages postés
86
Date d'inscription
vendredi 20 octobre 2006
Statut
Membre
Dernière intervention
13 mai 2010

 je ne sais pas en quel vba
je pense dans tous
Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
48
Salut,
Bah tu doit bien savoir en quel VBA tu l'a déjà vu: EXCEL, ACCESS, Outlook, Power Point...

@+: Ju£i?n
Pensez: Réponse acceptée
Messages postés
86
Date d'inscription
vendredi 20 octobre 2006
Statut
Membre
Dernière intervention
13 mai 2010

 c était sous excel mais je te remercie explorateur



c'était ce que je chercher
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
62
ne pas mettre de parenthèses

Utilisation :

Sleep 1000 ' Pause de une seconde

Renfield
Admin CodeS-SourceS- MVP Visual Basic
Messages postés
86
Date d'inscription
vendredi 20 octobre 2006
Statut
Membre
Dernière intervention
13 mai 2010

 Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Sub Pause()
Shell "explorer.exe http://www.equideo.com/"
Sleep 1000
SendKeys "{TAB 3}", True
End Sub
Je fais ce que m'a dit explorateur mais sa ne marche pas
Messages postés
4822
Date d'inscription
lundi 11 novembre 2002
Statut
Membre
Dernière intervention
15 novembre 2016
12
Lol...Exploreur...pas explorateur

A+
Exploreur

 Linux a un noyau, Windows un pépin

 
Messages postés
86
Date d'inscription
vendredi 20 octobre 2006
Statut
Membre
Dernière intervention
13 mai 2010

pardon pour la faute de copie
Messages postés
15814
Date d'inscription
jeudi 8 août 2002
Statut
Modérateur
Dernière intervention
4 mars 2013
100
"ca ne marche pas" ??? càd ?
Messages postés
86
Date d'inscription
vendredi 20 octobre 2006
Statut
Membre
Dernière intervention
13 mai 2010

Merci beaucoup ca marché parfaitement c'est juste que je ne metter pas un temps assez long
Messages postés
7668
Date d'inscription
samedi 5 novembre 2005
Statut
Membre
Dernière intervention
22 août 2014
23
Bonjour,

nous y voilà donc enfin (de retour ici...) !

Ton sleep gèle tout !!!!!

exemple pour accéder à un compte yahoo en se servant d sendkeys (comme tu veux le faire):

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Private Sub Command2_Click()
  ShellExecute 0, vbNullString, "http://fr.f351.mail.yahoo.com/ym/login?.rand=71jl1leo9u1hj", vbNullString, vbNullString, vbNormalFocus
  patience
  depart = Timer
    Do While Timer < depart + 10
    DoEvents
  Loop
  For i = 1 To 2
    SendKeys "nom_utilisateur", True
    SendKeys "{TAB}"
    SendKeys "mot_de_passe"
    SendKeys "{ENTER}"
  Next i
  End
End Sub

tu prends (et adaptes) ou tu laisses ...
Je viens de tester et celà fonctionne, pour autant qu'une connexion internet ait été établie préalablement.
Messages postés
86
Date d'inscription
vendredi 20 octobre 2006
Statut
Membre
Dernière intervention
13 mai 2010

la solution de exploreur marche tres bien et elle est plus courte sa ne gèle pas ma page internet