我正在开发一个简单的工具,使我能够把多个CSV档案整理起来,并把它们放在一个“合并”的新的工作桌上。 这里是我的执行(我简化了它)和我的问题:
A级
private variables as types
property methods for accessing variables
B级
private variables as types
property methods for accessing variables
C级
Private cA as ClassA
Private cB as Collection Collection of ClassB
D类: 我的部分问题
Private cC as Collection Collection of ClassC
Other member variables and their property get/lets
Public Sub AddA(A as ClassA)
If cC.Item(A.foo) is Nothing then
dim tempC as ClassC
set tempC = new ClassC
tempC.A = A
End if
End Sub
Main Module - Other half of my problem
Dim cC as New ClassC
Initialize C级, this all works fine
Dim tempA as ClassA
Set tempA = new ClassA
Set tempA properties
cC.AddA tempA This is where my error is
I ve尝试将其通过为ByVal 和ByRef。 每一次都给我不同的错误(“错误论点类型”、“无效程序或论点”和“绝对不支持这种财产或方法”)
我对下一步工作没有任何想法,甚至审判了本应将直截面直射到ByVal或Beref的“th”,我记得,昨天。
感谢。