Horloge Visual Basic - A l'Aide - Urgentissime

selenay · dummy mioche Inscrit le: 23 Aôu 2002 Messages: 4

J'essaye depuis quelque temps de programmer une horloge en visual basic, pour cela, je souhaiterais construire une fonction chiffre qui prend en
parametre un entier compris entre 1 et 6 et retournant la valeur du chiffre de l'horloge (1 pour les dizaines des heures et 6 pour le chiffre des unités des secondes), (par exemple si l'heure du systeme est 23:45:13, la fonction chiffre (4) renvoie 5 et il est bien tard pour travailler).
Puis a partir de cette fonction et de la procedure d'affichage "7 segments" et un contrôle timer je voudrais representer une horloge à affichage numerique Question

Salemioche · Posté le: Lun Aôu 26, 2002 7:16 am Sujet du message:

il suffit de mettre cette valeur dans une chaine de caractere et de recuperer le caractere souhaité

si le parametre est 1 alors on renvoie le premier caractere, si c'est 4 on renvoir le 5eme ( car il y a les : ) etc...
_________________
Creer son site - Hebergement - Jumeaux

selenay · dummy mioche Inscrit le: 23 Aôu 2002 Messages: 4

Je te remercie pour ta reponse qui m'a bien aidé, mais je n'arrive par vraiment a formuler la fonction, j'ai compris que pour capturer dans un label horaire, le chiffre des unités de l'horloge, il me fallait faire:

horloge$ = Format(Time, "hhmmss")
horaire.Caption = Mid$(horloge$, 1, 1)

Mais je n'arrive pas a construire la fonction , j'ai bien essayé :
for i=1 to 6
horloge$ = Format(Time, "hhmmss")
horaire.Caption = Mid$(horloge$, i, 1)
next i

mais ça ne marche pas Exclamation

Salemioche · Posté le: Jeu Aôu 29, 2002 4:52 pm Sujet du message:

a chaque tour de boucle tu recalcule l'heure ( qui risque de changée)
et tu restocke au meme endroit, tu aura donc toujours la même chose
: le chiffre des secondes
_________________
Creer son site - Hebergement - Jumeaux

selenay · dummy mioche Inscrit le: 23 Aôu 2002 Messages: 4

Salut !

Je te remercie pour tes reponses, si quelqu'un est interesse par le programme, il est disponible sur le site de VBFrance..

@+