站长，COLLECTION类型怎么用啊，能否举个简单例子？

tmtony

这个肯定会，能不能把你未做完的传上来我再改，省点时间 ：）

大熊

实际上我什么也没做，只是开了个空窗口，写了三行代码测试了一下！

tmtony

啊？
你的意思是一个窗体（是否绑定）要更新其中一部分字段，我随机抽几个字段是否可以

大熊

暂停，我找到了一个例子，有问题我再问！TKS ANYWAY！

大熊

站长请看，ANY PROBLEM？
Option Compare Database
Dim xxx As Collection
Private Sub Form_Open(Cancel As Integer)
    Set xxx = New Collection
    xxx.Add Item:="Rick", Key:="001"
End Sub


Private Sub 命令0_Click()
    MsgBox xxx("001")
End Sub

tmtony

正是，不过是循环多几次而已
集合很类似数组啦，不过弹性更大

大熊

搞错了，这是我模仿来的，但是不能用，正要请教TONY站长呢！

tmtony

出什么错？

tmtony

这是现在VB上做的OA方面的类（接口），要改在ACCESS上实在不知如何改，直接放上来当个例子吧文件下载

大熊

天，这个例子是给我的？

没见到有集合对像啊！

[此贴子已经被大熊于2002-4-25 16:35:41编辑过]