説明
指定範囲に基づいて、日付値を 21 世紀の日付値に変換します。
引数
日付：2 桁または 4 桁の年が含まれる有効な日付フィールドのみ指定できます。
日付フィールドとして定義されているデータベース フィールド。［ファイル］メニューの［レポート オプション］で［日時フィールドを変換］を［日付へ］に設定する必要があります。
CDate 関数（CDate(yyyy, MM, dd)）。この関数では年は 4 桁で指定する必要があります。2 桁の年が指定された場合は、00xx であるものと見なされます（例：西暦 98 年）。
数値：目的のウィンドウ年に対応する 0 ～ 99 の範囲の数値を指定します。
アクション
2 桁の年（xx）の場合
年の値がウィンドウ値より大きい場合は、その値の前に 19 が付加されます（19xx）。年の値がウィンドウ値と同じかそれより小さい場合は、20 が付加されます（20xx）。
4 桁の年（19xx）の場合
年の値の下 2 桁がウィンドウ値より大きい場合は、年は日付フィールドにあるとおりに保持されます（19xx）。年の値の下 2 桁がウィンドウ値と同じかそれより小さい場合は、上 2 桁が 20 に変更されます（20xx）。年フィールドの上 2 桁が 20 の場合、年は日付フィールドにあるとおりに保持されます（20xx）。
注
例
次の例ではウィンドウ値が年より大きいため、年は 20XX に変更されます。
DateTo2000(CDate(1993,12,12), 99)
2093/12/12 が返されます。
次の例ではウィンドウ値が年より小さいため、年は変更されません。
DateTo2000(CDate(1993,12,12), 92)
1993/12/12 が返されます。
その他の例
この関数によって変更を受けない日付の例を次に示します。
DateTo2000(CDate(1899,12,12), 99)
1899/12/12 が返されます。
この関数によって変更を受けない日付の例を次に示します。
DateTo2000(CDate(100,12,12), 99)
100/12/12 が返されます。
データベースによっては、日付の年の部分が 2 桁のフィールドとして保持されます。以下の例は、このような日付フィールドをシミュレートしたものです。
DateTo2000(CDate(98,12,12), 99)
2098/12/12 が返されます。
DateTo2000(CDate(98,12,12), 97)
12.12.98 が返されます。
DateTo2000(CDate(9,12,12), 10)
12.12.09 が返されます。
DateTo2000(CDate(1,12,12), 0)
12.12.01 が返されます。