![]() |
||
![]() |
Update"USB-Schnittstelle bei Σlteren Computern benutzen", Ausgabe 8/2001, Tipp 25: if (CInt(iDifference) = 0) then szMessage = szMessage & szName & ä ist heute dran & Chr(10) end if if (CInt(iDifference) = 1) then szMessage = szMessage & szName & hat morgen, am & szComparisonDate & - nur noch & iDifference & Tag & Chr(10) end if if (CInt(iDifference) >1) then if (CInt(iDifference) <= iTime) then szMessage = szMessage & szName & am & szComparisonDate & - noch & iDifference & Tage & Chr(10) end if end if Das komplette Listing finden Sie auch auf der Heft-CD unter dem CHIP- Code Birthday. |
![]() |