Can't add class item to Collection..

[james2432]

I've defined a collection in my form:

private toDelete as new Collection

In my delete button I have this:

Private sub cmdDelete_Click()
Dim TM as new TestMeth
TM.X="foo"
TM.Y="bar"

toDelete.Add(TM)
end sub

TestMeth is a Class Module that has a bunch of Get/Let Properties

I get this error when trying to add it to the collection:

Run-time error '438'
Object doesn't support this property or method