VB ternary

Dim foo = 3
Dim bar = If(foo < 3, "yes", "no") ' "no"
Dim baz = If(foo < 4, "yes", "no") ' "yes"
Promofo