mcs/btests/BoolLiteralTest1.vb

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