Используйте оператор If :
' data type infered from ifTrue and ifFalse
... = If(condition, ifTrue, ifFalse)
Этот оператор был представлен в VB.NET 9 (выпущен с .net Framework 3.5). В более ранних версиях вам придется прибегнуть к функции IIf (без вывода типа, без короткого замыкания):
' always returns Object, always evaluates both ifTrue and ifFalse
... = IIf(condition, ifTrue, ifFalse)