LCStream の DatetimeListGetValue メソッド

このメソッドは、日時リストの LCStream オブジェクトの指定された位置から日時値を取り出します。

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

定義位置

LCStream

構文

Call lcStream. DatetimeListGetValue (index, datetime)

パラメータ

パラメータ	説明
index	Long、1 から lcStream.Valuecount の範囲。取り出す日時値の、インデックスで指定された位置です。
datetime	LCDatetime。日時値です。

使用法

日時リストのストリームには、単一の日時値と日時範囲が混在していることもあります (例を参照)。

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

例

Option Public
Uselsx "*lsxlc" 
Sub Initialize
  Dim datelist As New LCStream (0, 0, LCSTREAMFMT_DATETIME_LIST)
  Dim num As New LCDatetime
  datelist.Text = "12/25/50,7:00AM,5:00PM - 6:00PM,12/31/99 12:59PM," & _
  "1/1/2000 12:00AM,6:30AM,5/1/96 - 5/31/96"
  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.DatetimeListgetValue (3, num)
  Print "The new 3rd datetime is " & num.Text
End Sub

出力例

The new 3rd datetime is 12/31/1999 12:59:00 PM.