Variable de type "date"

darwin42 Messages postés 262 Date d'inscription mercredi 15 janvier 2003 Statut Membre Dernière intervention 21 juillet 2008 - 7 avril 2003 à 10:33
stevebelgium Messages postés 180 Date d'inscription lundi 17 mars 2003 Statut Membre Dernière intervention 7 juin 2003 - 7 avril 2003 à 10:52
salut,

- J 'ai une variable "DateDebut" de type "date"
- J'ai 3 labels (label1,label2,label3)

Je voudrais que :
- le n° contenu dans label1 corresponde au jour de DateDebut
- le n° contenu dans label2 corresponde au mois de DateDebut
- le n° contenu dans label3 corresponde à l'année de DateDebut

Qd je fais :

[Code]
salut,

- J 'ai une variable "DateDebut" de type "date"
- J'ai 3 labels (label1,label2,label3)

Je voudrais que :
- le n° contenu dans label1 corresponde au jour de DateDebut
- le n° contenu dans label2 corresponde au mois de DateDebut
- le n° contenu dans label3 corresponde à l'année de DateDebut

Qd je fais :

Dim DateDebut As Date
Day(DateDebut) = Label1.Caption
Month(DateDebut) = Label2.Caption
Year(DateDebut) = Label3.Caption

salut,

- J 'ai une variable "DateDebut" de type "date"
- J'ai 3 labels (label1,label2,label3)

Je voudrais que :
- le n° contenu dans label1 corresponde au jour de DateDebut
- le n° contenu dans label2 corresponde au mois de DateDebut
- le n° contenu dans label3 corresponde à l'année de DateDebut

Qd je fais :

Dim DateDebut As Date

Day(DateDebut) = Label1.Caption
Month(DateDebut) = Label2.Caption
Year(DateDebut) = Label3.Caption

J 'ai un message d'erreur : "un objet est requis"

Qqun sait pourquoi ?

Merci d 'avance...

DaRwIn42

1 réponse

stevebelgium Messages postés 180 Date d'inscription lundi 17 mars 2003 Statut Membre Dernière intervention 7 juin 2003 1
7 avril 2003 à 10:52
Dim DateDebut As Date

DateDebut = Now()

Label1.Caption = Day(DateDebut)
Label2.Caption = Month(DateDebut)
Label3.Caption = Year(DateDebut)
0
Rejoignez-nous