Class Sample
Public Shared Sub Main()
Dim falseFlag As Boolean = False
Dim trueFlag As Boolean = True
Console.WriteLine("{0} converts to {1}.", falseFlag, _
Convert.ToByte(falseFlag))
Console.WriteLine("{0} converts to {1}.", trueFlag, _
Convert.ToByte(trueFlag))
End Sub
End Class