Utilise un timer pour raffraichir ta date, ce qui donne :
form_load :
Timer.Interval = 30000 'toutes les 30 secondes
Timer_Timer() :
Label1.Caption = Format(Now, "short date")
_
Avant de poster dans le forum,
prière d'aller lire ceci :
http://www.codes-sources.com/reglement.aspx