Am 16.01.11 10:57, schrieb Christian Schmitz:
Am 16.01.2011 um 10:15 schrieb Stefan Mettenbrink:Warum so kompliziert? dim d As new date listbox1.DeleteAllRows for i as integer = 0 to 29 d.day = d.day + 1 listbox1.AddRow d.ShortDate next einfach day rauf zählen tut es doch auch!? Gruß Christian
Kleine korrektur:wenn die zeile _d.day = d.day +1_ nach der zeile _listbox1.addrow d.shortdate_ steht, wird die liste ab dem 'heutigen' tag erstellt.
gruss enno