Timer...
Résolu
cs_Sator
Messages postés
351
Date d'inscription
samedi 7 février 2004
Statut
Membre
Dernière intervention
6 octobre 2010
-
13 févr. 2009 à 16:52
cs_Sator Messages postés 351 Date d'inscription samedi 7 février 2004 Statut Membre Dernière intervention 6 octobre 2010 - 13 févr. 2009 à 21:53
cs_Sator Messages postés 351 Date d'inscription samedi 7 février 2004 Statut Membre Dernière intervention 6 octobre 2010 - 13 févr. 2009 à 21:53
7 réponses
PCPT
Messages postés
13272
Date d'inscription
lundi 13 décembre 2004
Statut
Membre
Dernière intervention
3 février 2018
47
13 févr. 2009 à 20:18
13 févr. 2009 à 20:18
j'ai pris mid pour faire au plus simple, mais right est bien aussi
ok donc d'après ton exemple tu as une valeur à 23 et une autre à 30 (heure et minute), pas "23.30", et tu n'as pas besoin de "23h. 30mn.", mais juste d'une date valide!
utilise cdate
dim d as date
d= cdate(ton_23 & ":" ton_30 & ":00")
puis dans ton timer, compare d à time ()
++
<hr size ="2" width="100%" />
Prenez un instant pour répondre à [sujet-SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp
ok donc d'après ton exemple tu as une valeur à 23 et une autre à 30 (heure et minute), pas "23.30", et tu n'as pas besoin de "23h. 30mn.", mais juste d'une date valide!
utilise cdate
dim d as date
d= cdate(ton_23 & ":" ton_30 & ":00")
puis dans ton timer, compare d à time ()
++
<hr size ="2" width="100%" />
Prenez un instant pour répondre à [sujet-SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp
jmf0
Messages postés
1566
Date d'inscription
mardi 26 décembre 2000
Statut
Membre
Dernière intervention
5 avril 2013
8
13 févr. 2009 à 20:19
13 févr. 2009 à 20:19
Ou encore (moins "gourmand" que le Replace) :
recu = "23h.30mn"
mon_heure = TimeSerial(Val(recu), Val(Mid(recu, InStr(recu, ".") + 1)), 0)
MsgBox mon_heure
recu = "23h.30mn"
mon_heure = TimeSerial(Val(recu), Val(Mid(recu, InStr(recu, ".") + 1)), 0)
MsgBox mon_heure
PCPT
Messages postés
13272
Date d'inscription
lundi 13 décembre 2004
Statut
Membre
Dernière intervention
3 février 2018
47
13 févr. 2009 à 19:52
13 févr. 2009 à 19:52
salut,
instr te renvoie la position de ce que tu veux, ici le point
left(chaine, position-1) -> la gauche
mid(chaine,position+1) > la droite
tu n'as plus qu'à "ajouter" les chaines de ton choix
<hr size="2" width="100%" />
Prenez un instant pour répondre à [sujet-SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp
instr te renvoie la position de ce que tu veux, ici le point
left(chaine, position-1) -> la gauche
mid(chaine,position+1) > la droite
tu n'as plus qu'à "ajouter" les chaines de ton choix
<hr size="2" width="100%" />
Prenez un instant pour répondre à [sujet-SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp
cs_Sator
Messages postés
351
Date d'inscription
samedi 7 février 2004
Statut
Membre
Dernière intervention
6 octobre 2010
13 févr. 2009 à 20:01
13 févr. 2009 à 20:01
Excuse-moi mais je penssais avoir été clair... en fait je programme un truc qui doit se déclencher un certain jour à une certaine heure... et faire un if (time now)=> (23h.30mn.) then ....
bref le 23h.30mn. provient d'un fichier ini où heure ="23" et minute correspond à 30 Ensuite quand je lie les deux j'arrive à une variable string... ("23" & "." & "30") et non pas en quelque chose de comparable à un time....
voilà, donc si tu as une idée je te remercie pour ta patience... en revanche pourquoi n'as-tu pas employé right mais mid?
:)Sator :)
ps: si il ni avait pas de faute d'orthographe dans ce texte, il y a fort à parier que ce texte ne serait pas de moi...
bref le 23h.30mn. provient d'un fichier ini où heure ="23" et minute correspond à 30 Ensuite quand je lie les deux j'arrive à une variable string... ("23" & "." & "30") et non pas en quelque chose de comparable à un time....
voilà, donc si tu as une idée je te remercie pour ta patience... en revanche pourquoi n'as-tu pas employé right mais mid?
:)Sator :)
ps: si il ni avait pas de faute d'orthographe dans ce texte, il y a fort à parier que ce texte ne serait pas de moi...
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
jmf0
Messages postés
1566
Date d'inscription
mardi 26 décembre 2000
Statut
Membre
Dernière intervention
5 avril 2013
8
13 févr. 2009 à 20:04
13 févr. 2009 à 20:04
Bonjour,
Même ceci :
toto = "23:30"
MsgBox Hour(toto) & "h." & Minute(toto) & "mn"
Même ceci :
toto = "23:30"
MsgBox Hour(toto) & "h." & Minute(toto) & "mn"
jmf0
Messages postés
1566
Date d'inscription
mardi 26 décembre 2000
Statut
Membre
Dernière intervention
5 avril 2013
8
13 févr. 2009 à 20:07
13 févr. 2009 à 20:07
Ah...
Je viens de lire ton explication complémentaire !
Transforme en string
utilise replace pour remplacer le point par ":" et le "mn" par ""
retransforme en date
Je viens de lire ton explication complémentaire !
Transforme en string
utilise replace pour remplacer le point par ":" et le "mn" par ""
retransforme en date
cs_Sator
Messages postés
351
Date d'inscription
samedi 7 février 2004
Statut
Membre
Dernière intervention
6 octobre 2010
13 févr. 2009 à 21:53
13 févr. 2009 à 21:53
merci infiniment pour vos réponse,
:)Sator :)
ps: si il ni avait pas de faute d'orthographe dans ce texte, il y a fort à parier que ce texte ne serait pas de moi...
:)Sator :)
ps: si il ni avait pas de faute d'orthographe dans ce texte, il y a fort à parier que ce texte ne serait pas de moi...