patl76
Messages postés69Date d'inscriptionjeudi 21 novembre 2002StatutMembreDernière intervention21 mai 2013
-
12 mars 2004 à 16:01
patl76
Messages postés69Date d'inscriptionjeudi 21 novembre 2002StatutMembreDernière intervention21 mai 2013
-
12 mars 2004 à 16:36
Salut à tous !!
J' ai une p' tite question vite fait au passage...
J' ai 3 combobox dans lequels je rentre une date:
1 combo pour le jour, 1 pour le mois & 1 pour l' année...
Dans cet optique je voudrait afficher par defaut, au moment du load de ma form, la date du jour ds les 3 combobox; en mettant le jour ds un, le mois ds le 2eme & l' année ds le dernier...
Est ce possible ??
Y a une méthode qui permet de le faire automatiquement ou il faut que je fasse une fonction de psycopathe...?
crenaud76
Messages postés4172Date d'inscriptionmercredi 30 juillet 2003StatutMembreDernière intervention 9 juin 200628 12 mars 2004 à 16:17
Dim D as date, J as long, M as long, A as long
D = now()
j = day(D)
m = month(D)
a = year(D)
cmbjour.listindex = d-1
cmbmois.listindex = m-1
cmbannee.listindex = a-cmbannee.list(0)