Выберите Case с оператором «Is»

В VB.NET мне приходится сравнивать некоторые объекты в операторе select case.

Поскольку select caseиспользует оператор =по умолчанию, и он не определен для объектов, выдается ошибка компиляции.

В настоящее время я использую этот обходной путь:

Select Case True
    Case sender Is StyleBoldButton

    Case sender Is StyleUnderButton

    Case sender Is StyleItalicButton

End Select

что на самом деле работает.

Есть ли что-то более красивое и понятное?