… = .MimeMessage.Headers[…] (gb.mime)

Dim hMimeMessage As MimeMessage
Dim aString As String
aString = hMimeMessage.Headers [ Name As String ]

Returns the Name header.