您的位置:首页 > 移动开发

LotusScript中使用ArrayAppend的一个小技巧

2011-12-23 10:51 253 查看
在LotusScript中使用ArrayAppend的时候,语法大概如下:
array1 = ArrayAppend(array1,array2)
顾名思义就是把array2合到array1中去,其中根据Help的说法,array2不一定要是数列,但是array1必须是数列!
这个要求很讨厌,因为这意味着我们在自己从0开始造一个数组的时候,都不能用非常好用的ArrayAppend,而是要没完没了的在for循环在redim。
就是说下面这个看似很合理的写法,却会被提示不符合语法。
v = 1
v = ArrayAppend(v,2)
但是我们知道如果v是一个数列的话,那就没有这个问题了,如果你不想redim的话,那么下面这个小技巧将非常好用。
v = Split(1)
v = ArrayAppend(v,2)

Split将为我们强行制造一个数列,而这个数列里只有一个值,即1,这样既不会破坏v的值,也解决了语法问题。

一个实际应用就是:

Dim i As Integer, numberlist As VariantnumberList = Split( 1 )For i = 2 To 20numberList = Arrayappend( numberlist, i )NextPrint Join( numberList, ", " )'Prints 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: