vb6 - VB6-将变体转换为节点

Question

我正在使用For Each循环来遍历VB6中的Variant数组。有一次，我想将循环(元素)的元素(即Variant)转换为Node。

Dim elem as Variant

For Each elem In ndArray
    Dim nodle As Node
    nodle = CType(elem , Node)
Next

那不是整个循环，但是它使您了解我正在尝试做的事情。运行此代码时，出现错误消息“ undefined variable ”，它指向CType方法中的“节点”。这不是一个变量，它是一个类型，由于该方法期望一个类型，因此该方法应该知道。

我尝试跳过CType方法，而只设置nodle = elem，但出现错误，提示“对象变量或With块变量未定义”。我在表达式前面添加了Set关键字，并且错误更改为“Object required”

当我调试并查看elem变量时，它似乎包含有效的Node值。

有人知道这是怎么回事吗？这种转换有可能吗？

任何建议将不胜感激。

Answer 1

尝试添加Set吗？

Set nodle = CType(elem , Node) 

如果 Set是对象类型，并且 Node将包含对象引用，则 nodle是必需的。如果省略 Set，则编译器会假定您要更改 Node对象的默认属性。