Collection返回值的奇怪问题

Question

Public taskCollection As New Collection
Public Function aaa() As Collection taskCollection.Add (1)
  
 ReadTasks = taskCollection  '返回任务信息的集合  <----此处提示"参数不可选"
  
End Function
上面函数在生成的时候提示"参数不可选",这是为什么,跟Collection有关吗?

Answer 1

添加一个成员到 Collection 对象。语法object.Add item, key, before, afterAdd 方法的语法具有下列对象限定符和命名参数：部分 描述 
object 必需的。对象表达式，其值为“应用于”列表中的对象。 
item 必需的。任意类型的表达式，指定要添加到集合中的成员。 
key 可选的。唯一字符串表达式，指定可以使用的键字符串，代替位置索引来访问集合中的成员。 
before 可选的。表达式，指定集合中的相对位置。在集合中将添加的成员放置在 before 参数识别的成员之前。如果为一数值表达式，则 before 必须是介于 1 和集合 Count 属性值之间的值。如果为一字符串表达式，则当添加一个被引用的成员到集合时，before 必须对应于指定的 key 值。可以指定 before 位置或 after 位置，但不能同时指定这两个位置。 
after 可选。表达式，指定集合中的相对位置。在集合中将添加的成员放置在 After 参数识别的成员之后。如果为一数值表达式，则 after 必须是介于 1 和集合 Count 属性值之间的值；如果为一字符串表达式，则当添加一个被引用的成员到集合时，after 必须对应于指定的 key 值。可以指定 before 位置或 after 位置，但不能同时指定这两个位置。 

Answer 2

set ReadTasks = taskCollection
对象要用set

Answer 3

那我的应该没有问题啊
我把
ReadTasks = taskCollection  '返回任务信息的集合  <----此处提示"参数不可选"
改成
Me = taskCollection  '返回任务信息的集合 但是在调用的时候用
  Dim tasks As New Collection
  tasks = aaa  <----此处提示"参数不可选"又出现这个问题了我想知道问题究竟在哪里?

Answer 4

要注意，对象的赋值是引用赋值，其实是添加指向原来对象的指针，
不用时要对所有对象变量 set 对象变量 ＝ nothing
引用计数为0时，该对象自动卸载

Answer 5

晕～
Collection是对象，
对象的赋值要用
set 对象变量 ＝而且Collection一般是用来存放对象的