mcs/btests/LocalDeclarationC1.vb

   1 ' BC30438: Constants must have a value\r
   2 ' BC30074: Constant cannot be the target of an assinment.\r
   3 \r
   4 Imports System\r
   5 \r
   6 Module LocalDeclarationC1\r
   7 \r
   8     Sub main()\r
   9         Const a As Integer\r
  10         Const b As Integer = 20\r
  11         b = b + 2\r
  12     End Sub\r
  13 \r
  14 End Module