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
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
相关文章推荐
- 在VS2010调试过程中使用条件断点的一个小技巧
- 使用控件的一个小技巧
- JS数组一个优化小技巧和对象方法的使用
- 使用DWR时动态生成TABLE的一个小技巧
- 电脑使用小技巧--如何把一个文件(夹)变成一个隐藏受系统保护的系统文件(夹)!
- retrofit与rxjava搭建的网络框架使用的一个小技巧
- 使用WindowManager addView来显示一个窗口,响应返回按钮小技巧
- 关于如何使用VS高亮显示无扩展名源码文件的一个小技巧
- 使用GridLayout时的一个小技巧
- Python:通过自定义系统级快捷键来控制程序开始或停止记录日志(使用小技巧解决一个貌似无解的问题)
- 使用SqlHelper的一个小技巧
- Golang 中使用 JSON 的一些小技巧 陶文 陶文 3 个月前 有的时候上游传过来的字段是string类型的,但是我们却想用变成数字来使用。 本来用一个json:",string" 就可以支持了
- 一个使用Linq的小技巧
- C#中使用反射遍历一个对象属性及值的小技巧
- Python:通过自定义系统级快捷键来控制程序开始或停止记录日志(使用小技巧解决一个貌似无解的问题)
- 使用DWR时动态生成TABLE的一个小技巧
- Python中AND、OR的一个使用小技巧
- IOS小技巧——使用FMDB时如何把一个对像中的NSArray数组属性存到表中
- videoview使用的一个小技巧
- IOS小技巧——使用FMDB时如何把一个对像中的NSArray数组属性存到表中