Transormer date/heure en entier

[paul87]

Bonjour à tous, Bonjour le Forum.
dans un UF j'ai un TextBox qui contient date / heure au format "dd/mm/yyyy hh:nn"
j'ai besoin de transformer cette donnée en un nombre entier..car je souhaite réaliser une (ou des) barre de progression..
représentation horaire graphique horizontale
est-ce possible..?
Merci..

 

[cbea]

Re : Transormer date/heure en entier

Bonjour paul87,

Voici une solution :

    Dim valDate As Long
    
    If IsDate(TextBox1.Value) Then valDate = CLng(CDate(TextBox1.Value))

 

[pierrejean]

Re : Transormer date/heure en entier

bonjour paul87

Vois si tu peux t'inspirer de ceci

Edit: Salut cbea

 

[paul87]

Re : Transormer date/heure en entier

Bonsoir à tous, Bonsoir le Forum,
Merci à cbea et pierrejean pour vos conseils..
mais je n'arrive pas à faire fonctionner correctement mon appli..
ci-joint mon fichier de brouillon..avec explications jointes..
merci pour vos idées..!!

 

[pierrejean]

Re : Transormer date/heure en entier

Re

Je suis tres loin d'avoir tout compris de ce que tu souhaites
Teste en mettant en start la date du jour et en textbox2 2jours plus tard
clique sur le commandbutton, joue ensuite avec les spin button et a nouveau le commandbutton

la largeur du label11 est :

Label1.Width = CDbl(CDate(Me.TextBox2) - CDate(Me.TextBox1)) * 166.66

ce qui correspond a 500 pour 3 jours (166.66=500/3)

Si tu ne t'en sors pas revient sur ce fil

 

[cbea]

Re : Transormer date/heure en entier

Bonsoir paul87, pierrejean,

Voici une autre solution mais je ne suis pas sûre que ce soit la solution attendue.

 

[paul87]

Re : Transormer date/heure en entier

Bonsoir cbea
je ne vois pas de différence..
ou alors suis trop fatigué....ce soir!!!!

 

[cbea]

Re : Transormer date/heure en entier

Pourtant, j'ai bien changé le code 😉
Si tu saisis la date du 07/05/2008 dans la zone "start" et que tu cliques sur le bouton "CommandButton1", la barre se réduit en fonction de la date saisie + 3j et de la date du jour.

Après, je n'ai peut-être pas bien compris ta demande.

 

[paul87]

Re : Transormer date/heure en entier

😱 ben oui... 😱
je n'ouvrais pas le bon fichier..
Merci à toi..