プログラマーのクリスマス

Dim x, y as Integer

'クリスマスイブまで
x = Int(Now - CDate("2007/12/24"))

'クリスマスまで
y = Int(Now - CDate("2007/12/25"))

日数だとこれでもできたり…。でもDateDiffの方が汎用性があるか。