Das merke ich mir, danke :-) gruss enno
Am 25.08.11 22:40, schrieb Christian Schmitz:
....
Wie wäre es, wenn du einfach die letzten 4 Wochen als Datum zur Auswahl stellst?
Also
dim d as new date
for i as integer = 1 to 30
popupmenu1.addrow d.longdate
popupmenu1.rowtag(popupmenu1.listcount-1) = new date(d)
d.day = d.day -1
next
dann hast du die Daten drin und kannst das Date Objekt aus dem RowTag nehmen.
Gruß
Christian
