ToDateメソッド

適用対象

説明

OraTimeStampまたはOraTimeStampTZオブジェクトからDate型のコピーを戻します。

使用方法

Set date = OraTimeStampObj.ToDate
Set date = OraTimeStampTZObj.ToDate

備考

このメソッドは、日時値をDateデータ型で戻します。その結果、日時値がVB日付の許容範囲外の場合は調整されます。

OraTimeStampオブジェクトの場合:

現行のOraTimeStampオブジェクトと同じ日時値の新規Dateオブジェクトを戻します。ただし、ナノ秒部分は切り捨てられます。
OraTimeStampTZオブジェクトの場合:

現行のOraTimeStampTZオブジェクトと同じ日時値の新規Dateオブジェクトを戻します。ただし、ナノ秒部分とタイムゾーン部分は切り捨てられます。

例

OraTimeStampオブジェクトの使用方法

Dim OraTimeStamp As OraTimeStamp 
 
... 
'Create OraTimeStamp using a string 
Set OraTimeStamp = OraSession.CreateOraTimeStamp("1999-APR-29 12:10:23.444 AM", _
       "YYYY-MON-DD HH:MI:SS.FF AM") 
 
' returns a Date type with date value set to "1999-APR-29 12:10:23 AM" 
' note that the fractional part is dropped 
Set date = OraTimeStamp.ToDate

OraTimeStampTZオブジェクトの使用方法

 
Dim OraTimeStampTZ As OraTimeStampTZ 
 
... 
'Create OraTimeStampTZ using a string 
Set OraTimeStampTZ = OraSession.CreateOraTimeStampTZ("2000-12-28" & _ 
        "12:10:23.444 -07:00", "YYYY-MM-DD HH:MI:SS.FF TZH:TZM") 
 
'returns a Date type with date value set to "2000-12-28 12:10:23" 
'note that Time Zone and nanosecond portions are dropped 
Set date = OraTimeStampTZ.ToDate