Module Tester Public Sub Main() Dim iBoolean As Integer = -1 Dim bBoolean As Boolean = CBool(iBoolean) bBoolean = CBool(0) Console.WriteLine("Boolean of 0 is {0}", bBoolean) End Sub End Module
Boolean of 0 is False