… = MediaTagList[…] (gb.media)

Dim hMediaTagList As MediaTagList
Dim aVariant As Variant
aVariant = hMediaTagList [ Name As String ]

Return the value associated with the tag Name.