LCStream の DatetimeListGetRange メソッド

このメソッドは、LCStream DatetimeList オブジェクトの値の範囲を取得します。

ストリームは LCSTREAMFMT_DATETIME_LIST 形式でなければなりません。

定義位置

LCStream

構文

Call lcStream. DatetimeListGetRange (index, startDatetime, endDatetime)

パラメータ

パラメータ

説明

index

Long、1 から lcStream.Rangecount の範囲。 datetimeList ストリーム内の範囲の、インデックスで指定された位置です。

startDatetime

LCDatetime。出力。範囲の開始日時です。

endDatetime

LCDatetime。出力。日付と時刻範囲の終了日時です。

使用法

日時リストのストリームには、単一の日時値と日時範囲が混在していることもあります (例を参照)。このメソッドは、先頭の要素からリストをスキャンし、日時値を検索してその数をカウントします。カウントが index に到達すると、その位置の日時値が返されます。リストに単一値と範囲値が混在している場合は、リストの index 番目の値が返されるとは限りません。

Option Public
Uselsx "*lsxlc" 
Sub Initialize
  Dim datelist As New LCStream (0, 0, LCSTREAMFMT_DATETIME_LIST)
  Dim start As New LCDatetime
  Dim finish As New LCDatetime
  datelist.Text = "12/25/50,7:00AM,12/31/99 12:59PM,1/1/2000 12:00AM," & _
  "5:00PM - 6:00PM,6:30AM,5/1/96 - 5/31/96"
  Call datelist.DatetimeListGetRange (1, start, finish)
  Print "The new 1st range is " & start.Text & " - " & finish.Text
End Sub

出力例

The new 1st range is 05:00:00 PM - 06:00:00 PM.