[vb6] condition 's'il ne se passe rien&#

Résolu/Fermé

Brocoly Messages postés 9 Date d'inscription lundi 27 avril 2009 Statut Membre Dernière intervention 25 mars 2010 - 17 janv. 2010 à 01:54
Brocoly Messages postés 9 Date d'inscription lundi 27 avril 2009 Statut Membre Dernière intervention 25 mars 2010 - 17 janv. 2010 à 14:33

Bonjour,
je fais un logiciel en VB6 et je voudrai qu'il fasse une vérification constante en gros:

"si pendant 3 seconde aucun des comandbuton de la form1 n'est clické alors assigner 0 à une valeur i"

Je suis un peu débutant autodidacte de petit niveau, help me please. Merci.

A voir également:

[vb6] condition 's'il ne se passe rien&#
Excel cellule couleur si condition texte - Guide
Vb6 - Télécharger - Divers Utilitaires
Voir mot de passe wifi android - Guide
Mot de passe administrateur - Guide
Identifiant et mot de passe - Guide

2 réponses

Réponse 1 / 2

Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
17 janv. 2010 à 10:59

Bonjour,

Dans une Form, place 2 CommandButton et un Timer. Colle le code dans l'éditeur VB de la Form :

Option Explicit

Private i As Integer

Private Sub Command1_Click()
i = 0
End Sub

Private Sub Command2_Click()
i = 0
End Sub

Private Sub Form_Load()

    gereTimer
    
End Sub

Private Sub Timer1_Timer()
    i = i + 1
    If i = 3 Then
        MsgBox i & " secondes"
        i = 0
    End If
End Sub

Sub gereTimer()
    Timer1.Enabled = True
End Sub

;o)

Réponse 2 / 2

Brocoly Messages postés 9 Date d'inscription lundi 27 avril 2009 Statut Membre Dernière intervention 25 mars 2010 1
17 janv. 2010 à 14:33

ça marche et ça m'a bien aidé, un grand merci à toi!

Discussions similaires

Mot de passe administrateur Freebox : où le trouver ?

Arnaque sur le site Passe ton billet

ma mere a oublié son mot de passe

Comment supprimer un compte Facebook sans email ni mot de passe ?