How to reinitialize UDT in VB6?

Question

I have a loop that reads onto the stack of XML files, for each of them it checks the data that was in XML and loads it into some UDTs, and then does some work with the data.

It then returns to the start of the loop, and the UDTs still have data from the previous XML. If this tag is defined in the new one, it is overwritten, but if this tag is not defined, then this element in the UDT remains at rest.

But I cannot reset the UDT to use the method that I would use for the variable ( Let X = 0), unless I go through each element of the UDT and reset the value. And the execution of this style object ( Set X as New UDT) does not work.

How should I do it?

Answer 1

UDT , .

:

Dim XEmpty as UDT
X = XEmpty

X, UDT UDT.

Answer 2

, UDT

public function newTFoo() as TFoo
'//
end function


dim t as TFoo
t.x = 1234 ...
t = newTFoo()
'// t is reset