利用CreateObject让平台具有数组功能

张军勇

发掘了CreateObject的用法，继续深挖，我们发现，可以达到很多意想不到的效果，比如马上要讲的数组ArrayList功能。
话不多说，直接看代码：

1. dim arrlist=createObject("System.Collections.ArrayList")
   
2. 
   
3. arrlist.Add("张三")
   
4. arrlist.Add(1)
   
5. arrlist.Add("李四")
   
6. 
   
7. for each a in arrlist
   
8.       msgbox(cstr(a))
   
9. next

复制代码

显然，通过CreateObject，我们创建了一个ArrayList，并对它进行了赋值和遍历操作。复制此代码到功能中，运行窗体，点击功能查看效果。

张军勇

ArrayList是特殊的list，可以将任何类型加入到list中，并且可以遍历。
当然，据说效率要略差于list，不过这些对平台来说影响不大。使用方便最重要。

张军勇

ArrayList可以暂代数组使用，明天的帖子准备讲一下CreateList的用法和list对象的用法。

王爱东

两种方式都可以使用。

张兴康

不错，收藏一个

刘亚东

这个应该加到智能向导中

万望

刘亚东 发表于 2015-10-28 21:51
这个应该加到智能向导中

这个想法才是王道

张军勇

必须的。