… = TextHighlighterTheme[…] (gb.eval.highlight)

Dim hTextHighlighterTheme As TextHighlighterTheme
Dim hTextHighlighterStyle As TextHighlighterStyle
hTextHighlighterStyle = hTextHighlighterTheme [ Key As String ]