cs_nemesis20
Messages postés20Date d'inscriptionmardi 3 mai 2005StatutMembreDernière intervention 6 mai 2005
-
3 mai 2005 à 16:33
crenaud76
Messages postés4172Date d'inscriptionmercredi 30 juillet 2003StatutMembreDernière intervention 9 juin 2006
-
3 mai 2005 à 22:45
bonjour a tous, je developpe actuellement un programme avec VB6 mais je ne sais pa comment faire les 2 choses suivantes :
- j'ai une variable de type integer qui vaut "0505030042" . Je voudrai
decouper cette chaine pour ne recuperer que les 2 premiers (les envoyer
dans un autre integer) et les 4 derniers chiffres (les envoyer aussi
dans un autre integer).
- je recupere le jour actuel grace a : Format(Now, "dd") et je voudrai envoyer ce jour "03" dans un integer
si quelqun sait comment regler ces 2 problemes....
Starec
Messages postés152Date d'inscriptionmercredi 30 mars 2005StatutMembreDernière intervention 5 mars 2007 3 mai 2005 à 16:40
Salut,
1 - Tu dois d'abord mettre ton infos dans une variable string, (car tu as un 0 devant, et une vairiable sur un nombre te virera toujours le 0), et ensuite tu pourras l'éclater avec les fonctions left, right et mid
2 - dim intDate as integer
intDate = cInt(Format(Now,"dd))
Quelque chose dans ce goût là
biscuitema
Messages postés14Date d'inscriptionlundi 2 mai 2005StatutMembreDernière intervention 8 juin 2005 3 mai 2005 à 16:43
Ce n'est pas très compliqué : Pour récuperer les deux premiers chiffres tu fais
a =Mid$(ta chaine, 1, 2)
pour les 4 derniers
b =Mid$(ta chaine,6,4)
et pour les convertir en entier tu utilises la fonction Cint(a) et Cint(b)
Voilà, j'espère avoir répondu à ta question
Biscuit
Pensez à accepter les réponses si elles vous conviennent ^^
Il y a des jours où il ne faut pas m'embeter.
Il y a des jours... Tous les jours.