このメソッドは、日時リストの LCStream オブジェクトに値を挿入します。
ストリームは LCSTREAMFMT_DATETIME_LIST 形式でなければなりません。
LCStream
Call lcStream. DatetimeListInsertValue (index, datetime)
パラメータ |
説明 |
---|---|
index |
Long、1 ~ lcStream.Valuecount + 1 の範囲。値を挿入する位置を示すインデックスです。 |
datetime |
LCDatetime。挿入する日時値です。 |
Option Public
Uselsx "*lsxlc"
Sub Initialize
Dim datelist As New LCStream (0, 0, LCSTREAMFMT_DATETIME_LIST)
Dim clock As New LCDatetime
clock.SetCurrent
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.DatetimeListInsertValue (3, clock)
Print "The new stream is " & datelist.Text
End Sub
The new stream is 12/25/1950, 07:00:00 AM, 09/08/1998 05:22:23.96 PM, 12/31/1999 12:59:00 PM, 01/01/2000 12:00:00 AM, 06:30:00 AM, 05:00:00 PM - 06:00:00 PM, 05/01/1996 - 05/31/1996