Convert.ToByte (Boolean) converts Boolean value to 8-bit unsigned integer.
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