To retrieve a DUOS data object, you return an object from the object’s collection, then set window fields to the property values for the object:
Dim ItemCollection As DUOSObjects
Dim ItemObject As DUOSObject
'Specify the collection
Set ItemCollection = DUOSObjectsGet("Additional Item Info")
'Specify the object to display in the window
Set ItemObject = ItemCollection("ITM002")
'Set two window fields
ItemWeightField = ItemObject.Properties.Item("Item Weight")
ItemColorField = ItemObject.Properties.Item("Item Color")