mcs/btests/BoolLiteralTest.vb

   1 Imports System
   2 Module BoolLiteralTest\r
   3     Sub Main()\r
   4         Try\r
   5             Dim b As Boolean\r
   6             b = True\r
   7             b = False\r
   8         Catch e As Exception\r
   9             Console.WriteLine(e.Message)\r
  10         End Try\r
  11     End Sub\r
  12 End Module\r