… = MediaMessage[…] (gb.media)

Dim hMediaMessage As MediaMessage
Dim aVariant As Variant
aVariant = hMediaMessage [ Name As String ]

Return the value associated with the Name key stored in the message.