"Jens Vestergaard" <j@railsoft.dk> skrev i en meddelelse
news:43a5afef$0$2096$edfadb0f@dtext02.news.tele.dk...
>I news:43a5a9b8$0$38644$edfadb0f@dread12.news.tele.dk,
> skrev Brian Østergård <mantabrian@REMOVEhotmail.com>:
>> Hej
>>
>> Jeg har et labelarray hvor jeg gerne vil have label(0).caption til at
>> være den aktuelle ugedag og label(1).caption ugedagen i går o.s.v.
>> indtil de forrige 7 dage står der, er der en måde at gøre det på ?
>> Det er vel noget med Format Date og så Format Date - 1 eller hvad ?
>
> Private Sub Command1_Click()
> Dim x as Long
>
> For x = 6 To 0 Step -1
> Label(x) = Format(DateAdd("d", -x, Now), "dddd", vbMonday)
> Next
>
> End Sub
>
>
> --
> mvh
> Jens Vestergaard (mailadr i dette indlæg er ikke gyldig!)
> Døgnets jernbanenyheder:
www.railsoft.dk/medier.asp
>
>
Hej
Perfekt det var lige hvad jeg søgte.
Så fik jeg også lært DataAdd funktionen
Tak for hjælpen.
Brian :ø)