Incrementer une date en vb6

interlink -  
 interlink -
bonjour
je veux programmer une fonction en vb6 qui, en entree, reçoit une date et retour la date du jour suivant: c-a-d incrementer la date reçu en entree.
Mon probleme est que je suis nouveau sur ce langage. Si quelqu'un peut m'aider à trouver une piste.
Merci de votre comprehension
Configuration: Windows XP
Internet Explorer 6.0

2 réponses

  1. blux Messages postés 2058 Date d'inscription   Statut Modérateur Dernière intervention   3 455
     
    Salut,

    la fonction dateadd ?
    0
  2. choco000078
     
    Dim date as datetime
    Dim dateSuivante as datetime
    date = "10/05/2005"
    dateSuivante = date + 1

    Il me semble que cela fonctionne, mais j'suis pas sur, à tester ;)
    0
    1. interlink
       
      g tester votre code mais il me signale erreur: " Type activeX non genere"
      0
    2. interlink
       
      Merci bcp mon cher ca marche parfaitement avec Date au lieu de DateTime
      Dim d As Date
      Dim dateSuivante As Date
      d = "10/05/2005"
      dateSuivante = d + 1
      0