LCDatetime の Compare メソッド

このメソッドは、2 つの Datetime 値を比較し、その関係を返します。

定義位置

LCDatetime

構文

Result = thisDatetime.Compare (baseDatetime)

パラメータ

パラメータ	説明
baseDatetime	thisDatetime と比較する Datetime です。

戻り値

値	説明
結果	Long。比較の結果 (以下のいずれか)。
	Result > 0 (正): thisDatetime は baseDatetime より大きい。
	Result < 0 (負): thisDatetime は baseDatetime より小さい。
	Result = 0: thisDatetime は baseDatetime と等しい。
	任意の有効な日時よりも常に大きい、常に小さい、または常に等しい日時の「定数」があります。詳しくは、SetConstant メソッドを参照してください。比較するときは、タイムゾーンとサマータイムも考慮されます。例えば、1:30 PM CST は、同日の 1:00 PM EST より前と見なされます。注: タイムゾーンとサマータイムを考慮するかどうかを制御する場合や、秒単位 (100 分の 1 秒単位ではなく) で比較するには、LCField.Compare を使用します。

例

Option Public
Uselsx "*lsxlc"  
Sub Initialize
  Dim Clock As New LCDateTime (1999, 12, 31, 23, 59, 59, 99)
  Dim Match As New LCDatetime
  Match.SetCurrent
  If (Clock.Compare (Match) = 0) Then
    Print "The current time matches " & Clock.Text
  Elseif (Clock.Compare (Match) > 0) Then
    Print "The current time is before " & Clock.Text
  Else
    Print "The current time is after " & Clock.Text
  End If
End Sub

出力例

The current time is before 12/31/1999 11:59:59.99 PM