User`s guide

Utility Library Classes

D-21

On Error Goto Handle_Error

' Call a method that returns an MWStruct in x

Dims = x.Dims

FieldNames = x.FieldNames

For I From 1 To Dims(1)

For J From 1 To Dims(2)

For K From 1 To x.NumberOfFields

y = x(I,J,FieldNames(K))

' Do something with y

Exit Sub

Handle_Error:

MsgBox(Err.Description)

End Sub

Sub Clone(ppStruct As MWStruct)

Creates a copy of an MWStruct object.

Parameters.

Return Value.

None

Remarks. Clone allocates a new MWStruct object and creates a deep copy of the

object’s contents. Call this function when a separate object is required instead

of a shared copy of an existing object reference.

Argument Type Description

ppStruct MWStruct

Reference to an uninitialized

MWStruct object to receive the

copy.