public class Test public Shared Sub Main Dim manager As Boolean = True If manager Then Dim txt As String = "M" : Console.WriteLine(txt) Else _ Dim txt As String = "E" : Console.WriteLine(txt) End SubEnd class M