用自定义类型变量给TreeView的Node的tag赋值时出错，求救

Question

Compile error:
Only user-defined types defined in public object modules can be coerced to or from a variant or passed to late-bound functions请问，如何解决这个问题？
public object modules是怎么回事？我可以自己生成吗？

Answer 1

public object modules是标准模块的意思
就是.bas文件的那个，可以新增的

Answer 2

类我已经建好了？比如说student 有id 和name两个属性
怎么生成一个对象，再赋给node.tag呢？
感谢！！！！！！！！！

Answer 3

不可以给Variant赋予私有模块里定义的自定义类型。
但可以用类，  Dim var As Variant, ca As Class1
  Set ca = New Class1
  Set var = ca

Answer 4

Tag 属性（ActiveX 控件）返回或设置一个表达式用来存储程序中需要的额外数据。与其它属性不同，Tag 属性值不被 Visual Basic 使用；可以用该属性来标识对象。语法object.Tag [= expression]Tag 属性语法包含下面部分：部分 描述 
object 对象表达式，其值是“应用于”列表中的一个对象。 
expression *字符串表达式*用来标识对象，缺省值为零长度字符串 ("")。 
说明利用该属性可以给对象赋予一个标识*字*符*串*，......
————————————————————————————————
建议你仅仅在 Tag 中保存一个标识（Index），用它来引用你所定义的类型变量数组的成员。