mcs/btests/ConstantC0.vb

   1 REM LineNo: 6
   2 REM ExpectedError: BC30438
   3 REM ErrorMessage: Constants must have a value.
   4
   5 Module ConstantC0
   6     Const a As Integer
   7     Sub main()
   8     End Sub
   9 End Module