Pb heure
Le
JCM
bonjour
dans une boucle je veux additionner 30 minutes à heure et
obtenir un résultat STR, voici le code :
Dim heure As String
Dim tranche As String
heure = CDate(Format("07:00", "hh mm"))
tranche = CDate(Format("00:30, "hh mm"))
heure =heure+tranche
j'obtiens "07:30:00" et je voudrais "07:00"
Ou est l'erreur
Cordialement
JCM
dans une boucle je veux additionner 30 minutes à heure et
obtenir un résultat STR, voici le code :
Dim heure As String
Dim tranche As String
heure = CDate(Format("07:00", "hh mm"))
tranche = CDate(Format("00:30, "hh mm"))
heure =heure+tranche
j'obtiens "07:30:00" et je voudrais "07:00"
Ou est l'erreur
Cordialement
JCM
Poser une question
Voici Monsieur:
Dim HH As Date
Dim MN As Date
HH = "7:00"
MN = "0:30"
HH = HH + MN
MsgBox Format(HH, "hh:mm")
Sinon, 2 string, de préférence "&", mais à part ça, je ne crois pas que l'on
puisse additionner "mathématiquement" le contenu de 2 strings...
--
@+, bye, Joe.
Pour m'écrire ng75AROBASEnoosPOINTfr
remplace AROBASE et POINT par leur vrai signe
Il l'a fait car il ne savait pas que c'était impossible, alea jacta est!
"JCM" 060201c3dbff$47d6aaa0$
bonjour
dans une boucle je veux additionner 30 minutes à heure et
obtenir un résultat STR, voici le code :
Dim heure As String
Dim tranche As String
heure = CDate(Format("07:00", "hh mm"))
tranche = CDate(Format("00:30, "hh mm"))
heure =heure+tranche
j'obtiens "07:30:00" et je voudrais "07:00"
Ou est l'erreur
Cordialement
JCM
Cela marche, toutefois je n'ai pas trouvé comment
convertir HH en une variable Integer pour avoir 7
Autre question
dans un MSFlexgride j'écris
MS.FixedAlignment(0) = 4
pour centrer le texte de la colonne 0 et cela ne le centre
pas, peux-tu me repondre
Cordialement
JCM
crois pas que l'on
strings...
alea jacta est!
message de news:
Dim HH As Date
Dim MN As Date
Dim heure
HH = "7:00"
heure = Mid(HH, 1, 2)
MN = "0:30"
HH = HH + MN
MsgBox Format(HH, "hh:mm") & Chr(10) & Format(heure, "#0")
Pour le "Flex", j'ai déjà utilisé, mais comme c'est rare, je n'ai rien en
tête, alors, ne voulant te dire de bêtises, je remets à plus entraîné sur ce
sujet...
--
@+, bye, Joe.
Pour m'écrire ng75AROBASEnoosPOINTfr
remplace AROBASE et POINT par leur vrai signe
Il l'a fait car il ne savait pas que c'était impossible, alea jacta est!
"JCM" 07eb01c3dc28$f46506d0$
Bonjour et merci pour ta réponse
Cela marche, toutefois je n'ai pas trouvé comment
convertir HH en une variable Integer pour avoir 7
Autre question
dans un MSFlexgride j'écris
MS.FixedAlignment(0) = 4
pour centrer le texte de la colonne 0 et cela ne le centre
pas, peux-tu me repondre
Cordialement
JCM
crois pas que l'on
strings...
alea jacta est!
message de news:
voici le code :
'***
Debug.Print DateAdd("n", 30, Now)
'***
--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/
Merci de poster les réponses au groupe afin d'en faire profiter à tous